fix syntax error (thanks zzo38)
This commit is contained in:
parent
21878c3a78
commit
90a82691f2
|
@ -178,7 +178,7 @@
|
|||
#00 OVR STZ ( d^ s^ [-c^] ; s<-0 )
|
||||
#01 SUB SWP INC SWP ( d+1^ s-1^ [-c^] )
|
||||
INCr !&loop ( d+1^ s-1^ [-c+1^] )
|
||||
&done POPr SWP ( s^ d^)
|
||||
&done POPr SWP ( s^ d^ )
|
||||
OVR LDZ #bf AND SWP STZ ( s^ ; d<-s )
|
||||
#00 OVR STZ ( s^ ; s<-0 )
|
||||
#01 SUB JMP2r ( s-1^ )
|
||||
|
|
Loading…
Reference in New Issue