diff options
| -rw-r--r-- | 305keyboard.subx | 4 | ||||
| -rw-r--r-- | 400.mu | 2 | ||||
| -rw-r--r-- | apps/arith.mu | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/305keyboard.subx b/305keyboard.subx index 5c05be6b..bac7a431 100644 --- a/305keyboard.subx +++ b/305keyboard.subx @@ -119,7 +119,7 @@ $enable-keyboard-type-mode:end: 5d/pop-to-ebp c3/return -read-key: # -> result/eax: byte +read-key-from-real-keyboard: # -> result/eax: byte # . prologue 55/push-ebp 89/<- %ebp 4/r32/esp @@ -134,7 +134,7 @@ read-key: # -> result/eax: byte # (read 2 %ecx) # => eax 8b/-> *(ecx+0xc) 0/r32/eax -$read-key:end: +$read-key-from-real-keyboard:end: # . reclaim locals 81 0/subop/add %esp 0x10/imm32 # . restore registers diff --git a/400.mu b/400.mu index ab41fc5b..57032f0b 100644 --- a/400.mu +++ b/400.mu @@ -158,7 +158,7 @@ sig hide-cursor-on-real-screen sig show-cursor-on-real-screen sig enable-keyboard-immediate-mode sig enable-keyboard-type-mode -sig read-key -> result/eax: byte +sig read-key-from-real-keyboard -> result/eax: byte sig open filename: (addr array byte), write?: boolean, out: (addr handle buffered-file) sig populate-buffered-file-containing contents: (addr array byte), out: (addr handle buffered-file) sig new-buffered-file out: (addr handle buffered-file) diff --git a/apps/arith.mu b/apps/arith.mu index fdf97213..46341157 100644 --- a/apps/arith.mu +++ b/apps/arith.mu @@ -243,7 +243,7 @@ fn skip-spaces _look: byte -> look/esi: byte { } fn get-char -> look/esi: byte { - var tmp/eax: byte <- read-key + var tmp/eax: byte <- read-key-from-real-keyboard look <- copy tmp compare look, 0 { |