flags etc

This commit is contained in:
Vítor Santos Costa
2015-06-19 01:12:05 +01:00
parent b93f10fe07
commit 0889596e8b
10 changed files with 530 additions and 533 deletions

View File

@@ -88,7 +88,7 @@
'$safe_builtin'(A, M).
'$safe_builtin'(G, Mod) :-
'$flags'(G, Mod, Fl, Fl),
'$predicate_flags'(G, Mod, Fl, Fl),
Fl /\ 0x00008880 =\= 0.
'$vmember'(V,[V1|_]) :- V == V1, !.