diff options
author | Adrian Kummerlaender | 2017-04-12 16:58:18 +0200 |
---|---|---|
committer | Adrian Kummerlaender | 2017-04-12 17:24:09 +0200 |
commit | 4804893a6616a312ac8028e42d2aa990018ffbe6 (patch) | |
tree | 7eabf5638dd29580dae9c0197804b739301885a9 /src/primitives/eval.d | |
parent | 900c223ed40e36ffedce95e9a987d9a3c0309271 (diff) | |
download | slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar.gz slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar.bz2 slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar.lz slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar.xz slang-4804893a6616a312ac8028e42d2aa990018ffbe6.tar.zst slang-4804893a6616a312ac8028e42d2aa990018ffbe6.zip |
Modularize primitives implementation, add stack manipulators
Diffstat (limited to 'src/primitives/eval.d')
-rw-r--r-- | src/primitives/eval.d | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/src/primitives/eval.d b/src/primitives/eval.d new file mode 100644 index 0000000..3f91e80 --- /dev/null +++ b/src/primitives/eval.d @@ -0,0 +1,48 @@ +module src.primitives.eval; + +import src.primitives.impl; + +bool evaluate(int value) { + return drop_mode; +} + +bool evaluate(string word) { + if ( drop_mode ) { + if ( word == "then" ) { + return conditional_end; + } else { + return true; + } + } + + switch ( word ) { + case "ยง": + return definition_start; + case "$": + return binary_op_variable_bind; + case "@": + return unary_op_variable_resolve; + case "if": + return conditional_start; + case "then": + return conditional_end; + case "+": + return binary_op_add; + case "*": + return binary_op_multiply; + case "/": + return binary_op_divide; + case "%": + return binary_op_modulo; + case ".": + return unary_op_io_print; + case "pop": + return unary_op_stack_pop; + case "dup": + return unary_op_stack_dup; + case "swp": + return binary_op_stack_swp; + default: + return false; + } +} |