Implement bitwise primitives

compiler/src/l3/CPSValueRepresenter.scala

@@ -53,6 +53,17 @@ object CPSValueRepresenter extends (H.Tree => L.Tree) {
           }
         }
 
+      case L3.IntBitwiseAnd =>
+        L.LetP(n, CPS.And, Seq(rewrite(x), rewrite(y)), apply(body))
+
+      case L3.IntBitwiseOr =>
+        L.LetP(n, CPS.Or, Seq(rewrite(x), rewrite(y)), apply(body))
+
+      case L3.IntBitwiseXOr =>
+        tempLetP(CPS.XOr, Seq(Left(x), lAtomOne)) { x1 =>
+          L.LetP(n, CPS.XOr, Seq(x1, rewrite(y)), apply(body))
+        }
+
     }
   }