aboutsummaryrefslogtreecommitdiff
path: root/src/primitives/impl.d
diff options
context:
space:
mode:
Diffstat (limited to 'src/primitives/impl.d')
-rw-r--r--src/primitives/impl.d16
1 files changed, 16 insertions, 0 deletions
diff --git a/src/primitives/impl.d b/src/primitives/impl.d
index 4ec9019..56ea4ce 100644
--- a/src/primitives/impl.d
+++ b/src/primitives/impl.d
@@ -117,3 +117,19 @@ bool binary_op_stack_swp() {
return true;
}
+
+bool binary_cond_lt() {
+ int b = stack.pop.get!int;
+ int a = stack.pop.get!int;
+
+ stack.push(a < b);
+ return true;
+}
+
+bool binary_cond_eq() {
+ int b = stack.pop.get!int;
+ int a = stack.pop.get!int;
+
+ stack.push(a == b);
+ return true;
+}