diff options
Diffstat (limited to 'source/machine.d')
-rw-r--r-- | source/machine.d | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/source/machine.d b/source/machine.d new file mode 100644 index 0000000..61d20cb --- /dev/null +++ b/source/machine.d @@ -0,0 +1,52 @@ +module machine; + +import std.string; +import std.variant; + +import std.stdio : writeln; +import std.container.util : make; + +import definition = base.definition; +import primitives = primitives.eval; + +import base.stack; + +void process(string value) { + auto buffer = make!(Stack!Token)(toToken(value)); + + do { + Token current = buffer.pop; + Stack!Token result = evaluate(current); + + if ( !result.empty ) { + if ( result.front == current ) { + stack.push(current); + } else { + buffer.push(result); + } + } + } + while ( !buffer.empty ); +} + +private { + +Stack!Token evaluate(Token token) { + try { + if ( primitives.evaluate(token) ) { + return primitives.result; + } else { + return token.visit!( + (int value) => Stack!Token(Token(value)), + (bool value) => Stack!Token(Token(value)), + (string word ) => definition.get(word) + ); + } + } + catch (Exception ex) { + writeln("Error: ", ex.msg); + return Stack!Token(); + } +} + +} |