about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-04-11 01:25:02 -0700
committerKartik Agaram <vc@akkartik.com>2020-05-18 00:44:46 -0700
commit7276847993fde1caedbecaa503c80ba5daf92700 (patch)
tree7845387e0585255bcdb9a71cc654d3ae45969f83
parent27cced79be369784b0130c2cdc042c55c20ab593 (diff)
downloadmu-7276847993fde1caedbecaa503c80ba5daf92700.tar.gz
-
-rw-r--r--apps/mu.subx12
1 files changed, 6 insertions, 6 deletions
diff --git a/apps/mu.subx b/apps/mu.subx
index 307c65e2..5d4eec20 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -7814,7 +7814,7 @@ $translate-mu-length-stmt:emit-output:
     # outputs[0] "/r32"
     8b/-> *(ecx+0xc) 0/r32/eax  # Stmt1-outputs
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (get Registers *(eax+0x10) 8 "Registers")  # Var-register => eax
+    (get Registers *(eax+0x10) 0xc "Registers")  # Var-register => eax
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32\n")
 $translate-mu-length-stmt:end:
@@ -7973,7 +7973,7 @@ $translate-mu-index-stmt-with-array-in-register:emit-output:
     8b/-> *(ebp+0xc) 1/r32/ecx
     8b/-> *(ecx+0xc) 0/r32/eax  # Stmt1-outputs
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (get Registers *(eax+0x10) 8 "Registers")  # Var-register => eax
+    (get Registers *(eax+0x10) 0xc "Registers")  # Var-register => eax
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32\n")
 $translate-mu-index-stmt-with-array-in-register:end:
@@ -8084,7 +8084,7 @@ $translate-mu-index-stmt-with-array-on-stack:emit-output:
     8b/-> *(ebp+0xc) 0/r32/eax
     8b/-> *(eax+0xc) 0/r32/eax  # Stmt1-outputs
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (get Registers *(eax+0x10) 8 "Registers")  # Var-register => eax
+    (get Registers *(eax+0x10) 0xc "Registers")  # Var-register => eax
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32\n")
 $translate-mu-index-stmt-with-array-on-stack:end:
@@ -8129,7 +8129,7 @@ $translate-mu-compute-index-stmt:emit-output:
     # outputs[0] "/r32"
     8b/-> *(ecx+0xc) 0/r32/eax  # Stmt1-outputs
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (get Registers *(eax+0x10) 8 "Registers")  # Var-register => eax
+    (get Registers *(eax+0x10) 0xc "Registers")  # Var-register => eax
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32\n")
 $translate-mu-compute-index-stmt:end:
@@ -8189,7 +8189,7 @@ $translate-mu-get-stmt:emit-output:
     # outputs[0] "/r32"
     8b/-> *(ecx+0xc) 0/r32/eax  # Stmt1-outputs
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (get Registers *(eax+0x10) 8 "Registers")  # Var-register => eax
+    (get Registers *(eax+0x10) 0xc "Registers")  # Var-register => eax
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32\n")
 $translate-mu-get-stmt:end:
@@ -9852,7 +9852,7 @@ emit-subx-r32:  # out: (addr buffered-file), l: arg-location, stmt: (handle stmt
     # var v/eax: (handle var)
     (get-stmt-operand-from-arg-location *(ebp+0x10) *(ebp+0xc))  # => eax
     8b/-> *eax 0/r32/eax  # Stmt-var-value
-    (maybe-get Registers *(eax+0x10) 8)  # Var-register => eax: (addr register-index)
+    (maybe-get Registers *(eax+0x10) 0xc)  # Var-register => eax: (addr register-index)
     (write-buffered *(ebp+8) Space)
     (print-int32-buffered *(ebp+8) *eax)
     (write-buffered *(ebp+8) "/r32")