Fixed imports
authorDaniel Fischer <daniel.is.fischer@googlemail.com>
Sat, 3 Sep 2011 20:38:54 +0000 (22:38 +0200)
committerDaniel Fischer <daniel.is.fischer@googlemail.com>
Sat, 3 Sep 2011 20:38:54 +0000 (22:38 +0200)
Removed redundant imports and changed others from H98 to hierarchical modules.

tests/raytrace/Data.hs
tests/raytrace/Eval.hs
tests/raytrace/Geometry.hs
tests/raytrace/Illumination.hs
tests/raytrace/Intersections.hs
tests/raytrace/Main.hs
tests/raytrace/Parse.hs
tests/raytrace/Pixmap.hs

index cb0b2bf..d103766 100644 (file)
@@ -5,7 +5,7 @@
 
 module Data where
 
-import Array
+import Data.Array
 
 import CSG
 import Geometry
index 675612c..3ce24e4 100644 (file)
@@ -5,7 +5,7 @@
 
 module Eval where
 
-import Array
+import Data.Array
 
 import Geometry
 import CSG
index 0bb90ed..39592bc 100644 (file)
@@ -61,7 +61,6 @@ module Geometry
     , clampf
     ) where
 
-import List
 
 type Coords = (Double,Double,Double)
 
index ec3e1ae..34365b9 100644 (file)
@@ -12,9 +12,9 @@ module Illumination
     , render
     ) where
 
-import Array
-import Char(chr)
-import Maybe
+import Data.Array
+import Data.Char(chr)
+import Data.Maybe
 
 import Geometry
 import CSG
index c0f282d..58210c3 100644 (file)
@@ -8,7 +8,7 @@ module Intersections
       quadratic
     ) where
 
-import Maybe(isJust)
+import Data.Maybe(isJust)
 
 import Construct
 import Geometry
index 4ef9fe3..e8c88ad 100644 (file)
@@ -7,8 +7,6 @@
 
 module Main where
 
-import System
-
 import Parse
 import Eval
 
index 8a8c0e1..26aeb05 100644 (file)
@@ -5,7 +5,7 @@
 
 module Parse where
 
-import Char
+import Data.Char
 import Text.ParserCombinators.Parsec hiding (token)
 
 import Data
index db6a919..edb75af 100644 (file)
@@ -5,9 +5,9 @@
 
 module Pixmap where
 
-import Char
-import IO hiding (try)
-import Parsec
+import Data.Char
+import System.IO hiding (try)
+import Text.ParserCombinators.Parsec
 
 readPPM f
   = do  h <- openFile f ReadMode