Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2025-01-13 08:01:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add recurse

Browse source
This commit is contained in:
Koichi Nakamura 2021-01-01 20:11:47 +09:00
parent 2ab5e91e69
commit 26ac565c3b
1 changed files with 4 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
core.fs
View file

@ -674,19 +674,10 @@ alias-builtin xor ^
here @ over - swap ! \ backfill offset from while to here
; immediate
:noname
begin
1
while
[ key A ] literal emit
repeat
; execute
bye
\ === Integer Comparison ===
\ === Recursive Call ===
: recurse
latest @ >cfa ,
; immediate
bye