Logtalk 2.26.2 files.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1487 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
64
Logtalk/examples/errors/warnings.lgt
Normal file
64
Logtalk/examples/errors/warnings.lgt
Normal file
@@ -0,0 +1,64 @@
|
||||
|
||||
:- object(misspell).
|
||||
|
||||
% misspelt call to Prolog built-in predicate
|
||||
output(A) :-
|
||||
writr(A).
|
||||
|
||||
:- end_object.
|
||||
|
||||
|
||||
|
||||
% singleton variables in opening object directive
|
||||
:- object(singletons(L)).
|
||||
|
||||
% singleton variables in predicate clause
|
||||
predicate(A) :-
|
||||
write(C).
|
||||
|
||||
:- end_object.
|
||||
|
||||
|
||||
|
||||
:- object(plredef).
|
||||
|
||||
% redefinition of a Prolog built-in predicate
|
||||
write(_).
|
||||
|
||||
:- end_object.
|
||||
|
||||
|
||||
|
||||
:- object(lgtredef).
|
||||
|
||||
% redefinition of Logtalk built-in predicate
|
||||
current_object(_).
|
||||
|
||||
:- end_object.
|
||||
|
||||
|
||||
|
||||
% references to unknown entities in object opening directive
|
||||
|
||||
:- object(unknownrefs,
|
||||
implements(protocol),
|
||||
imports(category),
|
||||
extends(object)).
|
||||
|
||||
|
||||
:- end_object.
|
||||
|
||||
|
||||
|
||||
:- object(portability).
|
||||
|
||||
:- public(predicate/0).
|
||||
|
||||
% clause with calls to non-ISO Prolog standard predicates
|
||||
predicate :-
|
||||
compare(Result, first, second),
|
||||
retractall(result(Result, _)),
|
||||
sort([], []),
|
||||
consult(file).
|
||||
|
||||
:- end_object.
|
Reference in New Issue
Block a user