remove IMMEDAITE from quote and literal
authorRalph Ronnquist <ralph.ronnquist@gmail.com>
Mon, 24 May 2021 15:11:31 +0000 (01:11 +1000)
committerRalph Ronnquist <ralph.ronnquist@gmail.com>
Mon, 24 May 2021 15:11:31 +0000 (01:11 +1000)
compile.asm

index 6ddf3a3387b916450ccf72ca5963ca0a75199580..8102cbc813452b24d7ad20f11b64b06c249bbac3 100644 (file)
@@ -46,7 +46,7 @@ p_create_COPY:
        add qword [p_here_DFA],rax
        next
        
-       WORD p_quote,"'",fasm,IMMEDIATE
+       WORD p_quote,"'",fasm
        ;; ( "word" -- cfa )
        ;; Find the following word and push its cfa, or 0
        pushr rsi
@@ -108,7 +108,7 @@ p_quote_end:
        mov qword [rax+8],dodoes
        next
 
-       WORD p_literal,'LIT',fasm,IMMEDIATE
+       WORD p_literal,'LIT',fasm
        ;; ( -- v )
        ;; Push the value of successor cell onto stack, and skip it.
        ;; not for interactive use!!