Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
965ad7d4
Commit
965ad7d4
authored
Feb 05, 2011
by
Ian Lynagh
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Remove the haskell98 dependency from more tests
parent
f4738c93
Changes
19
Hide whitespace changes
Inline
Side-by-side
Showing
19 changed files
with
31 additions
and
28 deletions
+31
-28
testsuite/tests/ghc-regress/array/should_run/arr016.hs
testsuite/tests/ghc-regress/array/should_run/arr016.hs
+6
-6
testsuite/tests/ghc-regress/cabal/pkg01.hs
testsuite/tests/ghc-regress/cabal/pkg01.hs
+3
-3
testsuite/tests/ghc-regress/driver/recomp003/A.hs
testsuite/tests/ghc-regress/driver/recomp003/A.hs
+1
-1
testsuite/tests/ghc-regress/driver/recomp003/Makefile
testsuite/tests/ghc-regress/driver/recomp003/Makefile
+3
-3
testsuite/tests/ghc-regress/driver/recomp003/all.T
testsuite/tests/ghc-regress/driver/recomp003/all.T
+3
-1
testsuite/tests/ghc-regress/ffi/should_run/fed001.hs
testsuite/tests/ghc-regress/ffi/should_run/fed001.hs
+1
-1
testsuite/tests/ghc-regress/indexed-types/should_compile/HO.hs
...uite/tests/ghc-regress/indexed-types/should_compile/HO.hs
+0
-1
testsuite/tests/ghc-regress/indexed-types/should_compile/HO.stderr
.../tests/ghc-regress/indexed-types/should_compile/HO.stderr
+1
-1
testsuite/tests/ghc-regress/indexed-types/should_run/GMapAssoc.hs
...e/tests/ghc-regress/indexed-types/should_run/GMapAssoc.hs
+1
-1
testsuite/tests/ghc-regress/indexed-types/should_run/GMapTop.hs
...ite/tests/ghc-regress/indexed-types/should_run/GMapTop.hs
+1
-1
testsuite/tests/ghc-regress/indexed-types/should_run/T4235.hs
...suite/tests/ghc-regress/indexed-types/should_run/T4235.hs
+1
-1
testsuite/tests/ghc-regress/lib/Data.List/genericNegative001.hs
...ite/tests/ghc-regress/lib/Data.List/genericNegative001.hs
+1
-1
testsuite/tests/ghc-regress/mdo/should_compile/mdo005.hs
testsuite/tests/ghc-regress/mdo/should_compile/mdo005.hs
+1
-1
testsuite/tests/ghc-regress/mdo/should_run/mdorun001.hs
testsuite/tests/ghc-regress/mdo/should_run/mdorun001.hs
+1
-1
testsuite/tests/ghc-regress/rebindable/DoRestrictedM.hs
testsuite/tests/ghc-regress/rebindable/DoRestrictedM.hs
+1
-1
testsuite/tests/ghc-regress/simplCore/prog002/Simpl009Help.hs
...suite/tests/ghc-regress/simplCore/prog002/Simpl009Help.hs
+1
-1
testsuite/tests/ghc-regress/simplCore/prog002/simpl009.hs
testsuite/tests/ghc-regress/simplCore/prog002/simpl009.hs
+1
-1
testsuite/tests/ghc-regress/stranal/should_run/strun003.hs
testsuite/tests/ghc-regress/stranal/should_run/strun003.hs
+3
-1
testsuite/tests/ghc-regress/th/T4188.hs
testsuite/tests/ghc-regress/th/T4188.hs
+1
-1
No files found.
testsuite/tests/ghc-regress/array/should_run/arr016.hs
View file @
965ad7d4
...
...
@@ -7,14 +7,14 @@ module Main where
-
-}
import
qualified
Array
import
List
import
Monad
(
liftM2
,
liftM3
,
liftM4
)
import
Random
import
qualified
Data.Array
as
Array
import
Data.
List
import
Control.
Monad
(
liftM2
,
liftM3
,
liftM4
)
import
System.
Random
import
Ix
import
List
(
(
\\
)
)
import
Data.
Ix
import
Data.
List
(
(
\\
)
)
infixl
9
!
,
//
infixr
0
==>
...
...
testsuite/tests/ghc-regress/cabal/pkg01.hs
View file @
965ad7d4
module
Char
where
-- conflicts with module from
haskell98
package
import
IO
module
Data.Map
where
-- conflicts with module from
containers
package
import
Data.Set
testsuite/tests/ghc-regress/driver/recomp003/A.hs
View file @
965ad7d4
module
A
where
import
Char
import
Data.
Char
testsuite/tests/ghc-regress/driver/recomp003/Makefile
View file @
965ad7d4
...
...
@@ -8,10 +8,10 @@ OBJSUFFIX = .o
# recompilation. Part of bug #1372.
recomp003
:
$(RM)
A.hi A
$(OBJSUFFIX)
out
$(RM)
Char.hs Char.hi Char
$(OBJSUFFIX)
$(RM)
Data/
Char.hs
Data/
Char.hi
Data/
Char
$(OBJSUFFIX)
'
$(TEST_HC)
'
-c
A.hs
echo
"module Char where"
>
Char.hs
'
$(TEST_HC)
'
-c
Char.hs
echo
"module
Data.
Char where"
>
Data/
Char.hs
'
$(TEST_HC)
'
-c
Data/
Char.hs
# Should now recompile A.hs, because Char is now a home module:
'
$(TEST_HC)
'
-c
A.hs 2>err
@
if
grep
NOT err
;
then
false
;
fi
testsuite/tests/ghc-regress/driver/recomp003/all.T
View file @
965ad7d4
test
('
recomp003
',
extra_clean
(['
Char.hs
',
'
err
']),
extra_clean
(['
Data/Char.hs
',
'
Data/Char.hi
',
'
Data/Char.o
',
'
A.o
',
'
A.hi
',
'
err
']),
run_command
,
['
$MAKE -s --no-print-directory recomp003
'])
testsuite/tests/ghc-regress/ffi/should_run/fed001.hs
View file @
965ad7d4
import
Control.Monad
import
Foreign
import
Monad
import
Foreign.Ptr
type
CInt
=
Int32
...
...
testsuite/tests/ghc-regress/indexed-types/should_compile/HO.hs
View file @
965ad7d4
...
...
@@ -2,7 +2,6 @@
module
HO
where
import
IO
import
Data.IORef
type
family
SMRef
(
m
::
(
*
->
*
))
::
*
->
*
...
...
testsuite/tests/ghc-regress/indexed-types/should_compile/HO.stderr
View file @
965ad7d4
HO.hs:1
5
:1:
HO.hs:1
4
:1:
Alas, GHC 7.0 still cannot handle equality superclasses:
SMMonad (SMRef m) ~ m
In the context: (SMMonad (SMRef m) ~ m)
...
...
testsuite/tests/ghc-regress/indexed-types/should_run/GMapAssoc.hs
View file @
965ad7d4
...
...
@@ -3,7 +3,7 @@
module
Main
where
import
Prelude
hiding
(
lookup
)
import
Char
(
ord
)
import
Data.
Char
(
ord
)
import
qualified
Data.Map
as
Map
...
...
testsuite/tests/ghc-regress/indexed-types/should_run/GMapTop.hs
View file @
965ad7d4
...
...
@@ -3,7 +3,7 @@
module
Main
where
import
Prelude
hiding
(
lookup
)
import
Char
(
ord
)
import
Data.
Char
(
ord
)
import
qualified
Data.Map
as
Map
...
...
testsuite/tests/ghc-regress/indexed-types/should_run/T4235.hs
View file @
965ad7d4
{-# LANGUAGE TypeFamilies, StandaloneDeriving, FlexibleInstances, GADTs #-}
module
Main
where
import
Ix
import
Data.
Ix
-- Deriving Enum with phantom type parameter
data
T
a
=
R
|
S
|
T
deriving
(
Enum
,
Show
)
...
...
testsuite/tests/ghc-regress/lib/Data.List/genericNegative001.hs
View file @
965ad7d4
-- Test for http://hackage.haskell.org/trac/ghc/ticket/2533
import
System.Environment
import
List
import
Data.
List
main
=
do
(
n
:
_
)
<-
getArgs
print
(
genericTake
(
read
n
)
"none taken"
)
...
...
testsuite/tests/ghc-regress/mdo/should_compile/mdo005.hs
View file @
965ad7d4
...
...
@@ -5,7 +5,7 @@
module
Main
(
main
)
where
import
Control.Monad.Fix
import
Maybe
(
fromJust
)
import
Data.
Maybe
(
fromJust
)
t
=
mdo
x
<-
fromJust
(
mdo
x
<-
Just
(
1
:
x
)
return
(
take
4
x
))
...
...
testsuite/tests/ghc-regress/mdo/should_run/mdorun001.hs
View file @
965ad7d4
...
...
@@ -4,7 +4,7 @@ module Main(main) where
import
Control.Monad.Fix
import
Data.Array.IO
import
Monad
import
Control.
Monad
norm
a
=
mdo
(
_
,
sz
)
<-
getBounds
a
s
<-
ioaA
1
s
sz
0
...
...
testsuite/tests/ghc-regress/rebindable/DoRestrictedM.hs
View file @
965ad7d4
...
...
@@ -11,7 +11,7 @@
module
DoRestrictedM
where
import
List
import
Data.
List
import
Prelude
(
const
,
String
,
(
$
),
(
.
),
Maybe
(
..
))
import
qualified
Prelude
import
qualified
Data.Set
as
Set
...
...
testsuite/tests/ghc-regress/simplCore/prog002/Simpl009Help.hs
View file @
965ad7d4
...
...
@@ -4,7 +4,7 @@
module
Simpl009Help
where
import
Monad
import
Control.
Monad
newtype
Parser
s
a
=
Parser
(
forall
res
.
(
a
->
[
String
]
->
P
s
res
)
->
[
String
]
->
P
s
res
)
...
...
testsuite/tests/ghc-regress/simplCore/prog002/simpl009.hs
View file @
965ad7d4
...
...
@@ -9,7 +9,7 @@
module
FormParse
where
import
Monad
import
Control.
Monad
import
Simpl009Help
identifier
::
Parser
Char
Char
...
...
testsuite/tests/ghc-regress/stranal/should_run/strun003.hs
View file @
965ad7d4
...
...
@@ -5,7 +5,9 @@
-- See the io_hack_reqd in DmdAnal.lhs
module
Main
where
import
System
import
System.Environment
import
System.Exit
main
=
do
args
<-
getArgs
...
...
testsuite/tests/ghc-regress/th/T4188.hs
View file @
965ad7d4
...
...
@@ -3,7 +3,7 @@
module
T4188
where
import
Language.Haskell.TH
import
IO
import
System.
IO
class
C
a
where
{}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment