# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1288314324 14400
# Node ID 4e4ecbca0b5dce407f1121831225082b8876b320
# Parent  7361d70fbba69c42faaf07c089080741394daff5
Add bitwise and and or

diff -r 7361d70fbba6 -r 4e4ecbca0b5d cbackend_c.rhope
--- a/cbackend_c.rhope	Thu Oct 28 21:04:44 2010 -0400
+++ b/cbackend_c.rhope	Thu Oct 28 21:05:24 2010 -0400
@@ -501,6 +501,16 @@
 	out <- [func]Add Operator Statement[source1,source2,dest," >> "]
 }
 
+BitAnd@C Function[func,source1,source2,dest:out]
+{
+	out <- [func]Add Operator Statement[source1,source2,dest," & "]
+}
+
+BitOr@C Function[func,source1,source2,dest:out]
+{
+	out <- [func]Add Operator Statement[source1,source2,dest," | "]
+}
+
 CompLess@C Function[func,source1,source2,dest:out]
 {
 	out <- [func]Add Operator Statement[source1,source2,dest," < "]
@@ -634,6 +644,7 @@
 
 
 
+
 Set Field Null@C Function[func,var,field:out]
 {
 	out <- [func]Add Statement[ [[func]Field Result[var,field]]Append[" = NULL"] ]