Clearly separate handling of core, conditional and definition primitives

1 files changed, 23 insertions, 1 deletions

diff --git a/source/primitives/core.d b/source/primitives/core.d
index 07ed0c7..f2766d2 100644
--- a/source/primitives/core.d
+++ b/source/primitives/core.d
@@ -6,6 +6,28 @@ import base.stack;
 
 Token[string] variables;
 
+bool handle(string word) {
+	switch ( word ) {
+		case     "$"     : binary_op_variable_bind;      break;
+		case     "@"     : unary_op_variable_resolve;    break;
+		case     "+"     : binary_op_add;                break;
+		case     "*"     : binary_op_multiply;           break;
+		case     "/"     : binary_op_divide;             break;
+		case     "%"     : binary_op_modulo;             break;
+		case     "."     : unary_op_io_print;            break;
+		case     "pop"   : unary_op_stack_pop;           break;
+		case     "dup"   : unary_op_stack_dup;           break;
+		case     "swp"   : binary_op_stack_swp;          break;
+		case     "true"  : nullary_op_value_bool(true);  break;
+		case     "false" : nullary_op_value_bool(false); break;
+		case     "<"     : binary_cond_lt;               break;
+		case     "="     : binary_cond_eq;               break;
+		default          : return false;
+	}
+
+	return true;
+}
+
 void binary_op_variable_bind() {
 	string name     = stack.pop.get!string;
 	Token  value    = stack.pop;
@@ -91,6 +113,6 @@ void binary_cond_eq() {
 	stack.push(a == b);
 }
 
-void integral_value_bool(bool value) {
+void nullary_op_value_bool(bool value) {
 	stack.push(Token(value));
 }