catch existence_error exceptions from top-level calls to attribute_goals/3 (#1432)
This commit is contained in:
@@ -32,6 +32,7 @@ call_attribute_goals([Module|Modules], GoalCaller, AttrVars) :-
|
||||
|
||||
'$print_attribute_goals_exception'(Module, E) :-
|
||||
( E = error(evaluation_error((Module:attribute_goals)/3), attribute_goals/3)
|
||||
; E = error(existence_error(procedure, attribute_goals/3), attribute_goals/3)
|
||||
-> true
|
||||
; loader:write_error(E),
|
||||
nl
|
||||
|
||||
Reference in New Issue
Block a user