|
Revision 4572, 1.1 KB
(checked in by pmoura, 2 weeks ago)
|
|
Updated the Logtalk version number to 2.33.3 in preparation for the next release.
|
-
Property svn:eol-style set to
native
|
| Line | |
|---|
| 1 | |
|---|
| 2 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
|---|
| 3 | % |
|---|
| 4 | % Logtalk - Open source object-oriented logic programming language |
|---|
| 5 | % Release 2.33.3 |
|---|
| 6 | % |
|---|
| 7 | % Copyright (c) 1998-2008 Paulo Moura. All Rights Reserved. |
|---|
| 8 | % Logtalk is free software. You can redistribute it and/or modify |
|---|
| 9 | % it under the terms of the "Artistic License 2.0" as published by |
|---|
| 10 | % The Perl Foundation. Consult the "LICENSE.txt" file for details. |
|---|
| 11 | % |
|---|
| 12 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
|---|
| 13 | |
|---|
| 14 | |
|---|
| 15 | :- set_prolog_flag(generate_debug_info, false). |
|---|
| 16 | :- system_module. |
|---|
| 17 | :- op(600, xfy, ::). |
|---|
| 18 | :- op(600, fy, ::). |
|---|
| 19 | :- op(600, fy, ^^). |
|---|
| 20 | :- op(200, fy, +). |
|---|
| 21 | :- op(200, fy, ?). |
|---|
| 22 | :- op(200, fy, @). |
|---|
| 23 | :- op(200, fy, -). |
|---|
| 24 | :- if(current_prolog_flag(threads, true)). |
|---|
| 25 | :- thread_local('$lgt_obj_lookup_cache_'/4). |
|---|
| 26 | :- thread_local('$lgt_self_lookup_cache_'/4). |
|---|
| 27 | :- thread_local('$lgt_super_lookup_cache_'/5). |
|---|
| 28 | :- thread_local('$lgt_super_lookup_cache_'/6). |
|---|
| 29 | :- thread_local('$lgt_db_lookup_cache_'/5). |
|---|
| 30 | :- endif. |
|---|
| 31 | :- include('../compiler/logtalk.pl'). |
|---|
