aboutsummaryrefslogtreecommitdiff
path: root/cljcc-compiler/src/cljcc/token.clj
diff options
context:
space:
mode:
Diffstat (limited to 'cljcc-compiler/src/cljcc/token.clj')
-rw-r--r--cljcc-compiler/src/cljcc/token.clj3
1 files changed, 2 insertions, 1 deletions
diff --git a/cljcc-compiler/src/cljcc/token.clj b/cljcc-compiler/src/cljcc/token.clj
index 213588c..f13386c 100644
--- a/cljcc-compiler/src/cljcc/token.clj
+++ b/cljcc-compiler/src/cljcc/token.clj
@@ -86,6 +86,7 @@
"Binary operands and their precedence."
{:multiply 100
:divide 100
+ :divide-double 100
:remainder 100
:plus 90
@@ -227,7 +228,7 @@
:literal literal}))
(def tacky-unary-ops
- #{:bit-not :negate :logical-not})
+ #{:bit-not :negate :logical-not :shr})
(def tacky-binary-ops
#{:add