Browse Source

* Fix tests after latest batch of changes

git-svn-id: trunk@40460 -
michael 6 years ago
parent
commit
1fba127e21
1 changed files with 3 additions and 3 deletions
  1. 3 3
      packages/pastojs/tests/tcunitsearch.pas

+ 3 - 3
packages/pastojs/tests/tcunitsearch.pas

@@ -29,14 +29,14 @@ uses
   fpcunit, testregistry,
   PScanner, PasTree,
   {$IFDEF CheckPasTreeRefCount}PasResolveEval,{$ENDIF}
-  Pas2jsFileUtils, Pas2jsCompiler, Pas2jsFileCache, Pas2jsLogger,
+  Pas2jsFileUtils, Pas2jsCompiler, Pas2jsfsCompiler, Pas2jsFileCache, Pas2jsLogger,
   tcmodules;
 
 type
 
   { TTestCompiler }
 
-  TTestCompiler = class(TPas2jsCompiler)
+  TTestCompiler = class(TPas2jsFSCompiler)
   private
     FExitCode: longint;
   protected
@@ -229,7 +229,7 @@ begin
   {$ENDIF}
   FCompiler:=TTestCompiler.Create;
   Compiler.Log.OnLog:=@DoLog;
-  Compiler.FileCache.DirectoryCache.OnReadDirectory:=@OnReadDirectory;
+  Compiler.FileCache.OnReadDirectory:=@OnReadDirectory;
   Compiler.FileCache.OnReadFile:=@OnReadFile;
   Compiler.FileCache.OnWriteFile:=@OnWriteFile;
 end;