From: Ralph Ronnquist Date: Tue, 18 May 2021 14:55:00 +0000 (+1000) Subject: added primities X-Git-Url: https://git.rrq.au/?a=commitdiff_plain;ds=sidebyside;h=bf8a7c713298730826f02c4ece9f4735fcee2e4b;p=rrq%2Frrqforth.git added primities --- diff --git a/stdio.asm b/stdio.asm index 7cf148d..1773da2 100644 --- a/stdio.asm +++ b/stdio.asm @@ -195,3 +195,13 @@ p_emit_buffer: dq 0 popr rsi next + WORD p_nl,'NL',dovalue + ;; ( -- c ) + ;; Pushes a newline character on the stack + dq 10 + + WORD p_sp,'SP',dovalue + ;; ( -- c ) + ;; Pushes a space character on the stack + dq 10 +