diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix warning

Browse Source
This commit is contained in:
Vítor Santos Costa 2015-03-11 22:22:27 +00:00
parent 82d4716339
commit 04ff7f3f2d
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pl/preds.yap
View File

@ -1171,7 +1171,7 @@ current_predicate(A,T) :-
format('`0 ~w~n', [M:T0]), format('`0 ~w~n', [M:T0]),
( (
'$current_predicate'(A, M, T0, Flags), '$current_predicate'(A, M, T0, Flags),
TFlags is Flags /\ 0x00004000, %TFlags is Flags /\ 0x00004000,
% format('1 ~w ~16r~n', [M:T0,Flags, TFlags]), % format('1 ~w ~16r~n', [M:T0,Flags, TFlags]),
Flags /\ 0x00004000 =:= 0x0 Flags /\ 0x00004000 =:= 0x0
; ;