Logtalk 2.29.5 files.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1858 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
=================================================================
|
||||
Logtalk - Object oriented extension to Prolog
|
||||
Release 2.29.4
|
||||
Release 2.29.5
|
||||
|
||||
Copyright (c) 1998-2007 Paulo Moura. All Rights Reserved.
|
||||
=================================================================
|
||||
@@ -21,3 +21,6 @@ triple.lgt
|
||||
reverse.lgt
|
||||
Simple object reading from a file (next.txt), and writing to
|
||||
another file (previous.txt), clauses that use infix operators.
|
||||
|
||||
local.lgt
|
||||
Simple example of defining an operator local to a source file.
|
||||
|
@@ -1,6 +1,6 @@
|
||||
=================================================================
|
||||
Logtalk - Object oriented extension to Prolog
|
||||
Release 2.29.4
|
||||
Release 2.29.5
|
||||
|
||||
Copyright (c) 1998-2007 Paulo Moura. All Rights Reserved.
|
||||
=================================================================
|
||||
@@ -32,7 +32,7 @@ J = 4 ;
|
||||
I = 3
|
||||
J = 6
|
||||
|
||||
Yes
|
||||
yes
|
||||
|
||||
|
||||
% operators also affect inputing of terms, enabling this example to work:
|
||||
@@ -48,8 +48,50 @@ J = 6 ;
|
||||
I = 3
|
||||
J = 9
|
||||
|
||||
Yes
|
||||
yes
|
||||
|
||||
|
||||
% check the file "previous.txt" generated from the file "next.txt" by the object "reverse"
|
||||
% by opening the files on a text editor
|
||||
|
||||
|
||||
% the "edge" operator on the "local.lgt" source file is not globally visible:
|
||||
|
||||
| ?- graph1::(N1 edge N2).
|
||||
uncaught exception: error(syntax_error('user_input:10 (char:13) ) or operator expected'),read_term/3)
|
||||
|
||||
|
||||
% you must use instead functor notation:
|
||||
|
||||
| ?- graph1::edge(N1, N2).
|
||||
|
||||
N1 = a
|
||||
N2 = b ;
|
||||
|
||||
N1 = a
|
||||
N2 = c ;
|
||||
|
||||
N1 = b
|
||||
N2 = d ;
|
||||
|
||||
N1 = c
|
||||
N2 = d
|
||||
|
||||
yes
|
||||
|
||||
|
||||
| ?- graph1::path(a, d, Path).
|
||||
|
||||
Path = [a, b, d] ;
|
||||
|
||||
Path = [a, c, d]
|
||||
|
||||
yes
|
||||
|
||||
|
||||
% confirm that the "edge" operator have not became global:
|
||||
|
||||
| ?- current_op(P, T, edge).
|
||||
|
||||
no
|
||||
|
||||
|
@@ -1,15 +1,3 @@
|
||||
|
||||
:- initialization(
|
||||
logtalk_load([
|
||||
double,
|
||||
triple,
|
||||
reverse])).
|
||||
|
||||
/*
|
||||
If you intend to use the FOP XSL:FO processor for generating PDF documenting
|
||||
files, comment the directive above and uncomment the directive below
|
||||
|
||||
:- initialization(
|
||||
logtalk_load(
|
||||
[double, triple, reverse], [xmlsref(standalone)])).
|
||||
*/
|
||||
logtalk_load([double, triple, reverse, local])).
|
||||
|
Reference in New Issue
Block a user