mirror of
https://github.com/nineties/planckforth
synced 2024-12-25 21:58:22 +01:00
Add "e"
This commit is contained in:
parent
82dccf9cfd
commit
609b6741e8
2 changed files with 7 additions and 2 deletions
|
@ -34,3 +34,4 @@ $ cat helloworld.fs | ./plank
|
|||
| { | dtor | ( a -- R:a ) | Push value to return stack |
|
||||
| } | rtod | ( R: -- a ) | Pop value from return stack |
|
||||
| i | docol | ( -- addr ) | Get the interpreter function |
|
||||
| e | exit | ( -- ) | Exit current function |
|
||||
|
|
|
@ -6,10 +6,10 @@
|
|||
00000028: 3400 2000 0100 0000 e_ehsize,e_phentsize,e_phnum,e_shentsize
|
||||
00000030: 0000 0000 0100 0000 e_shnum,e_shstrndx,<phdr> PT_LOAD
|
||||
00000038: 0000 0000 0080 0408 p_offset,p_vaddr=0x08048000
|
||||
00000040: 0000 0000 a802 0000 p_paddr,p_filesz
|
||||
00000040: 0000 0000 c802 0000 p_paddr,p_filesz
|
||||
00000048: 0000 0008 0700 0000 p_memsz(128MB),PF_X|PF_W|PF_R
|
||||
00000050: 0010 0000 0200 0000 p_align, <here>
|
||||
00000058: 8082 0408 e880 0408 <latest:init="i">, <interpreter>(5c: key)
|
||||
00000058: b082 0408 e880 0408 <latest:init="e">, <interpreter>(5c: key)
|
||||
00000060: 6881 0408 9881 0408 (60: find) (64: execute)
|
||||
00000068: 3881 0408 f0ff ffff (68: jump) (6c: -16)
|
||||
00000070: be5c 8004 08bd 0080 (70: movl $interpreter,%esi) (75: movl $0x10048000,%ebp)
|
||||
|
@ -104,3 +104,7 @@
|
|||
00000290: 08ad ff20 0000 0000 next;
|
||||
00000298: 8d6d fc89 7500 83c0 <docol>rpush %esi; addl $4,%eax
|
||||
000002a0: 0489 c6ad ff20 0000 movl %eax,%esi; next;
|
||||
|
||||
000002b0: 8082 0408 0165 0000 e: exit
|
||||
000002b8: bc82 0408 8b75 008d rpop %esi
|
||||
000002c0: 6d04 adff 2000 0000 next
|
||||
|
|
Loading…
Reference in a new issue