blob: 9565c655e9db0c192e2302db3a200f6d27a8291e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
module machine;
import std.string;
import std.variant;
import std.stdio : writeln;
import std.container.util : make;
import state.stack;
import definition = state.definition;
import variable = state.variable;
import core = primitives.core;
import conditional = primitives.conditional;
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 ( definition.handle(token) ) {
return Stack!Token();
}
if ( conditional.handle(token) ) {
if ( conditional.dischargeable ) {
return conditional.discharge;
} else {
return Stack!Token();
}
}
if ( variable.handle(token) ) {
return Stack!Token();
}
if ( core.handle(token) ) {
return Stack!Token();
}
return token.visit!(
(int ) => Stack!Token(token),
(bool ) => Stack!Token(token),
(string word) => definition.get(word),
(DList!int ) => Stack!Token(token)
);
}
catch (Exception ex) {
writeln("Error: ", ex.msg);
return Stack!Token();
}
}
}
|