[Fixes to make lib/ compile and add cabal file
Einar Karttunen <ekarttun@cs.helsinki.fi>**20060204201732] adddir ./lib/System/IO
move ./lib/System/IO.Binary.hs ./lib/System/IO/Binary.hs
move ./lib/System/IO.Unsafe.hs ./lib/System/IO/Unsafe.hs
adddir ./lib/System/Console
move ./lib/System/Console.GetOpt.hs ./lib/System/Console/GetOpt.hs
adddir ./lib/Control
addfile ./lib/Control/Monad.hs
hunk ./lib/Control/Monad.hs 1
+module Control.Monad (module Monad) where import Monad
addfile ./lib/Data/Char.hs
hunk ./lib/Data/Char.hs 1
+module Data.Char (module Char) where import Char
hunk ./lib/Data/Dynamic.hs 65
-foreign primitive "unsafeCoerce" unsafeCoerce :: a -> b
+foreign import primitive "unsafeCoerce" unsafeCoerce :: a -> b
addfile ./lib/Data/List.hs
hunk ./lib/Data/List.hs 1
+module Data.List (module List) where import List
hunk ./lib/Data/Unicode.hs 4
+import System.IO.Unsafe
hunk ./lib/Data/Unicode.hs 11
-ctype s = withCString s >>= c_wctype
+ctype s = withCString s c_wctype
hunk ./lib/Prelude/Ratio.hs 37
+{-
hunk ./lib/Prelude/Ratio.hs 39
-    toRational (x:%y)   =  toInteger x :% toInteger y
+    toRational x        =  toIntegral x :% 1
hunk ./lib/Prelude/Ratio.hs 42
-    (x:%y) / (x':%y')   =  (x*y') % (y*x')
-    recip (x:%y)        =  y % x
+    (x:%y) / (x':%y')   =  (x*y') :% (y*x')
+    recip (x:%y)        =  y :% x
hunk ./lib/Prelude/Ratio.hs 50
+-}
hunk ./lib/Prelude/Ratio.hs 63
+ratPrec = 0 -- FIXME
+
addfile ./lib/Setup.lhs
hunk ./lib/Setup.lhs 1
+> import Distribution.Simple
+> main = defaultMain
hunk ./lib/Time.hs 100
-        decode 's' = ...                -- Implementation-dependent
+--        decode 's' = ...                -- Implementation-dependent
addfile ./lib/base.cabal
hunk ./lib/base.cabal 1
+Name: base
+Version: 1.0
+Extensions: ForeignFunctionInterface
+Exposed-Modules: Array,
+                 Control.Monad,
+                 Char,
+--                 Complex,
+                 Data.Char,
+                 Data.List,
+                 Data.Word,
+                 Data.Monoid,
+                 Data.Int,
+                 Data.Bits,
+--                 Data.Dynamic,
+                 Data.IORef,
+--                 Data.Typeable,
+                 Data.Unicode,
+--                 Directory,
+                 Foreign.C.Types,
+                 Foreign.C.String,
+--                 Foreign.C.OldString,
+                 Foreign.C.Error,
+                 Foreign.Marshal.Utils,
+                 Foreign.Marshal.Error,
+                 Foreign.Marshal.Array,
+                 Foreign.Marshal.Alloc,
+                 Foreign.Storable,
+                 Foreign.Ptr,
+                 IO,
+                 Ix,
+                 Jhc.Addr,
+--                 Jhc.Array,
+                 Jhc.Handle,
+                 Jhc.IO,
+                 Jhc.Inspection,
+                 Jhc.Tuples,
+                 List,
+                 Locale,
+                 Maybe,
+                 Monad,
+                 Numeric,
+                 Prelude.Float,
+                 Prelude.IO,
+                 Prelude.IOError,
+                 Prelude.Ratio,
+                 Prelude.Text,
+                 Prelude,
+                 Random,
+                 Ratio,
+                 System.Info,
+                 System.IO.Unsafe,
+                 System.IO.Binary,
+                 System.Console.GetOpt,
+                 System
+--                 Test.QuickCheck.Utils,
+--                 Test.QuickCheck.Poly,
+--                 Test.QuickCheck.Batch,
+--                 Test.QuickCheck,
+--                 Text.Show.Functions,
+--                 Time,
+--                 Typeable
+