Commit 1ecb52f4 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Remove more -fglasgow-exts uses from tests

parent 22535fa3
{-# OPTIONS -fglasgow-exts -cpp #-}
{-# LANGUAGE CPP #-}
-- Optimisation problem. There are two missed opportunities for optimisation in alex_scan_tkn, below.
......
......@@ -19,7 +19,7 @@ test('arr012', skip_if_fast, compile_and_run, [''])
test('arr013', skip_if_fast, compile_and_run, [''])
test('arr014', skip_if_fast, compile_and_run, [''])
test('arr015', skip_if_fast, compile_and_run, [''])
test('arr016', normal, compile_and_run, ['-fglasgow-exts'])
test('arr016', normal, compile_and_run, [''])
test('arr017', skip_if_fast, compile_and_run, [''])
test('arr018', skip_if_fast, compile_and_run, [''])
test('arr019', normal, compile_and_run, [''])
{-# LANGUAGE ScopedTypeVariables #-}
module Main where
{-
......
{-# OPTIONS -fglasgow-exts #-}
{-# LANGUAGE Arrows #-}
{-# LANGUAGE Arrows, ExistentialQuantification #-}
-- Crashed GHC 6.4 with a lint error
-- because of the existential
......
{-# OPTIONS -fglasgow-exts #-}
{-# LANGUAGE Arrows #-}
{-# LANGUAGE Arrows, MultiParamTypeClasses, FlexibleInstances #-}
-- Simple expression parser
-- (uses do-notation and operators)
......
{-# OPTIONS_GHC -fglasgow-exts #-}
{-# LANGUAGE RankNTypes #-}
module Church1 where
-- Church numerals w/o extra type constructors
......
{-# OPTIONS_GHC -fglasgow-exts #-}
{-# LANGUAGE RankNTypes #-}
module Church2 where
-- Church numerals w/o extra type constructors: Should fail
......
{-# OPTIONS_GHC -fglasgow-exts #-}
{-# LANGUAGE Rank2Types #-}
module SystemF where
-- System-F examples
......
......@@ -9,13 +9,13 @@ test('cgrun008', normal, compile_and_run, [''])
test('cgrun009', normal, compile_and_run, [''])
test('cgrun010', normal, compile_and_run, [''])
test('cgrun011', normal, compile_and_run, [''])
test('cgrun012', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun012', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun013', normal, compile_and_run, [''])
test('cgrun014', normal, compile_and_run, [''])
test('cgrun015', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun015', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun016', exit_code(1), compile_and_run, [''])
test('cgrun017', normal, compile_and_run, [''])
test('cgrun018', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun018', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun019', normal, compile_and_run, [''])
test('cgrun020', normal, compile_and_run, [''])
test('cgrun021', normal, compile_and_run, [''])
......@@ -28,11 +28,11 @@ test('cgrun025', compose(reqlib('regex-compat'), compose(extra_run_opts('cg025.h
test('cgrun026', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun027', normal, compile_and_run, [''])
test('cgrun028', normal, compile_and_run, [''])
test('cgrun031', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun032', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun033', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cgrun031', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun032', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun033', only_compiler_types(['ghc']), compile_and_run, [''])
test('cgrun034', normal, compile_and_run, [''])
test('cgrun035', normal, compile_and_run, ['-fglasgow-exts'])
test('cgrun035', normal, compile_and_run, [''])
test('cgrun036', normal, compile_and_run, [''])
test('cgrun037', normal, compile_and_run, [''])
test('cgrun038', normal, compile_and_run, [''])
......
{-# LANGUAGE MagicHash #-}
-- !!! move arguments around on the stacks, mainly the B stack
import GHC.Base ( Float#, Double#, Int#, Int(..) )
......
{-# LANGUAGE MagicHash #-}
module Main ( main ) where
import Foreign
......
{-# LANGUAGE MagicHash #-}
-- !!! test of datatype with many unboxed fields
--
import GHC.Base( Float# )
......
{-# OPTIONS -fglasgow-exts #-}
{-# LANGUAGE MagicHash #-}
-- !!! simple tests of primitive arrays
--
......
{-# LANGUAGE MagicHash #-}
-- !! test GEN reps w/ unboxed values in them
-- !! NB: it was the static ones that were hosed...
--
......
{-# LANGUAGE MagicHash #-}
-- !! pattern-matching failure on functions that return Int#
--import PrelBase --ghc1.3
......
{-# LANGUAGE MagicHash #-}
-- !! worker/wrapper turns ( \ <absent> -> Int# ) function
-- !! into Int# -- WRONG
......
{-# OPTIONS -fglasgow-exts #-}
module Main( main ) where
......
{-# OPTIONS -fglasgow-exts #-}
module Main where
......
{-# OPTIONS_GHC -fglasgow-exts #-}
{-# LANGUAGE MultiParamTypeClasses, FunctionalDependencies #-}
module Collection where
......
{-# OPTIONS -fglasgow-exts #-}
module Main where
......
Markdown is supported
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