diff options
-rw-r--r-- | source/primitives/core.d | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/source/primitives/core.d b/source/primitives/core.d index ce3eee2..971f495 100644 --- a/source/primitives/core.d +++ b/source/primitives/core.d @@ -31,6 +31,7 @@ bool handle(string word) { case "false" : nullary_op_value_bool(false); break; case "<" : binary_cond_lt; break; case "=" : binary_cond_eq; break; + case "#" : debug_print_stack; break; default : return false; } @@ -130,4 +131,8 @@ void binary_cond_eq() { stack.push(a == b); } +void debug_print_stack() { + writeln(stack[]); +} + } |