about summary refs log tree commit diff stats
path: root/apps/braces.subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2019-10-25 05:54:06 -0700
committerKartik Agaram <vc@akkartik.com>2019-10-25 06:10:36 -0700
commitf0b7e327c5e612ea2f72f2e41c046a2105076654 (patch)
treeb598dfdfb31a748634302b6f336aebd356fe372d /apps/braces.subx
parent76599bb813970f09ddd27d476f5b62be9bf97d4d (diff)
downloadmu-f0b7e327c5e612ea2f72f2e41c046a2105076654.tar.gz
5714
Replace calculations of constants with labels.
Diffstat (limited to 'apps/braces.subx')
-rw-r--r--apps/braces.subx30
1 files changed, 6 insertions, 24 deletions
diff --git a/apps/braces.subx b/apps/braces.subx
index 69e62c2c..aaae30e5 100644
--- a/apps/braces.subx
+++ b/apps/braces.subx
@@ -263,14 +263,8 @@ test-subx-braces-passes-most-words-through:
     # setup
     (clear-stream _test-input-stream)
     (clear-stream _test-output-stream)
-    # . clear-stream(_test-input-buffered-file+4)
-    b8/copy-to-eax  _test-input-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
-    # . clear-stream(_test-output-buffered-file+4)
-    b8/copy-to-eax  _test-output-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
+    (clear-stream _test-input-buffered-file->buffer)
+    (clear-stream _test-output-buffered-file->buffer)
     # test
     (write _test-input-stream "== abcd 0x1")
     (subx-braces _test-input-buffered-file _test-output-buffered-file)
@@ -306,14 +300,8 @@ test-subx-braces-1:
     # setup
     (clear-stream _test-input-stream)
     (clear-stream _test-output-stream)
-    # . clear-stream(_test-input-buffered-file+4)
-    b8/copy-to-eax  _test-input-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
-    # . clear-stream(_test-output-buffered-file+4)
-    b8/copy-to-eax  _test-output-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
+    (clear-stream _test-input-buffered-file->buffer)
+    (clear-stream _test-output-buffered-file->buffer)
     # test
     (write _test-input-stream "{\nab break/imm32\ncd loop/imm32\n}")
     (subx-braces _test-input-buffered-file _test-output-buffered-file)
@@ -353,14 +341,8 @@ test-subx-braces-2:
     # setup
     (clear-stream _test-input-stream)
     (clear-stream _test-output-stream)
-    # . clear-stream(_test-input-buffered-file+4)
-    b8/copy-to-eax  _test-input-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
-    # . clear-stream(_test-output-buffered-file+4)
-    b8/copy-to-eax  _test-output-buffered-file/imm32
-    05/add-to-eax  4/imm32
-    (clear-stream %eax)
+    (clear-stream _test-input-buffered-file->buffer)
+    (clear-stream _test-output-buffered-file->buffer)
     # test
     (write _test-input-stream "{\n{\nab break/imm32\n}\ncd loop/imm32\n}")
     (subx-braces _test-input-buffered-file _test-output-buffered-file)