|
@@ -234,10 +234,10 @@ interface
|
|
procedure undef_system_macro(const name : string);
|
|
procedure undef_system_macro(const name : string);
|
|
|
|
|
|
{*** symtable stack ***}
|
|
{*** symtable stack ***}
|
|
-{$ifdef DEBUG}
|
|
|
|
|
|
+{ $ifdef DEBUG
|
|
procedure test_symtablestack;
|
|
procedure test_symtablestack;
|
|
procedure list_symtablestack;
|
|
procedure list_symtablestack;
|
|
-{$endif DEBUG}
|
|
|
|
|
|
+ $endif DEBUG}
|
|
|
|
|
|
{$ifdef UNITALIASES}
|
|
{$ifdef UNITALIASES}
|
|
type
|
|
type
|