Commit 8d8d17ff authored by simonmar's avatar simonmar
Browse files

[project @ 2004-03-10 11:50:55 by simonmar]

remove hslibs dependencies
parent b171ecda
......@@ -69,7 +69,7 @@ test('tc061', normal, compile, [''])
test('tc062', normal, compile, [''])
test('tc063', normal, compile, [''])
test('tc064', normal, compile, [''])
test('tc065', normal, compile, ['-package lang -package data'])
test('tc065', normal, compile, [''])
test('tc066', normal, compile, [''])
test('tc067', normal, compile, [''])
test('tc068', normal, compile, [''])
......@@ -85,10 +85,10 @@ test('tc080', normal, compile, [''])
test('tc081', normal, compile, [''])
test('tc082', normal, compile, [''])
test('tc084', normal, compile, [''])
test('tc085', normal, compile, ['-package lang'])
test('tc085', normal, compile, [''])
test('tc086', normal, compile, [''])
test('tc087', normal, compile, ['-fglasgow-exts'])
test('tc088', normal, compile, ['-package lang'])
test('tc088', normal, compile, [''])
test('tc089', normal, compile, [''])
test('tc090', normal, compile, [''])
test('tc091', normal, compile, [''])
......@@ -131,7 +131,7 @@ test('tc128', normal, compile, [''])
test('tc129', normal, compile, [''])
test('tc130', normal, compile, [''])
test('tc131', normal, compile, [''])
test('tc132', normal, compile, ['-package lang'])
test('tc132', normal, compile, [''])
test('tc133', normal, compile, [''])
test('tc134', normal, compile, [''])
test('tc135', normal, compile, [''])
......
module ShouldSucceed where
-- import TheUtils
import Set
import List (partition )
import Data.Set
import Data.List (partition )
data Digraph vertex = MkDigraph [vertex]
......
{-# OPTIONS -fglasgow-exts #-}
-- !!! From a bug report from Satnam.
-- !!! To do with re-exporting importees from PreludeGla* modules.
module ShouldSucceed ( module IOExts, module GHC.Prim ) where
module ShouldSucceed ( module GHC.Prim ) where
import IOExts
import GHC.Prim
type FooType = Int
......
......@@ -3,7 +3,8 @@
-- Fails with GHC 5.00.1
module Test where
import ST
import Control.Monad.ST
import Data.STRef
-- Should get
-- apa :: forall s. ST s ()
......
......@@ -66,7 +66,7 @@ test('tcfail076', normal, compile_fail, [''])
test('tcfail077', normal, compile_fail, [''])
test('tcfail078', normal, compile_fail, [''])
test('tcfail079', normal, compile_fail, [''])
test('tcfail080', expect_fail, compile_fail, ['-fglasgow-exts -package lang'])
test('tcfail080', expect_fail, compile_fail, ['-fglasgow-exts'])
test('tcfail082', normal, compile_fail, [''])
test('tcfail083', normal, compile_fail, [''])
test('tcfail084', normal, compile_fail, [''])
......
......@@ -24,7 +24,7 @@ test('tcrun018', normal, compile_and_run, [''])
test('tcrun019', normal, compile_and_run, [''])
test('tcrun020', normal, compile_and_run, [''])
# Doesn't work with External Core due to datatype with no constructors
test('tcrun021', expect_fail_for(['extcore','optextcore']), compile_and_run, ['-package data'])
test('tcrun021', expect_fail_for(['extcore','optextcore']), compile_and_run, [''])
test('tcrun022', normal, compile_and_run, ['-O -fglasgow-exts'])
test('tcrun023', normal, compile_and_run, ['-O'])
test('tcrun024', normal, compile_and_run, ['-O'])
......
......@@ -6,8 +6,8 @@
module Main where
import List
import FiniteMap
import Data.List
import Data.FiniteMap
class (Ord oid) => Object o oid | o -> oid where
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment