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
|
import TestPilot from require 'spec.test_setup'
import T, Struct, Array, Constant from require 'alv'
describe "literal", ->
TestPilot '
(def str "hello"
num 2
bool true
curl {"a" 2 "b" false}
sqre [1 2 3 4])
(export*)'
assert.is.true COPILOT.active_module.root\is_const!
scope = (assert COPILOT.active_module.root.result)\unwrap T.scope
it "string is parsed and returned correctly", ->
assert.is.equal (Constant.str 'hello'), (scope\get 'str')\const!
it "number is parsed and returned correctly", ->
assert.is.equal (Constant.num 2), (scope\get 'num')\const!
it "boolean is parsed and returned correctly", ->
assert.is.equal (Constant.bool true), (scope\get 'bool')\const!
it "struct is parsed and returned correctly", ->
struct = (scope\get 'curl')\const!
assert.is.equal (Struct a: T.num, b: T.bool), struct.type
assert.is.same { a: 2, b: false }, struct!
it "array is parsed and returned correctly", ->
array = (scope\get 'sqre')\const!
assert.is.equal (Array 4, T.num), array.type
assert.is.same {1, 2, 3, 4}, array!
|
