Logtalk 2.10.0 file.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@424 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
=================================================================
|
||||
Logtalk - Object oriented extension to Prolog
|
||||
Release 2.9.3
|
||||
Release 2.10.0
|
||||
|
||||
Copyright (c) 1998-2002 Paulo Moura. All Rights Reserved.
|
||||
=================================================================
|
||||
|
14
Logtalk/examples/errors/catdynpred.lgt
Normal file
14
Logtalk/examples/errors/catdynpred.lgt
Normal file
@@ -0,0 +1,14 @@
|
||||
|
||||
:- category(catdynpred).
|
||||
|
||||
|
||||
:- public(dynpred/1).
|
||||
:- dynamic(dynpred/1).
|
||||
|
||||
|
||||
dynpred(1).
|
||||
dynpred(2).
|
||||
dynpred(3).
|
||||
|
||||
|
||||
:- end_object.
|
@@ -35,4 +35,10 @@
|
||||
[unmatchdir],
|
||||
[unknown(warning), misspelt(warning), singletons(warning), plredef(warning), lgtredef(warning), report(on)]),
|
||||
_,
|
||||
true),
|
||||
catch(
|
||||
logtalk_load(
|
||||
[catdynpred],
|
||||
[unknown(warning), misspelt(warning), singletons(warning), plredef(warning), lgtredef(warning), report(on)]),
|
||||
_,
|
||||
true))).
|
||||
|
@@ -1,15 +1 @@
|
||||
|
||||
:- object(portability).
|
||||
|
||||
|
||||
:- public(predicate/0).
|
||||
|
||||
|
||||
predicate :-
|
||||
compare(Result, first, second),
|
||||
retractall(result(Result, _)),
|
||||
sort([], []),
|
||||
consult(file).
|
||||
|
||||
|
||||
:- end_object.
|
||||
|
Reference in New Issue
Block a user