diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Logtalk 2.17.0 files.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1048 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2004-04-25 23:57:46 +00:00
parent 91f87b3109
commit dcf184d930
123 changed files with 2113 additions and 1163 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
library/logtalk.yap
View File

@@ -1,4 +1,4 @@
:- ensure_loaded('logtalk/yap430.config').
:- ensure_loaded('logtalk/yap.config').
:- ensure_loaded('logtalk/logtalk.pl').

1783
library/logtalk/logtalk.pl
View File

File diff suppressed because it is too large Load Diff

39
library/logtalk/yap430.config → library/logtalk/yap.config
View File

@@ -1,11 +1,11 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Logtalk - Object oriented extension to Prolog
% Release 2.16.2
% Release 2.17.0
%
% configuration file for YAP Prolog 4.3.23 or later
% configuration file for YAP Prolog 4.3.23 and later versions
%
% last updated: March 29, 2004
% last updated: April 12, 2004
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -32,7 +32,8 @@
dynamic('$lgt_instantiates_class_'/3), hide_predicate('$lgt_instantiates_class_'/3),
dynamic('$lgt_specializes_class_'/3), hide_predicate('$lgt_specializes_class_'/3),
dynamic('$lgt_extends_protocol_'/3), hide_predicate('$lgt_extends_protocol_'/3),
dynamic('$lgt_extends_object_'/3), hide_predicate('$lgt_extends_object_'/3)
dynamic('$lgt_extends_object_'/3), hide_predicate('$lgt_extends_object_'/3),
dynamic('$lgt_debugging_'/1), hide_predicate('$lgt_debugging_'/1)
;
true.
@@ -244,6 +245,9 @@ forall(Generate, Test) :-
'$lgt_default_flag'(code_prefix, '').
'$lgt_default_flag'(debug, off).
'$lgt_default_flag'(supports_break_predicate, true).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -382,6 +386,33 @@ forall(Generate, Test) :-
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% read character predicate
%
% read a single character echoing it and writing a newline after
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'$lgt_read_single_char'(Char) :-
get_char(Char).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% pretty print a term by naming its free variables
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'$lgt_pretty_print_vars'(Term) :-
numbervars(Term, 0, _),
write_term(Term, [numbervars(true), quoted(true)]).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% end!