fixed closeing with strings

This commit is contained in:
Nathan Braswell
2020-04-25 13:05:56 -04:00
parent e74c883132
commit c61b9d3c22
2 changed files with 21 additions and 8 deletions

21
bf.kp
View File

@@ -111,14 +111,27 @@
;(def! inner (fn* [x] (do (throw (+ x 1)) (+ x 2))))
(def! inner (fn* [x] (do (println 7) (+ x 2))))
;(def! inner (fn* [x] (do (println 7) (+ x 2))))
;(def! main (fn* [] (do (println (try*
; (inner 7)
; (catch* exp (+ exp 10))))
; 7)))
(def! main (fn* [] (do (println (try*
(inner 7)))
7)))
;(def! main (fn* [] (do (println (try*
; (inner 7)))
; 7)))
(def! main (fn* [] (let* ( a 7
b "hello" )
(do
(try*
((fn* [] (do (println b) (println "world") a)))
)))))