[project @ 2001-08-16 13:32:32 by simonmar]

Bring these tests up to date.

testsuite/tests/ghc-regress/codeGen/should_run/all.T

@@ -27,9 +27,8 @@ test "cg019" { vtr("", "", "") }
 test "cg020" { vtr("", "", "") }
 test "cg021" { vtr("", "", "") }
 test "cg022" { vtr("", "", "") }
-test "cg023" { vtr("", "", "") }
 test "cg024" { vtr("", "", "") }
-test "cg025" { vtr("-package lang -package text", "", "1") }
+test "cg025" { vtr("-package lang -package text", "cg025.hs", "1") }
 test "cg026" { vtr("-package lang -fglasgow-exts -fvia-C", "", "") }
 test "cg027" { vtr("", "", "") }
 test "cg028" { vtr("", "", "") }
@@ -45,12 +44,11 @@ test "cg037" { vtr("", "", "") }
 test "cg038" { vtr("", "", "") }
 test "cg039" { vtr("", "", "") }
 test "cg040" { vtr("", "", "") }
-test "cg041" { vtr("", "", "") }
 test "cg042" { vtr("-package lang -fglasgow-exts", "", "") }
 test "cg043" { vtr("", "", "") }
 test "cg044" { vtr("-package lang", "", "" ) }
 
--- tmp, until we fix the problems with seq#...
+-- -O is tmporary, until we fix the problems with seq#...
 test "cg045" { vtr( "-O", "", "1") }
 test "cg046" { vtr("", "", "") }
 test "cg047" { vtr("", "", "") }

testsuite/tests/ghc-regress/codeGen/should_run/cg025.stderr

-"cg025.bin"
+"cg025"
 ["cg025.hs"]
 GOT PATH
 -- !!! test various I/O Requests
@@ -12,7 +12,7 @@ import Maybe
 
 main = do
     prog <- getProgName
-    let Just (name:_) = matchRegex (mkRegex ".*(cg025.bin)") prog
+    let Just (name:_) = matchRegex (mkRegex ".*(cg025)") prog
     hPutStr stderr (shows name "\n")
     args <- getArgs
     hPutStr stderr (shows args "\n")

testsuite/tests/ghc-regress/codeGen/should_run/cg035.hs

-{-# OPTIONS -optc-DNON_POSIX_SOURCE #-}
-
--- The above option is required because 'erf' isn't a POSIX function, and we
--- need a prototype for it in order to compile the following code correctly.
--- Defining NON_POSIX_SOURCE tells the RTS not to define _POSIX_SOURCE.
-
 module Main (main) where
 
 import IOExts ( unsafePerformIO )

testsuite/tests/ghc-regress/codeGen/should_run/run

-#!/bin/sh
-
-# Run the tests in this directory in an easy way
-# The next line is the only one you need to modify
-#   should this directory change location relative to
-#   the top of the testsuite dir
-TESTSUITE_ROOT=../../../..
-
-# We assume that $TESTSUITE_ROOT/config/default/default.T is a symlink
-# to the real config file you wish to use.
-
-exec $TESTSUITE_ROOT/driver/runtests \
-   --tool=$TESTSUITE_ROOT/../ghc/compiler/ghc-inplace \
-   --config=$TESTSUITE_ROOT/config/default/default.T \
-   --rootdir=. \
-   $*