Commit 197c8924 authored by simonpj's avatar simonpj
Browse files

[project @ 2002-11-05 09:50:24 by simonpj]

Test for unused bindings in mutual rec groups
parent 8513c0ac
......@@ -32,6 +32,7 @@ test('rn037', normal, compile, [''])
test('rn039', normal, compile, [''])
test('rn040', expect_fail, compile, [''])
test('rn041', normal, compile, [''])
test('timing001', normal, compile, [''])
test('timing002', normal, compile, [''])
......
{-# OPTIONS -fwarn-unused-binds #-}
-- Test reports of unused bindings
module ShouldCompile( t ) where
f x = f x -- Unused
g x = h x -- Unused
h x = g x
t x = t x -- Used by export list
rn041.hs:7: Warning: Defined but not used: f, g, h
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