add module name and missing predicate key to module_does_not_contain_claimed_export error (#2195)

This commit is contained in:
Mark
2023-12-04 11:19:36 -07:00
parent 6899c6b63c
commit 004201abda

View File

@@ -492,13 +492,22 @@ impl MachineState {
self.permission_error(Permission::Modify, atom!("static_module"), module) self.permission_error(Permission::Modify, atom!("static_module"), module)
} }
SessionError::ExistenceError(err) => self.existence_error(err), SessionError::ExistenceError(err) => self.existence_error(err),
SessionError::ModuleDoesNotContainExport(..) => { SessionError::ModuleDoesNotContainExport(module_name, key) => {
let error_atom = atom!("module_does_not_contain_claimed_export"); let functor_stub = functor_stub(key.0, key.1);
let stub = functor!(
atom!("module_does_not_contain_claimed_export"),
[
atom(module_name),
str(self.heap.len() + 4, 0)
],
[functor_stub]
);
self.permission_error( self.permission_error(
Permission::Access, Permission::Access,
atom!("private_procedure"), atom!("private_procedure"),
functor!(error_atom), stub,
) )
} }
SessionError::ModuleCannotImportSelf(module_name) => { SessionError::ModuleCannotImportSelf(module_name) => {