zaphar/ucg
1
0
Fork 0
mirror of https://github.com/zaphar/ucg.git synced 2025-07-25 18:49:50 -04:00
Code Issues Packages Projects Releases Wiki Activity

TESTS: Expresions as field values in lists and tuples.

Browse Source
This commit is contained in:
Jeremy Wall 2019-06-30 17:51:54 -05:00
parent c6037f6ea7
commit 04480663e8
1 changed files with 33 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
src/build/opcode/test.rs
View File

@ -93,6 +93,18 @@ fn test_list_ops() {
vec![InitList, Val(Int(2)), Element, Val(Int(1)), Element], vec![InitList, Val(Int(2)), Element, Val(Int(1)), Element],
C(List(vec![P(Int(2)), P(Int(1))])), C(List(vec![P(Int(2)), P(Int(1))])),
), ),
(
vec![
InitList,
Val(Int(1)),
Element,
Val(Int(1)),
Val(Int(1)),
Add,
Element,
],
C(List(vec![P(Int(1)), P(Int(2))])),
),
]; ];
for case in cases.drain(0..) { for case in cases.drain(0..) {
let mut vm = VM::new(case.0); let mut vm = VM::new(case.0);
@ -143,6 +155,27 @@ fn test_tuple_ops() {
("foo".to_owned(), P(Int(2))), ("foo".to_owned(), P(Int(2))),
])), ])),
), ),
(
vec![
InitTuple,
Sym("bar".to_owned()),
Val(Str("ux".to_owned())),
Val(Str("qu".to_owned())),
Add,
FIELD,
Val(Str("foo".to_owned())),
Val(Int(1)),
FIELD,
Cp,
Val(Str("foo".to_owned())),
Val(Int(2)),
FIELD,
],
C(Tuple(vec![
("bar".to_owned(), P(Str("quux".to_owned()))),
("foo".to_owned(), P(Int(2))),
])),
),
]; ];
for case in cases.drain(0..) { for case in cases.drain(0..) {
let mut vm = VM::new(case.0); let mut vm = VM::new(case.0);