From ae32b04764c6f9aa48c65bb6dc6050d211914ccf Mon Sep 17 00:00:00 2001 From: Dimitar Trendafilov Date: Thu, 24 Nov 2022 00:12:56 +0200 Subject: Fix demo program for spasm --- spasm/src/program.spa | 21 +++++++++------------ 1 file changed, 9 insertions(+), 12 deletions(-) (limited to 'spasm/src/program.spa') diff --git a/spasm/src/program.spa b/spasm/src/program.spa index d3149a1..57d777c 100644 --- a/spasm/src/program.spa +++ b/spasm/src/program.spa @@ -1,12 +1,9 @@ -read -label next -dup -push 1 -< -jmpt bye -push 1 -- -dup -print -jmp next -label bye +read 1 +const 2 1 +label next +less 3 1 2 +jmpt 3 bye +sub 1 1 2 +print 1 +jmp next +label bye -- cgit v1.3.1-23-gd82d