cl-interpret: add type metadata to tuple variants
This commit is contained in:
parent
d62656c615
commit
e0eb0d5a02
@ -191,6 +191,7 @@ impl Interpret for Enum {
|
|||||||
let cs = Constructor { arity: args.len() as _, name: *name };
|
let cs = Constructor { arity: args.len() as _, name: *name };
|
||||||
let mut variant = scope.frame(name.to_ref());
|
let mut variant = scope.frame(name.to_ref());
|
||||||
variant.insert("call".into(), ConValue::TupleConstructor(cs));
|
variant.insert("call".into(), ConValue::TupleConstructor(cs));
|
||||||
|
variant.insert("__nmemb".into(), ConValue::Int(args.len() as _));
|
||||||
let frame = variant
|
let frame = variant
|
||||||
.pop_values()
|
.pop_values()
|
||||||
.expect("Frame stack should remain balanced.");
|
.expect("Frame stack should remain balanced.");
|
||||||
|
Loading…
x
Reference in New Issue
Block a user