Commit a4ca1e3e authored by simonmar's avatar simonmar
Browse files

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

Bring these tests up to date.
parent 60a369a3
......@@ -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("", "", "") }
......
"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")
......
{-# 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 )
......
#!/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=. \
$*
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