Fix bug in interface of parse_number

[rrq/jonasforth.git] / main.asm

diff --git a/main.asm b/main.asm
index d2cd54deb29e91c65f5d366d344aba29911eba39..e6b0ac280cfc359bbad93881900df086e3e0379e 100644 (file)
--- a/main.asm
+++ b/main.asm
@@ -198,8 +198,8 @@ forth_asm READ_WORD, 'READ-WORD'
 ;; Takes a string on the stack and replaces it with the decimal number that the
 ;; string represents.
 forth_asm PARSE_NUMBER, 'PARSE-NUMBER'
-  pop [parse_number.length]     ; Length
-  pop [parse_number.buffer]     ; String pointer
+  pop rcx     ; Length
+  pop rdi     ; String pointer
 
   push rsi
   call parse_number