Changeset 4557 for trunk/compiler

Timestamp:

11/01/08 12:44:03 (2 months ago)

Author:

pmoura

Message:

Added support for using the set_logtalk_flag/2 directive in source files. This directive is executed when read (thus affecting the compilation of the source code that follows) but its scope is restricted to the source file being compiled.

Files:

• trunk/compiler/logtalk.pl (modified) (1 diff)

trunk/compiler/logtalk.pl

@@ -5404 +5404 @@
     ).
 
+'$lgt_tr_file_directive'(set_logtalk_flag(Flag, Value), _, _, _) :-
+    !,
+    Option =.. [Flag, Value],
+    '$lgt_set_compiler_flags'([Option]).                % local scope (restricted to the source file being compiled)
+
 '$lgt_tr_file_directive'(set_prolog_flag(Flag, Value), _, _, _) :-
     !,