complete draft of base

This commit is contained in:
Scott Richmond 2024-06-04 16:24:54 -04:00
parent a25ece5a68
commit 6cc7f045a2
2 changed files with 6 additions and 10 deletions

View File

@ -209,10 +209,8 @@
"set!" set! "set!" set!
}) })
(comment (def base (let [b @{}]
Used in current prelude but not yet in base: (each [k v] (pairs ctx)
(set (b (keyword k)) v))
into/2 (table/to-struct b)))
to_dict
)

View File

@ -633,10 +633,8 @@
(do (do
(set source ` (set source `
fn foo fn myadd (x, y) -> add (x, y)
fn bar () -> foo () myadd (1, _) (2)
fn foo () -> :foo
bar ()
`) `)
(def result (run)) (def result (run))
(b/show result) (b/show result)