avoid hiding without reason

2015-11-05 17:24:22 +00:00 · 2015-11-05 17:24:22 +00:00 · 148a5f3acd
commit 148a5f3acd
parent 35bebd3a56
1 changed files with 2 additions and 2 deletions
--- a/pl/protect.yap
+++ b/pl/protect.yap
@ -32,8 +32,8 @@ xc/*************************************************************************
 '$protect' :-
 	current_atom(Name),
 	atom_codes(Name,[0'$|_]), %'
-				%'$hide_predicates'(Name),
-	hide(Name),
+	'$hide_predicates'(Name),
+	'$hide'(Name),
 	fail.
 '$protect' :-
 	'$hide_predicates'(bootstrap),