don't source system predicates

This commit is contained in:
Vítor Santos Costa 2014-09-25 09:44:34 +01:00
parent e4603ffe22
commit 077570314d

View File

@ -170,8 +170,6 @@ otherwise.
:- ['protect.yap']. :- ['protect.yap'].
:- source.
version(yap,[6,3]). version(yap,[6,3]).
:- op(1150,fx,(mode)). :- op(1150,fx,(mode)).
@ -223,6 +221,8 @@ yap_hacks:cut_by(CP) :- '$$cut_by'(CP).
:- multifile :- multifile
prolog:comment_hook/3. prolog:comment_hook/3.
:- source.
:- module(user). :- module(user).
/** @pred _CurrentModule_:goal_expansion(+ _G_,+ _M_,- _NG_), user:goal_expansion(+ _G_,+ _M_,- _NG_) /** @pred _CurrentModule_:goal_expansion(+ _G_,+ _M_,- _NG_), user:goal_expansion(+ _G_,+ _M_,- _NG_)
@ -324,6 +324,8 @@ If this hook predicate succeeds it must instantiate the _Action_ argument to th
*/ */
:- multifile user:exception/3. :- multifile user:exception/3.
:- dynamic user:exception/3. :- dynamic user:exception/3.