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'].
:- source.
version(yap,[6,3]).
:- op(1150,fx,(mode)).
@ -223,6 +221,8 @@ yap_hacks:cut_by(CP) :- '$$cut_by'(CP).
:- multifile
prolog:comment_hook/3.
:- source.
:- module(user).
/** @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.
:- dynamic user:exception/3.