This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/Logtalk/examples/expansion/SCRIPT
pmoura 9fe4d26c59 Logtalk 2.27.0 files.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1539 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2006-02-10 17:44:05 +00:00

45 lines
744 B
Plaintext

=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.27.0
Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
=================================================================
% start by loading the example:
| ?- logtalk_load([library(term_expansionp), expansion(loader)]).
...
% simple tests of the expand_term/2 built-in method:
| ?- exp_public::expand_term(8, Term).
Term = eight
yes
| ?- exp_protected::expand_term(8, Term).
Term = 8
yes
| ?- exp_private::expand_term(8, Term).
Term = 8
yes
| ?- desc_public::test(8, Term).
Term = eight
yes
| ?- desc_protected::test(8, Term).
Term = eight
yes
| ?- desc_private::test(8, Term).
Term = 8
yes