[project @ 2002-01-03 11:43:41 by simonmar]

Export nonEmptySRT.

diff --git a/ghc/compiler/stgSyn/StgSyn.lhs b/ghc/compiler/stgSyn/StgSyn.lhs
index 7fd945a..293aa94 100644 (file)
--- a/ghc/compiler/stgSyn/StgSyn.lhs
+++ b/ghc/compiler/stgSyn/StgSyn.lhs
@@ -31,7 +31,7 @@ module StgSyn (
        StgOp(..),
 
        -- SRTs
-       SRT(..), noSRT,
+       SRT(..), noSRT, nonEmptySRT,
 
        -- utils
        stgBindHasCafRefs,  stgRhsArity, getArgPrimRep,