From: simonmar Date: Thu, 24 Aug 2000 11:45:24 +0000 (+0000) Subject: [project @ 2000-08-24 11:45:24 by simonmar] X-Git-Tag: Approximately_9120_patches~3833 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=36880fdb4e6458a5da209bf7a430c97293547156;p=ghc-hetmet.git [project @ 2000-08-24 11:45:24 by simonmar] Add two tests for signatures without definitions. --- diff --git a/ghc/tests/rename/should_fail/rnfail024.hs b/ghc/tests/rename/should_fail/rnfail024.hs new file mode 100644 index 0000000..4663319 --- /dev/null +++ b/ghc/tests/rename/should_fail/rnfail024.hs @@ -0,0 +1,6 @@ +module ShouldFail where + +sig_without_a_defn :: a -> b + +f :: a -> b +f = sig_without_a_defn diff --git a/ghc/tests/rename/should_fail/rnfail024.stderr b/ghc/tests/rename/should_fail/rnfail024.stderr new file mode 100644 index 0000000..b8769fc --- /dev/null +++ b/ghc/tests/rename/should_fail/rnfail024.stderr @@ -0,0 +1,7 @@ + +rnfail024.hs:3: Variable not in scope: `sig_without_a_defn' + +rnfail024.hs:6: Variable not in scope: `sig_without_a_defn' + +Compilation had errors + diff --git a/ghc/tests/rename/should_fail/rnfail025.hs b/ghc/tests/rename/should_fail/rnfail025.hs new file mode 100644 index 0000000..42cf3d7 --- /dev/null +++ b/ghc/tests/rename/should_fail/rnfail025.hs @@ -0,0 +1,6 @@ +module ShouldFail where + +sig_without_a_defn :: a -> b + +-- We don't even refer to the variable. This compiled without error +-- in ghc-4.08. diff --git a/ghc/tests/rename/should_fail/rnfail025.stderr b/ghc/tests/rename/should_fail/rnfail025.stderr new file mode 100644 index 0000000..c0640fd --- /dev/null +++ b/ghc/tests/rename/should_fail/rnfail025.stderr @@ -0,0 +1,5 @@ + +rnfail025.hs:3: Variable not in scope: `sig_without_a_defn' + +Compilation had errors +