diff options
author | Kartik Agaram <vc@akkartik.com> | 2019-10-17 21:59:51 -0700 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2019-10-17 21:59:51 -0700 |
commit | 540974343290cb9ac0cf55b999447bf563928612 (patch) | |
tree | f8ed3420cbe796ee672e207543c80b2b85350fb9 /apps/crenshaw2-1b.subx | |
parent | 5a7f919dfabc8ac721cb7ac5383c97e24d828736 (diff) | |
download | mu-540974343290cb9ac0cf55b999447bf563928612.tar.gz |
5700
Diffstat (limited to 'apps/crenshaw2-1b.subx')
-rw-r--r-- | apps/crenshaw2-1b.subx | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/apps/crenshaw2-1b.subx b/apps/crenshaw2-1b.subx index 2a321281..11115b24 100644 --- a/apps/crenshaw2-1b.subx +++ b/apps/crenshaw2-1b.subx @@ -90,7 +90,7 @@ $main:end: cd/syscall 0x80/imm8 # the main entry point -compile: # in : (address buffered-file), out : fd or (address stream), err : fd or (address stream), ed : (address exit-descriptor) -> <void> +compile: # in : (address buffered-file), out : fd or (address stream), err : fd or (address stream), ed : (address exit-descriptor) # . prologue 55/push-ebp 89/copy 3/mod/direct 5/rm32/ebp . . . 4/r32/esp . . # copy esp to ebp @@ -191,7 +191,7 @@ $compile:end: # no space in 'out'. # Input comes from the global variable 'Look' (first byte) and the argument # 'in' (rest). We leave the next byte from 'in' into 'Look' on exit. -get-num: # in : (address buffered-file), out : (address stream), err : fd or (address stream), ed : (address exit-descriptor) -> <void> +get-num: # in : (address buffered-file), out : (address stream), err : fd or (address stream), ed : (address exit-descriptor) # pseudocode: # if (!is-digit?(Look)) expected(ed, err, "integer") # do @@ -672,7 +672,7 @@ test-get-num-reads-multiple-digits-followed-by-nondigit: ## helpers # write(f, "Error: "+s+" expected\n") then stop(ed, 1) -expected: # ed : (address exit-descriptor), f : fd or (address stream), s : (address array byte) -> <void> +expected: # ed : (address exit-descriptor), f : fd or (address stream), s : (address array byte) # . prologue 55/push-ebp 89/copy 3/mod/direct 5/rm32/ebp . . . 4/r32/esp . . # copy esp to ebp @@ -714,7 +714,7 @@ $expected:dead-end: c3/return # read a byte from 'f', and save it in 'Look' -get-char: # f : (address buffered-file) -> <void> +get-char: # f : (address buffered-file) # . prologue 55/push-ebp 89/copy 3/mod/direct 5/rm32/ebp . . . 4/r32/esp . . # copy esp to ebp |