Removed for-ghc, for-ghc-nofud and for-windows directories.

src/GF.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stability)
 -- Portability : (portability)
 --
--- > CVS $Date: 2005/04/21 16:21:02 $ 
+-- > CVS $Date: 2005/04/21 16:45:56 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.21 $
+-- > CVS $Revision: 1.22 $
 --
 -- The Main module of GF program.
 -----------------------------------------------------------------------------
@@ -28,7 +28,7 @@ import GF.Shell.JGF
 import GF.Text.UTF8
 
 import GF.Today (today)
-import Arch
+import GF.System.Arch
 import System (getArgs)
 import Control.Monad (foldM)
 

src/GF/API.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:21:03 $ 
+-- > CVS $Date: 2005/04/21 16:45:57 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.32 $
+-- > CVS $Revision: 1.33 $
 --
 -- Application Programmer's Interface to GF; also used by Shell. AR 10/11/2001
 -----------------------------------------------------------------------------
@@ -61,7 +61,7 @@ import GF.UseGrammar.Editing
 
 ----import GrammarToMGrammar as M
 
-import Arch (myStdGen)
+import GF.System.Arch (myStdGen)
 
 import GF.Text.UTF8
 import GF.Data.Operations

src/GF/API/IOGrammar.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:21:06 $ 
+-- > CVS $Date: 2005/04/21 16:45:58 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.17 $
+-- > CVS $Revision: 1.18 $
 --
 -- for reading grammars and terms from strings and files
 -----------------------------------------------------------------------------
@@ -27,7 +27,7 @@ import GF.Infra.ReadFiles (isOldFile)
 import GF.Infra.Option
 import GF.Data.Operations
 import GF.Infra.UseIO
-import Arch
+import GF.System.Arch
 
 import Control.Monad (liftM)
 

src/GF/Compile/Compile.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:21:35 $
+-- > CVS $Date: 2005/04/21 16:46:00 $
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.36 $
+-- > CVS $Revision: 1.37 $
 --
 -- The top-level compilation chain from source file to gfc\/gfr.
 -----------------------------------------------------------------------------
@@ -47,7 +47,7 @@ import GF.Canon.GetGFC
 
 import GF.Data.Operations
 import GF.Infra.UseIO
-import Arch
+import GF.System.Arch
 
 import Control.Monad
 

src/GF/Compile/ShellState.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:21:47 $ 
+-- > CVS $Date: 2005/04/21 16:46:01 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.44 $
+-- > CVS $Revision: 1.45 $
 --
 -- (Description of the module)
 -----------------------------------------------------------------------------
@@ -32,7 +32,7 @@ import GF.CF.CanonToCF
 import GF.UseGrammar.Morphology
 import GF.Infra.Option
 import GF.Infra.Ident
-import Arch (ModTime)
+import GF.System.Arch (ModTime)
 
 import qualified GF.OldParsing.ConvertGrammar as CnvOld -- OBSOLETE
 import qualified GF.Conversion.GFC as Cnv

src/GF/Fudgets/ArchEdit.hs

@@ -5,19 +5,19 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/02/18 19:21:10 $ 
+-- > CVS $Date: 2005/04/21 16:46:05 $ 
--- > CVS $Author: peb $
+-- > CVS $Author: bringert $
--- > CVS $Revision: 1.3 $
+-- > CVS $Revision: 1.4 $
 --
 -- (Description of the module)
 -----------------------------------------------------------------------------
 
-module ArchEdit (
+module GF.Fudgets.ArchEdit (
   fudlogueEdit, fudlogueWrite, fudlogueWriteUni
  ) where
 
-import CommandF
+import GF.Fudgets.CommandF
-import UnicodeF
+import GF.Fudgets.UnicodeF
 
 -- architecture/compiler dependent definitions for unix/ghc, if Fudgets works.
 -- If not, use the modules in for-ghci

src/GF/Infra/ReadFiles.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:22:39 $ 
+-- > CVS $Date: 2005/04/21 16:46:08 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.22 $
+-- > CVS $Revision: 1.23 $
 --
 -- Decide what files to read as function of dependencies and time stamps.
 --
@@ -24,7 +24,7 @@ module GF.Infra.ReadFiles (-- * Heading 1
 		  gfcFile,gfFile,gfrFile,isGFC,resModName,isOldFile
 		 ) where
 
-import Arch (selectLater, modifiedFiles, ModTime, getModTime,laterModTime)
+import GF.System.Arch (selectLater, modifiedFiles, ModTime, getModTime,laterModTime)
 
 import GF.Infra.Option
 import GF.Data.Operations

src/GF/Infra/UseIO.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:22:40 $ 
+-- > CVS $Date: 2005/04/21 16:46:09 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.11 $
+-- > CVS $Revision: 1.12 $
 --
 -- (Description of the module)
 -----------------------------------------------------------------------------
@@ -15,7 +15,7 @@
 module GF.Infra.UseIO where
 
 import GF.Data.Operations
-import Arch (prCPU)
+import GF.System.Arch (prCPU)
 import GF.Infra.Option
 
 import System.IO

src/GF/Shell/PShell.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:23:22 $ 
+-- > CVS $Date: 2005/04/21 16:46:12 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.19 $
+-- > CVS $Revision: 1.20 $
 --
 -- parsing GF shell commands. AR 11\/11\/2001
 -----------------------------------------------------------------------------
@@ -22,7 +22,7 @@ import GF.Shell
 import GF.Infra.Option
 import GF.Compile.PGrammar (pzIdent, pTrm) --- (string2formsAndTerm)
 import GF.API
-import Arch(fetchCommand)
+import GF.System.Arch (fetchCommand)
 
 import Data.Char (isDigit)
 import System.IO.Error

src/GF/Shell/SubShell.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:23:23 $ 
+-- > CVS $Date: 2005/04/21 16:46:12 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.8 $
+-- > CVS $Revision: 1.9 $
 --
 -- (Description of the module)
 -----------------------------------------------------------------------------
@@ -21,7 +21,7 @@ import GF.Infra.Option
 import GF.API
 
 import GF.Shell.CommandL
-import ArchEdit
+import GF.System.ArchEdit
 
 import Data.List
 

src/GF/Shell/TeachYourself.hs

@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/21 16:23:24 $ 
+-- > CVS $Date: 2005/04/21 16:46:13 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.6 $
+-- > CVS $Revision: 1.7 $
 --
 -- translation and morphology quiz. AR 10\/5\/2000 -- 12\/4\/2002
 -----------------------------------------------------------------------------
@@ -20,7 +20,7 @@ import GF.UseGrammar.Linear
 import GF.Grammar.PrGrammar
 
 import GF.Infra.Option
-import Arch (myStdGen)
+import GF.System.Arch (myStdGen)
 import GF.Data.Operations
 import GF.Infra.UseIO
 

src/GF/System/Arch.hs

@@ -5,22 +5,22 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/02/24 11:46:34 $ 
+-- > CVS $Date: 2005/04/21 16:46:14 $ 
--- > CVS $Author: peb $
+-- > CVS $Author: bringert $
--- > CVS $Revision: 1.6 $
+-- > CVS $Revision: 1.7 $
 --
 -- architecture\/compiler dependent definitions for unix\/hbc
 -----------------------------------------------------------------------------
 
-module Arch (
+module GF.System.Arch (
  myStdGen, prCPU, selectLater, modifiedFiles, ModTime, getModTime,getNowTime,
  welcomeArch, fetchCommand, laterModTime) where
 
-import Time
+import System.Time
-import Random
+import System.Random
-import CPUTime
+import System.CPUTime
-import Monad (filterM)
+import Control.Monad (filterM)
-import Directory
+import System.Directory
 import System.Console.Readline
 
 ---- import qualified UnicodeF as U --(fudlogueWrite)

src/GF/System/ArchEdit.hs

@@ -5,14 +5,14 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/03/30 12:41:12 $ 
+-- > CVS $Date: 2005/04/21 16:46:15 $ 
--- > CVS $Author: aarne $
+-- > CVS $Author: bringert $
--- > CVS $Revision: 1.1 $
+-- > CVS $Revision: 1.2 $
 --
 -- (Description of the module)
 -----------------------------------------------------------------------------
 
-module ArchEdit (
+module GF.System.ArchEdit (
   fudlogueEdit, fudlogueWrite, fudlogueWriteUni
  ) where