diff options
| author | bringert <unknown> | 2005-04-21 15:21:02 +0000 |
|---|---|---|
| committer | bringert <unknown> | 2005-04-21 15:21:02 +0000 |
| commit | 5c9917ff8d18ddaefd5a8bf4b223009747477fd8 (patch) | |
| tree | 46345cb91a8e0fa626a0bf4c03af8f8ef4cad09f /src/GF/Infra/UseIO.hs | |
| parent | 3433c978480f112bf04a895d03ec15529796ecce (diff) | |
Fixed module names and imports after giant file move.
Diffstat (limited to 'src/GF/Infra/UseIO.hs')
| -rw-r--r-- | src/GF/Infra/UseIO.hs | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/src/GF/Infra/UseIO.hs b/src/GF/Infra/UseIO.hs index 9aabd0f3e..88ef6e3b6 100644 --- a/src/GF/Infra/UseIO.hs +++ b/src/GF/Infra/UseIO.hs @@ -5,22 +5,23 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/03/08 18:08:58 $ --- > CVS $Author: aarne $ --- > CVS $Revision: 1.10 $ +-- > CVS $Date: 2005/04/21 16:22:40 $ +-- > CVS $Author: bringert $ +-- > CVS $Revision: 1.11 $ -- -- (Description of the module) ----------------------------------------------------------------------------- -module UseIO where +module GF.Infra.UseIO where -import Operations +import GF.Data.Operations import Arch (prCPU) -import Option +import GF.Infra.Option -import IO -import System -import Monad +import System.IO +import System.IO.Error +import System.Environment +import Control.Monad putShow' :: Show a => (c -> a) -> c -> IO () putShow' f = putStrLn . show . length . show . f |