commit 0ea08191f789a98c6012288715855cf285cf2f8d
parent 45e36c51de4d9dff13a04545fc1349d88a8d49ba
Author: Henry Wilson <m3henry@googlemail.com>
Date: Sat, 10 Jun 2017 21:56:22 +0100
tidy
Diffstat:
| M | main.s | | | 22 | ++++++++++------------ |
1 file changed, 10 insertions(+), 12 deletions(-)
diff --git a/main.s b/main.s
@@ -60,17 +60,6 @@ stack: .skip 64 #1048576
.set WP, %r12
.set ACC, %r11
-one: codeword
- mov TOS, (SP)
- add $8, SP
- mov $1, TOS
- jmp next
-
-
-double: codeword
- shl TOS
- jmp next
-
.macro _dup
add $8, SP
mov TOS, (SP)
@@ -164,12 +153,21 @@ at: codeword
mov (TOS), TOS
jmp next
-
bang: codeword
mov (SP), ACC
mov ACC, (TOS)
jmp _drop2
+one: codeword
+ _dup
+ mov $1, TOS
+ jmp next
+
+
+double: codeword
+ shl TOS
+ jmp next
+
plus: codeword
add TOS, (SP)
jmp _drop
