Changeset 58 for branches/Transpascal/UCompiler.pas

Timestamp:

Aug 10, 2010, 3:41:49 PM (14 years ago)

Author:

george

Message:

Slightly enhanced parsing of unit.

File:

• branches/Transpascal/UCompiler.pas (modified) (1 diff)

branches/Transpascal/UCompiler.pas

@@ -49 +49 @@
   Parser.SourceCodeText := Source;
   Parser.Init;
-  ProgramCode.Modules.Add(Parser.ParseModule);
+  NewModule := Parser.ParseModule;
+  ProgramCode.Modules.Add(NewModule);
   Producer.Produce(NewModule, ProducedCode);
 end;