2
0
Эх сурвалжийг харах

* Instantiate FS compiler

git-svn-id: trunk@40452 -
michael 6 жил өмнө
parent
commit
b9905f6a2c

+ 4 - 4
utils/pas2js/nodepas2js.pp

@@ -6,7 +6,7 @@ program nodepas2js;
 uses
 uses
   JS, NodeJSApp,
   JS, NodeJSApp,
   Classes, SysUtils,
   Classes, SysUtils,
-  Pas2jsFileUtils, Pas2jsLogger, Pas2jsCompiler;
+  Pas2jsFileUtils, Pas2jsLogger, pas2jscompiler, Pas2jsfscompiler;
 
 
 type
 type
 
 
@@ -14,13 +14,13 @@ type
 
 
   TPas2jsCLI = class(TNodeJSApplication)
   TPas2jsCLI = class(TNodeJSApplication)
   private
   private
-    FCompiler: TPas2jsCompiler;
+    FCompiler: TPas2jsFSCompiler;
   protected
   protected
     procedure DoRun; override;
     procedure DoRun; override;
   public
   public
     constructor Create(TheOwner: TComponent); override;
     constructor Create(TheOwner: TComponent); override;
     destructor Destroy; override;
     destructor Destroy; override;
-    property Compiler: TPas2jsCompiler read FCompiler;
+    property Compiler: TPas2jsFsCompiler read FCompiler;
   end;
   end;
 
 
 procedure TPas2jsCLI.DoRun;
 procedure TPas2jsCLI.DoRun;
@@ -65,7 +65,7 @@ constructor TPas2jsCLI.Create(TheOwner: TComponent);
 begin
 begin
   inherited Create(TheOwner);
   inherited Create(TheOwner);
   StopOnException:=True;
   StopOnException:=True;
-  FCompiler:=TPas2jsCompiler.Create;
+  FCompiler:=TPas2jsFSCompiler.Create;
 end;
 end;
 
 
 destructor TPas2jsCLI.Destroy;
 destructor TPas2jsCLI.Destroy;