[commit: hpc] master: Fixed imports (2aee61d)
Daniel Fischer
dafis at galois.com
Sat Sep 3 23:16:31 CEST 2011
Repository : ssh://darcs.haskell.org//srv/darcs/packages/hpc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/2aee61df29e783830300004749ee97f5933a83a4
>---------------------------------------------------------------
commit 2aee61df29e783830300004749ee97f5933a83a4
Author: Daniel Fischer <daniel.is.fischer at googlemail.com>
Date: Sat Sep 3 22:38:54 2011 +0200
Fixed imports
Removed redundant imports and changed others from H98 to hierarchical modules.
>---------------------------------------------------------------
tests/raytrace/Data.hs | 2 +-
tests/raytrace/Eval.hs | 2 +-
tests/raytrace/Geometry.hs | 1 -
tests/raytrace/Illumination.hs | 6 +++---
tests/raytrace/Intersections.hs | 2 +-
tests/raytrace/Main.hs | 2 --
tests/raytrace/Parse.hs | 2 +-
tests/raytrace/Pixmap.hs | 6 +++---
8 files changed, 10 insertions(+), 13 deletions(-)
diff --git a/tests/raytrace/Data.hs b/tests/raytrace/Data.hs
index cb0b2bf..d103766 100644
--- a/tests/raytrace/Data.hs
+++ b/tests/raytrace/Data.hs
@@ -5,7 +5,7 @@
module Data where
-import Array
+import Data.Array
import CSG
import Geometry
diff --git a/tests/raytrace/Eval.hs b/tests/raytrace/Eval.hs
index 675612c..3ce24e4 100644
--- a/tests/raytrace/Eval.hs
+++ b/tests/raytrace/Eval.hs
@@ -5,7 +5,7 @@
module Eval where
-import Array
+import Data.Array
import Geometry
import CSG
diff --git a/tests/raytrace/Geometry.hs b/tests/raytrace/Geometry.hs
index 0bb90ed..39592bc 100644
--- a/tests/raytrace/Geometry.hs
+++ b/tests/raytrace/Geometry.hs
@@ -61,7 +61,6 @@ module Geometry
, clampf
) where
-import List
type Coords = (Double,Double,Double)
diff --git a/tests/raytrace/Illumination.hs b/tests/raytrace/Illumination.hs
index ec3e1ae..34365b9 100644
--- a/tests/raytrace/Illumination.hs
+++ b/tests/raytrace/Illumination.hs
@@ -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
diff --git a/tests/raytrace/Intersections.hs b/tests/raytrace/Intersections.hs
index c0f282d..58210c3 100644
--- a/tests/raytrace/Intersections.hs
+++ b/tests/raytrace/Intersections.hs
@@ -8,7 +8,7 @@ module Intersections
quadratic
) where
-import Maybe(isJust)
+import Data.Maybe(isJust)
import Construct
import Geometry
diff --git a/tests/raytrace/Main.hs b/tests/raytrace/Main.hs
index 4ef9fe3..e8c88ad 100644
--- a/tests/raytrace/Main.hs
+++ b/tests/raytrace/Main.hs
@@ -7,8 +7,6 @@
module Main where
-import System
-
import Parse
import Eval
diff --git a/tests/raytrace/Parse.hs b/tests/raytrace/Parse.hs
index 8a8c0e1..26aeb05 100644
--- a/tests/raytrace/Parse.hs
+++ b/tests/raytrace/Parse.hs
@@ -5,7 +5,7 @@
module Parse where
-import Char
+import Data.Char
import Text.ParserCombinators.Parsec hiding (token)
import Data
diff --git a/tests/raytrace/Pixmap.hs b/tests/raytrace/Pixmap.hs
index db6a919..edb75af 100644
--- a/tests/raytrace/Pixmap.hs
+++ b/tests/raytrace/Pixmap.hs
@@ -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
More information about the Cvs-libraries
mailing list