neauoire
/
drifblim
mirror of https://git.sr.ht/~rabbits/drifblim
1
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fixed wrong definition in lambda

This commit is contained in:
Devine Lu Linvega 2023-07-29 08:54:52 -07:00
parent 4b8eb72d23
commit 253d9ed5e8
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
examples/hello.tal
View File

@ -7,7 +7,6 @@
;hello-word print-str
#010e DEO
#800f DEO
BRK

8
src/drifblim.tal
View File

@ -183,15 +183,15 @@
POP2 JMP2r
@lambda &ptr =memory/lambda
&push ( id -- )
&push ( -- )
[ LIT &count $1 ] INCk ,&count STR
DUP ,&ptr LDR2 INC2k ,&ptr STR2
STA
LIT "0 ADD ,&id STR
;&sym #60 !<write-call>
&pop ( -- id )
,&ptr LDR2 #0001 SUB2 DUP2 ,&ptr STR2
LDA LIT "0 ADD ;&id STA
&pop ( -- )
,&ptr LDR2 #0001 SUB2 LDAk LIT "0 ADD ,&id STR
,&ptr STR2
#6c <write>
;&sym <create-symbol>
#6f !<write>