* Dotted filenames for package fpindexer

packages/fpindexer/namespaced/FpIndexer.Db.Fb.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.Fb;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i fbindexdb.pp}

packages/fpindexer/namespaced/FpIndexer.Db.Memory.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.Memory;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i memindexdb.pp}

packages/fpindexer/namespaced/FpIndexer.Db.Pg.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.Pg;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i pgindexdb.pp}

packages/fpindexer/namespaced/FpIndexer.Db.SqlDb.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.SqlDb;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i sqldbindexdb.pp}

packages/fpindexer/namespaced/FpIndexer.Db.Sqlite.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.Sqlite;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i sqliteindexdb.pp}

packages/fpindexer/namespaced/FpIndexer.Db.Types.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Db.Types;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i dbindexer.pp}

packages/fpindexer/namespaced/FpIndexer.Indexer.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Indexer;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i fpindexer.pp}

packages/fpindexer/namespaced/FpIndexer.Masks.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Masks;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i fpmasks.pp}

packages/fpindexer/namespaced/FpIndexer.Reader.Html.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Reader.Html;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i ireaderhtml.pp}

packages/fpindexer/namespaced/FpIndexer.Reader.Pascal.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Reader.Pascal;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i ireaderpas.pp}

packages/fpindexer/namespaced/FpIndexer.Reader.Txt.pp

@@ -0,0 +1,3 @@
+unit FpIndexer.Reader.Txt;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i ireadertxt.pp}

packages/fpindexer/namespaces.lst

@@ -0,0 +1,13 @@
+src/dbindexer.pp=namespaced/FpIndexer.Db.Types.pp
+{s*:src/}=namespaced/
+{i+:src/}
+src/fpmasks.pp=namespaced/FpIndexer.Masks.pp
+src/ireadertxt.pp=namespaced/FpIndexer.Reader.Txt.pp
+src/ireaderpas.pp=namespaced/FpIndexer.Reader.Pascal.pp
+src/sqldbindexdb.pp=namespaced/FpIndexer.Db.SqlDb.pp
+src/ireaderhtml.pp=namespaced/FpIndexer.Reader.Html.pp
+src/fpindexer.pp=namespaced/FpIndexer.Indexer.pp
+src/memindexdb.pp=namespaced/FpIndexer.Db.Memory.pp
+src/fbindexdb.pp=namespaced/FpIndexer.Db.Fb.pp
+src/sqliteindexdb.pp=namespaced/FpIndexer.Db.Sqlite.pp
+src/pgindexdb.pp=namespaced/FpIndexer.Db.Pg.pp

packages/fpindexer/src/dbindexer.pp

@@ -13,14 +13,21 @@
 
  **********************************************************************}
  
+{$IFNDEF FPC_DOTTEDUNITS}
 unit DBIndexer;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, FpIndexer.Reader.Txt, Data.Db, Data.Sqldb, Data.SqlDb.Ib, FpIndexer.Indexer;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, ireadertxt, db, sqldb, ibconnection, fpindexer;
+{$ENDIF FPC_DOTTEDUNITS}
 
 Type
 
@@ -68,7 +75,11 @@ Type
 
 implementation
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses System.DateUtils;
+{$ELSE FPC_DOTTEDUNITS}
 uses dateutils;
+{$ENDIF FPC_DOTTEDUNITS}
 
 { TIBIndexer }
 

packages/fpindexer/src/fbindexdb.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit fbIndexdb;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, FpIndexer.Indexer, FpIndexer.Db.SqlDb ,Data.Sqldb, Data.SqlDb.Ib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, fpIndexer, sqldbIndexDB ,sqldb, ibconnection;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   { TFBIndexDB }

packages/fpindexer/src/fpindexer.pp

@@ -13,7 +13,9 @@
 
  **********************************************************************}
  
-unit FPIndexer;
+{$IFNDEF FPC_DOTTEDUNITS}
+unit FpIndexer;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
@@ -21,8 +23,13 @@ unit FPIndexer;
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   TWordTokenType = (wtOr, wtAnd, wtWord);
@@ -463,11 +470,19 @@ function QuoteString(S: UTF8String): UTF8String;
 
 implementation
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  {$ifdef LangDetect}
+     fpTextCat, Math,
+  {$endif}
+  FpIndexer.Masks;     //please note that this is an LCL unit, should be moved to FCL afaic
+{$ELSE FPC_DOTTEDUNITS}
 uses
   {$ifdef LangDetect}
      fpTextCat, Math,
   {$endif}
   fpmasks;     //please note that this is an LCL unit, should be moved to FCL afaic
+{$ENDIF FPC_DOTTEDUNITS}
 
 resourcestring
   SErrNoSuchLanguage = 'Unknown language : "%s".';

packages/fpindexer/src/fpmasks.pp

@@ -19,15 +19,23 @@
  *                                                                           *
  *****************************************************************************
 }
+{$IFNDEF FPC_DOTTEDUNITS}
 unit FPMasks;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  // For Smart Linking: Do not use the LCL!
+  System.Classes, System.SysUtils, System.Contnrs;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   // For Smart Linking: Do not use the LCL!
   Classes, SysUtils, Contnrs;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   TMaskCharType = (mcChar, mcCharSet, mcAnyChar, mcAnyText);

packages/fpindexer/src/ireaderhtml.pp

@@ -1,5 +1,5 @@
 {
-    This file is part of the Free Component Library (FCL)
+    This file is part of the Free Component Library (Fcl)
     Copyright (c) 2012 by the Free Pascal development team
 
     HTML text reader
@@ -12,15 +12,23 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit IReaderHTML;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  Fcl.FastHtmlParser, //, Fcl.Htmlutil,          // Fast Parser Functions
+  System.Classes, FpIndexer.Indexer;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   FastHTMLParser, //, HTMLUtil,          // Fast Parser Functions
   Classes, fpIndexer;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
 

packages/fpindexer/src/ireaderpas.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit IReaderPAS;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, FpIndexer.Indexer, FpIndexer.Reader.Txt;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, fpIndexer, IReaderTXT;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
 

packages/fpindexer/src/ireadertxt.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit IReaderTXT;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, FpIndexer.Indexer;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, fpIndexer;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
 

packages/fpindexer/src/memindexdb.pp

@@ -1,5 +1,5 @@
 {
-    This file is part of the Free Component Library (FCL)
+    This file is part of the Free Component Library (Fcl)
     Copyright (c) 2012 by the Free Pascal development team
 
     Memory database
@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit memindexdb;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, FpIndexer.Indexer, System.Contnrs;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, fpindexer, contnrs;
+{$ENDIF FPC_DOTTEDUNITS}
 
 Type
   TMatch = Class;
@@ -197,7 +204,11 @@ Type
 
 implementation
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses Fcl.Streams.Buffer;
+{$ELSE FPC_DOTTEDUNITS}
 uses bufstream;
+{$ENDIF FPC_DOTTEDUNITS}
 
 { TMemIndexDB }
 

packages/fpindexer/src/pgindexdb.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit pgindexdb;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, FpIndexer.Indexer, FpIndexer.Db.SqlDb ,Data.Sqldb, Data.SqlDb.Pq;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, fpIndexer, sqldbIndexDB ,sqldb, pqconnection;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   { TPGIndexDB }

packages/fpindexer/src/sqldbindexdb.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit SQLDBIndexDB;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.SysUtils, FpIndexer.Indexer, Data.Sqldb, Data.Db;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   SysUtils, fpIndexer, sqldb, db;
+{$ENDIF FPC_DOTTEDUNITS}
 
 // SQLDB Specific, cache query objects
 type

packages/fpindexer/src/sqliteindexdb.pp

@@ -12,14 +12,21 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit SQLiteIndexDB;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.SysUtils, FpIndexer.Indexer, System.CTypes, Api.Sqlite3;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   SysUtils, fpIndexer, ctypes, sqlite3;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   TDatabaseID = record