root/tags/lgt2311/integration/logtalk_sicstus4.pl

Revision 4000, 0.7 KB (checked in by pmoura, 12 months ago)

Updated copyright string.

  • Property svn:eol-style set to native
Line 
1
2%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3%
4%  Logtalk - Open source object-oriented logic programming language
5%  Release 2.31.1
6%
7%  Copyright (c) 1998-2008 Paulo Moura.  All Rights Reserved.
8%
9%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
10
11
12:- compile('$LOGTALKUSER/configs/sicstus4.config').
13:- asserta((
14    user:goal_expansion(CallWitArgs, Layout, _, Call, Layout) :-
15        CallWitArgs =.. [call_with_args| Args],
16        Call =.. [call| Args])).
17:- compile('$LOGTALKHOME/compiler/logtalk.pl').
18:- retract((
19    user:goal_expansion(CallWitArgs, Layout, _, Call, Layout) :-
20        CallWitArgs =.. [call_with_args| Args],
21        Call =.. [call| Args])).
22:- compile('$LOGTALKUSER/libpaths/libpaths.pl').
Note: See TracBrowser for help on using the browser.