aboutsummaryrefslogtreecommitdiff
path: root/src/primitives.d
blob: 0be6836e4e59930d3d07f8249615693327302f71 (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
module src.primitives;

import std.stdio;

import src.stack;
import src.definition;

int[string] variables;

bool evaluate(string word) {
	switch ( word ) {
		case "§":
			src.definition.start;
			return true;
		case "$":
			string name  = stack.pop.get!string;
			int    value = stack.pop.get!int;

			variables[name] = value;
			return true;
		case "@":
			string name = stack.pop.get!string;

			if ( name in variables ) {
				stack.push(variables[name]);
			}
			return true;
		case "+":
			int b = stack.pop.get!int;
			int a = stack.pop.get!int;

			stack.push(a + b);
			return true;
		case "*":
			int b = stack.pop.get!int;
			int a = stack.pop.get!int;

			stack.push(a * b);
			return true;
		case "/":
			int b = stack.pop.get!int;
			int a = stack.pop.get!int;

			if ( b == 0 ) {
				throw new Exception("division by 0 undefined");
			} else {
				stack.push(a / b);
			}
			return true;
		case "%":
			int b = stack.pop.get!int;
			int a = stack.pop.get!int;

			if ( b == 0 ) {
				throw new Exception("modulo 0 undefined");
			} else {
				stack.push(a % b);
			}
			return true;
		case ".":
			stack.pop;
			return true;
		case "'":
			writeln(stack.top);
			return true;
		default:
			return false;
	}
}