miloignis/kraken
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Clean up and rearrange

Browse Source
This commit is contained in:
Nathan Braswell
2022-05-07 16:09:16 -04:00
parent 08c01257f3
commit ca68826fbc
52 changed files with 577 additions and 344 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
misc_tests/t.kp Normal file
View File

@@ -0,0 +1,15 @@
((wrap (vau root_env (quote)
((wrap (vau (let1)
(array 'write 1 "enter form: " (vau (written code)
(array 'read 0 200 (vau (data code)
((wrap (vau (asdf) (array 'exit (log (eval (log (read-string data))))))) code)
;((wrap (vau (asdf) (array 'exit (eval (read-string data))))) code)
;((wrap (vau (asdf) (array 'exit (cond (log "hi") written true code)))) code)
))
))
)) (vau de (s v b) (eval (array (array wrap (array vau (array s) b)) v) de)))
)) (vau (x5) x5))