From 2eab5ef22557035cd49c6190f9e752bd46db2b06 Mon Sep 17 00:00:00 2001 From: Vitor Santos Costa Date: Tue, 10 May 2016 09:27:05 +0100 Subject: [PATCH] Aleph requires hide/1 --- C/atomic.c | 1 + 1 file changed, 1 insertion(+) diff --git a/C/atomic.c b/C/atomic.c index 1b32fc7d2..2a854160f 100644 --- a/C/atomic.c +++ b/C/atomic.c @@ -2371,6 +2371,7 @@ void Yap_InitAtomPreds(void) { Yap_InitCPred("get_string_code", 3, get_string_code3, 0); /* hiding and unhiding some predicates */ Yap_InitCPred("hide_atom", 1, hide_atom, SafePredFlag | SyncPredFlag); + Yap_InitCPred("hide", 1, hide_atom, SafePredFlag | SyncPredFlag); Yap_InitCPred("unhide_atom", 1, unhide_atom, SafePredFlag | SyncPredFlag); Yap_InitCPred("$hidden_atom", 1, hidden_atom, HiddenPredFlag | SafePredFlag | SyncPredFlag);