correct conformity errors

This commit is contained in:
Mark Thom
2018-09-16 14:11:21 -06:00
parent 908b0a5712
commit f226cb3dbd
11 changed files with 135 additions and 61 deletions

View File

@@ -675,7 +675,7 @@ pub(crate) trait CallPolicy: Any {
stub));
},
ClauseType::System(_) => {
let name = Addr::Con(Constant::Atom(name));
let name = Addr::Con(Constant::Atom(name, None));
let stub = MachineError::functor_stub(clause_name!("call"), arity + 1);
return Err(machine_st.error_form(MachineError::type_error(ValidType::Callable,