Add boolean operators

[fur] / templates / program.c

diff --git a/templates/program.c b/templates/program.c
index 58ddd36..1d283be 100644 (file)
--- a/templates/program.c
+++ b/templates/program.c
@@ -327,6 +327,15 @@ Object builtin$and(Object left, Object right)
   return result;
 }
 
+Object builtin$or(Object left, Object right)
+{
+  assert(left.type == BOOLEAN);
+  assert(right.type == BOOLEAN);
+
+  Object result = { BOOLEAN, left.instance.boolean || right.instance.boolean };
+  return result;
+}
+
 {% if 'pow' in builtins %}
 Object builtin$pow(Object base, Object exponent)
 {