summaryrefslogtreecommitdiff
path: root/encoding/json/+test/test_value.ha
blob: eca7dcf130a5c64dc292b46149d847e8e986a1ef (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
// License: MPL-2.0
// (c) 2022 Drew DeVault <sir@cmpwn.com>

@test fn object() void = {
	let obj = newobject();
	defer finish(obj);

	set(&obj, "hello", "world");
	set(&obj, "foo", "bar");
	set(&obj, "the answer", 42.0);

	// XXX: Match overhaul?
	assert(*(get(&obj, "hello") as *value) as str == "world");
	assert(*(get(&obj, "foo") as *value) as str == "bar");
	assert(*(get(&obj, "the answer") as *value) as f64 == 42.0);
	assert(get(&obj, "nonexistent") is void);

	del(&obj, "hello");
	assert(get(&obj, "hello") is void);
};

@test fn iterator() void = {
	let obj = newobject();
	defer finish(obj);

	set(&obj, "hello", "world");
	set(&obj, "foo", "bar");
	set(&obj, "the answer", 42.0);

	let it = iter(&obj);
	assert(next(&it) is (const str, const *value));
	assert(next(&it) is (const str, const *value));
	assert(next(&it) is (const str, const *value));
	assert(next(&it) is void);
};

@test fn equal() void = {
	let a = newobject();
	defer finish(a);
	set(&a, "a", 42.0);
	set(&a, "A", "hello");

	let b = newobject();
	defer finish(b);
	set(&b, "A", "hello");
	set(&b, "a", 42.0);

	assert(equal(a, b));
};