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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
package vm_test
import (
"jinx/pkg/lang/vm"
"jinx/pkg/lang/vm/code"
"jinx/pkg/lang/vm/text"
"strings"
"testing"
"github.com/stretchr/testify/require"
)
func TestSimpleSub(t *testing.T) {
src := `
push_int 1
push_int 2
sub
`
test(t, src, "1")
}
func TestGetLocal(t *testing.T) {
src := `
push_int 404
push_int 1
push_int 2
add
get_local 1
`
test(t, src, "3")
}
func TestFibonacci(t *testing.T) {
src := `
# Array stored in local 0
push_array
push_int 1
get_local 0
temp_arr_push
push_int 1
get_local 0
temp_arr_push
@fib_loop:
push_int 1
get_local 0
temp_arr_len
# Index of the last element stored in local 1
sub
# This is the last element
get_local 1
get_local 0
# Store the last element in local 2
index
push_int 1
get_local 1
# Index of the second last element stored in local 2
sub
get_local 0
# Store the second last element in local 3
index
add
get_local 0
temp_arr_push
# Drop local 1, which was the length of the array, which we no longer need
drop
push_int 10
get_local 0
temp_arr_len
# Jump if the array is larger than 10.
lte
jt @fib_loop
`
test(t, src, "[1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89]")
}
func TestFunction(t *testing.T) {
src := `
push_int 44
push_function @subtract_two
call
halt
@subtract_two:
shift 1
push_int 2
get_local 0
sub
ret
`
test(t, src, "42")
}
func test(t *testing.T, src string, expected string) {
bc := compile(t, src)
vm := vm.New(&bc)
err := vm.Run()
require.NoError(t, err)
res, err := vm.GetResult()
require.NoError(t, err)
require.Equal(t, expected, res)
}
func compile(t *testing.T, src string) code.Code {
comp := text.NewCompiler(strings.NewReader(src))
bc, err := comp.Compile()
require.NoErrorf(t, err, "compilation from text format failed: %s", err)
return bc
}
|
