Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-26 21:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

minor fix

Browse source
This commit is contained in:
Koichi Nakamura 2020-12-29 11:05:08 +09:00
parent 7629eaf000
commit 41a39200c7
1 changed files with 16 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
planck.xxd
View file

@ -16,29 +16,29 @@
00000078: 0410 adff 2000 0000 (7a: next) 00000078: 0410 adff 2000 0000 (7a: next)
00000080: 0000 0000 0151 0000 "Q" quit 00000080: 0000 0000 0151 0000 "Q" quit
00000088: 8c80 0408 31db b801 xorl %ebx,%ebx; mov $SYS_EXIT,%eax; 00000088: 8c80 0408 31db b801 xorl %ebx,%ebx; mov $SYS_EXIT,%eax;
00000090: 0000 00cd 8000 0000 int $0x80 00000090: 0000 00cd 8000 0000 int $0x80;
00000098: 8080 0408 0143 0000 "C" cellsize 00000098: 8080 0408 0143 0000 "C" cellsize
00000100: 0481 0408 6804 0000 pushl $4 00000100: 0481 0408 6804 0000 pushl $4;
00000108: 00ad ff20 0000 0000 next 00000108: 00ad ff20 0000 0000 next;
00000110: 9880 0408 0168 0000 "h" here 00000110: 9880 0408 0168 0000 "h" here
00000118: 1c81 0408 6854 8004 pushl $here 00000118: 1c81 0408 6854 8004 pushl $here;
00000120: 08ad ff20 0000 0000 next 00000120: 08ad ff20 0000 0000 next;
00000128: 1081 0408 016c 0000 "l" latest 00000128: 1081 0408 016c 0000 "l" latest
00000130: 3481 0408 6858 8004 pushl $latest 00000130: 3481 0408 6858 8004 pushl $latest;
00000138: 08ad ff20 0000 0000 next 00000138: 08ad ff20 0000 0000 next;
00000140: 2881 0408 016b 0000 "k" key 00000140: 2881 0408 016b 0000 "k" key
00000148: 4c81 0408 31c0 50ba xorl %eax,%eax; pushl %eax; movl $1,%edx 00000148: 4c81 0408 31c0 50ba xorl %eax,%eax; pushl %eax; movl $1,%edx;
00000150: 0100 0000 89e1 31db movl %esp,%ecx; xorl %ebx,%ebx (STDIN) 00000150: 0100 0000 89e1 31db movl %esp,%ecx; xorl %ebx,%ebx (STDIN);
00000158: b803 0000 00cd 80ad movl $SYS_READ,%eax; int $0x80 00000158: b803 0000 00cd 80ad movl $SYS_READ,%eax; int $0x80;
00000160: ff20 0000 0000 0000 next 00000160: ff20 0000 0000 0000 next;
00000168: 4081 0408 0174 0000 "t" type 00000168: 4081 0408 0174 0000 "t" type
00000170: 7481 0408 ba01 0000 movl $1,%edx 00000170: 7481 0408 ba01 0000 movl $1,%edx;
00000178: 0089 e1bb 0100 0000 movl %esp,%ecx; movl $1,%ebx (STDOUT) 00000178: 0089 e1bb 0100 0000 movl %esp,%ecx; movl $1,%ebx (STDOUT);
00000180: b804 0000 00cd 8083 movl $SYS_WRITE,%eax; int $0x80 00000180: b804 0000 00cd 8083 movl $SYS_WRITE,%eax; int $0x80;
00000188: c404 adff 2000 0000 addl $4,%esp; next 00000188: c404 adff 2000 0000 addl $4,%esp; next;
00000190: 6881 0408 016a 0000 "j" jump 00000190: 6881 0408 016a 0000 "j" jump
00000198: 9c81 0408 0336 adff addl (%esi),%esi; next; 00000198: 9c81 0408 0336 adff addl (%esi),%esi; next;
000001a0: 2000 0000 0000 0000 000001a0: 2000 0000 0000 0000
000001a8: 9081 0408 014a 0000 "J" jump if zero 000001a8: 9081 0408 014a 0000 "J" jump if zero
000001b0: b481 0408 5885 c074 popl %eax; test %eax,%eax;je 19c(-29) 000001b0: b481 0408 5885 c074 popl %eax; test %eax,%eax;je 19c(-29)
000001b8: e3ad adff 20 lodsl; next; 000001b8: e3ad adff 2000 0000 lodsl; next;