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

replace (:) with 0 in meta-predicate declarations, remove support for (:) in meta-predicate declarations

Browse Source
This commit is contained in:
Mark Thom
2021-01-31 18:00:10 -07:00
parent fcba33997f
commit 75908ab88f
9 changed files with 90 additions and 97 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/lib/iso_ext.pl
View File

@@ -46,14 +46,14 @@ bb_get(Key, Value) :- atom(Key), !, '$fetch_global_var'(Key, Value).
bb_get(Key, _) :- throw(error(type_error(atom, Key), bb_get/2)).
:- meta_predicate call_cleanup(:, :).
:- meta_predicate call_cleanup(0, 0).
call_cleanup(G, C) :- setup_call_cleanup(true, G, C).
% setup_call_cleanup.
:- meta_predicate setup_call_cleanup(:, :, :).
:- meta_predicate setup_call_cleanup(0, 0, 0).
setup_call_cleanup(S, G, C) :-
'$get_b_value'(B),
@@ -122,7 +122,7 @@ handle_ile(B, E, _) :-
'$remove_call_policy_check'(B),
'$call_with_default_policy'(throw(E)).
:- meta_predicate call_with_inference_limit(:, ?, ?).
:- meta_predicate call_with_inference_limit(0, ?, ?).
call_with_inference_limit(G, L, R) :-
'$get_current_block'(Bb),