repl comment

This commit is contained in:
Scott Richmond 2024-06-24 12:57:09 -04:00
parent faf15bfd75
commit 4d1122fa58

View File

@ -55,25 +55,19 @@
# (do
(def start (os/clock))
(def source `
repeat 100 {
repeat 100 {
fd! (1)
rt! (inv (100))
}
rt! (inv (100))
}
at ("aéc", 3)
`)
(def out (-> source
ludus
# j/decode
j/decode
))
(def end (os/clock))
(setdyn :out stdout)
(pp out)
# (def console (out "console"))
# (print console)
# (def result (out "result"))
# (print result)
(def console (out "console"))
(print console)
(def result (out "result"))
(print result)
(print (- end start))
)