add module name and missing predicate key to module_does_not_contain_claimed_export error (#2195)
This commit is contained in:
@@ -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) => {
|
||||||
|
|||||||
Reference in New Issue
Block a user