mknil builtins
This commit is contained in:
@@ -866,8 +866,14 @@ impl BuiltinCosts {
|
||||
.cpu
|
||||
.cost(args[0].to_ex_mem(), args[1].to_ex_mem()),
|
||||
},
|
||||
DefaultFunction::MkNilData => todo!(),
|
||||
DefaultFunction::MkNilPairData => todo!(),
|
||||
DefaultFunction::MkNilData => ExBudget {
|
||||
mem: self.mk_nil_data.mem.cost(args[0].to_ex_mem()),
|
||||
cpu: self.mk_nil_data.cpu.cost(args[0].to_ex_mem()),
|
||||
},
|
||||
DefaultFunction::MkNilPairData => ExBudget {
|
||||
mem: self.mk_nil_pair_data.mem.cost(args[0].to_ex_mem()),
|
||||
cpu: self.mk_nil_pair_data.cpu.cost(args[0].to_ex_mem()),
|
||||
},
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -128,8 +128,8 @@ impl DefaultFunction {
|
||||
DefaultFunction::EqualsData => 2,
|
||||
DefaultFunction::SerialiseData => todo!(),
|
||||
DefaultFunction::MkPairData => 2,
|
||||
DefaultFunction::MkNilData => todo!(),
|
||||
DefaultFunction::MkNilPairData => todo!(),
|
||||
DefaultFunction::MkNilData => 1,
|
||||
DefaultFunction::MkNilPairData => 1,
|
||||
}
|
||||
}
|
||||
|
||||
@@ -187,8 +187,8 @@ impl DefaultFunction {
|
||||
DefaultFunction::EqualsData => 0,
|
||||
DefaultFunction::SerialiseData => todo!(),
|
||||
DefaultFunction::MkPairData => 0,
|
||||
DefaultFunction::MkNilData => todo!(),
|
||||
DefaultFunction::MkNilPairData => todo!(),
|
||||
DefaultFunction::MkNilData => 0,
|
||||
DefaultFunction::MkNilPairData => 0,
|
||||
}
|
||||
}
|
||||
|
||||
@@ -290,8 +290,8 @@ impl DefaultFunction {
|
||||
DefaultFunction::EqualsData => arg.expect_type(Type::Data),
|
||||
DefaultFunction::SerialiseData => todo!(),
|
||||
DefaultFunction::MkPairData => arg.expect_type(Type::Data),
|
||||
DefaultFunction::MkNilData => todo!(),
|
||||
DefaultFunction::MkNilPairData => todo!(),
|
||||
DefaultFunction::MkNilData => arg.expect_type(Type::Unit),
|
||||
DefaultFunction::MkNilPairData => arg.expect_type(Type::Unit),
|
||||
}
|
||||
}
|
||||
|
||||
@@ -716,8 +716,11 @@ impl DefaultFunction {
|
||||
}
|
||||
_ => unreachable!(),
|
||||
},
|
||||
DefaultFunction::MkNilData => todo!(),
|
||||
DefaultFunction::MkNilPairData => todo!(),
|
||||
DefaultFunction::MkNilData => Ok(Value::Con(Constant::ProtoList(Type::Data, vec![]))),
|
||||
DefaultFunction::MkNilPairData => Ok(Value::Con(Constant::ProtoList(
|
||||
Type::Pair(Box::new(Type::Data), Box::new(Type::Data)),
|
||||
vec![],
|
||||
))),
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user