change test framework to use files for in and out (s-exp)
This commit is contained in:
5
test/cases/expressions/assignment.tst
Normal file
5
test/cases/expressions/assignment.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a = 5
|
||||
-- -- --
|
||||
s(:list, [s(:assign,
|
||||
s(:name, "a"),
|
||||
s(:int, 5))])
|
5
test/cases/expressions/assignment_instance.tst
Normal file
5
test/cases/expressions/assignment_instance.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a = 5
|
||||
-- -- --
|
||||
s(:list, [s(:assign,
|
||||
s(:name, "a"),
|
||||
s(:int, 5))])
|
5
test/cases/expressions/op_two_variable.tst
Normal file
5
test/cases/expressions/op_two_variable.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a - b
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "-",
|
||||
s(:name, "a"),
|
||||
s(:name, "b"))])
|
5
test/cases/expressions/op_variable.tst
Normal file
5
test/cases/expressions/op_variable.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a - 5
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "-",
|
||||
s(:name, "a"),
|
||||
s(:int, 5))])
|
5
test/cases/expressions/op_variable_string.tst
Normal file
5
test/cases/expressions/op_variable_string.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a - "st"
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "-",
|
||||
s(:name, "a"),
|
||||
s(:string, "st"))])
|
5
test/cases/expressions/op_variable_true.tst
Normal file
5
test/cases/expressions/op_variable_true.tst
Normal file
@ -0,0 +1,5 @@
|
||||
a == true
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "==",
|
||||
s(:name, "a"),
|
||||
s(:true))])
|
5
test/cases/expressions/simple_devide.tst
Normal file
5
test/cases/expressions/simple_devide.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 / 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "/",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
5
test/cases/expressions/simple_greater.tst
Normal file
5
test/cases/expressions/simple_greater.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 > 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, ">",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
5
test/cases/expressions/simple_minus.tst
Normal file
5
test/cases/expressions/simple_minus.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 - 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "-",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
5
test/cases/expressions/simple_multiply.tst
Normal file
5
test/cases/expressions/simple_multiply.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 * 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "*",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
5
test/cases/expressions/simple_plus.tst
Normal file
5
test/cases/expressions/simple_plus.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 + 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "+",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
5
test/cases/expressions/simple_smaller.tst
Normal file
5
test/cases/expressions/simple_smaller.tst
Normal file
@ -0,0 +1,5 @@
|
||||
5 < 3
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "<",
|
||||
s(:int, 5),
|
||||
s(:int, 3))])
|
7
test/cases/expressions/two_different_ops.tst
Normal file
7
test/cases/expressions/two_different_ops.tst
Normal file
@ -0,0 +1,7 @@
|
||||
2 + 3 * 4
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "+",
|
||||
s(:int, 2),
|
||||
s(:operator, "*",
|
||||
s(:int, 3),
|
||||
s(:int, 4)))])
|
7
test/cases/expressions/two_different_ops_order.tst
Normal file
7
test/cases/expressions/two_different_ops_order.tst
Normal file
@ -0,0 +1,7 @@
|
||||
2 * 3 + 4
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "+",
|
||||
s(:operator, "*",
|
||||
s(:int, 2),
|
||||
s(:int, 3)),
|
||||
s(:int, 4))])
|
7
test/cases/expressions/two_same_ops.tst
Normal file
7
test/cases/expressions/two_same_ops.tst
Normal file
@ -0,0 +1,7 @@
|
||||
2 + 3 + 4
|
||||
-- -- --
|
||||
s(:list, [s(:operator, "+",
|
||||
s(:operator, "+",
|
||||
s(:int, 2),
|
||||
s(:int, 3)),
|
||||
s(:int, 4))])
|
Reference in New Issue
Block a user