diff options
author | Eduardo Julian | 2015-04-19 19:50:10 -0400 |
---|---|---|
committer | Eduardo Julian | 2015-04-19 19:50:10 -0400 |
commit | e1df2642c538293f1dfd0faffad72b48a626148a (patch) | |
tree | ba62cd4c50b193a8c147957f7ca6339f16dd1ff3 /src/lux/compiler/case.clj | |
parent | 6676e1bb8e79ed4336b113b573f3b9f9dd8399af (diff) |
- Fixed several bugs in lux.lux
- Fixed an error in lux.base/analyse-2
- Modified the analyser so the symbols that identify all of the special forms must mandatorily have "" as their prefix.
- Fixed a bug in the binary operations at lux.analyser.host wherein the types where being omitted.
- Fixed a bug when closing-over variables inside lambda bodies wherein the names of bindings where being stores as (incomparable) arrays, instead of as (comparable) strings.
Diffstat (limited to 'src/lux/compiler/case.clj')
-rw-r--r-- | src/lux/compiler/case.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lux/compiler/case.clj b/src/lux/compiler/case.clj index 0a24c5953..8f737af20 100644 --- a/src/lux/compiler/case.clj +++ b/src/lux/compiler/case.clj @@ -20,7 +20,7 @@ +oclass+ (&host/->class "java.lang.Object") +equals-sig+ (str "(" (&host/->type-signature "java.lang.Object") ")Z")] (defn ^:private compile-match [writer ?match $target $else] - (prn 'compile-match (aget ?match 0) $target $else) + ;; (prn 'compile-match (aget ?match 0) $target $else) (matchv ::M/objects [?match] [["StoreTestAC" ?idx]] (doto writer |