diff options
Diffstat (limited to 'src/primitives/eval.d')
-rw-r--r-- | src/primitives/eval.d | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/primitives/eval.d b/src/primitives/eval.d index 533f491..d62fdb8 100644 --- a/src/primitives/eval.d +++ b/src/primitives/eval.d @@ -6,6 +6,10 @@ bool evaluate(int value) { return drop_mode; } +bool evaluate(bool value) { + return drop_mode; +} + bool evaluate(string word) { if ( drop_mode ) { switch ( word ) { @@ -47,6 +51,10 @@ bool evaluate(string word) { return unary_op_stack_dup; case "swp": return binary_op_stack_swp; + case "true": + return integral_value_bool(true); + case "false": + return integral_value_bool(false); case "<": return binary_cond_lt; case "=": |