avoid hiding without reason

This commit is contained in:
Vítor Santos Costa 2015-11-05 17:24:22 +00:00
parent 35bebd3a56
commit 148a5f3acd

View File

@ -32,8 +32,8 @@ xc/*************************************************************************
'$protect' :- '$protect' :-
current_atom(Name), current_atom(Name),
atom_codes(Name,[0'$|_]), %' atom_codes(Name,[0'$|_]), %'
%'$hide_predicates'(Name), '$hide_predicates'(Name),
hide(Name), '$hide'(Name),
fail. fail.
'$protect' :- '$protect' :-
'$hide_predicates'(bootstrap), '$hide_predicates'(bootstrap),