Notes to selves
This commit is contained in:
parent
3f0feab83b
commit
a4c5927ec4
|
@ -47,6 +47,7 @@
|
|||
(merge ctx new-ctx))
|
||||
|
||||
;; TODO: get "if let" pattern working
|
||||
;; TODO: get typed exceptions to distinguish panics
|
||||
(defn- interpret-let [ast ctx]
|
||||
(let [pattern (:pattern ast)
|
||||
expr (:expr ast)
|
||||
|
@ -101,6 +102,8 @@
|
|||
|
||||
;; note that the runtime representations of collections is
|
||||
;; unboxed in the tree-walk interpreter
|
||||
;; tuples & lists are both vectors, the first element
|
||||
;; distinguishes them
|
||||
::ast/tuple
|
||||
(let [members (:members ast)]
|
||||
(into [::colls/tuple] (map #(interpret % ctx)) members))
|
||||
|
|
Loading…
Reference in New Issue
Block a user