rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

correct error catching in call_verify_attributes/4

Browse Source
This commit is contained in:
Mark Thom
2019-02-09 14:21:58 -07:00
parent 197d079281
commit 938ec60379
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/prolog/machine/attributed_variables.pl
View File

@@ -15,8 +15,8 @@ call_verify_attributes(Attrs, _, _, []) :-
call_verify_attributes([Attr|Attrs], Var, Value, [Goals|ListOfGoalLists]) :- call_verify_attributes([Attr|Attrs], Var, Value, [Goals|ListOfGoalLists]) :-
'$module_of'(M, Attr), % write the owning module Attr to M. '$module_of'(M, Attr), % write the owning module Attr to M.
catch(M:verify_attributes(Var, Value, Goals), catch(M:verify_attributes(Var, Value, Goals),
error(evaluation_error((M:verify_attributes)/3), call_verify_attributes/3), error(evaluation_error((M:verify_attributes)/3), verify_attributes/3),
true), Goals = []),
call_verify_attributes(Attrs, Var, Value, ListOfGoalLists). call_verify_attributes(Attrs, Var, Value, ListOfGoalLists).
call_goals([ListOfGoalLists | ListsCubed]) :- call_goals([ListOfGoalLists | ListsCubed]) :-