summaryrefslogtreecommitdiff
path: root/compiler/ndpFlatten/FlattenInfo.hs
diff options
context:
space:
mode:
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>2008-03-09 22:59:14 +0000
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>2008-03-09 22:59:14 +0000
commite415eeaf6c7771488af24758ca5b9c22c42be3a6 (patch)
tree020af4a5e38b18c7bfbbaa404e042f939abf225f /compiler/ndpFlatten/FlattenInfo.hs
parentc0f21abc488d367252d8dd9287c3c84cf50b9125 (diff)
downloadhaskell-e415eeaf6c7771488af24758ca5b9c22c42be3a6.tar.gz
Remove ndpFlatten
This patch removes the ndpFlatten directory and the -fflatten static flag. This code has never worked and has now been superceded by vectorisation.
Diffstat (limited to 'compiler/ndpFlatten/FlattenInfo.hs')
-rw-r--r--compiler/ndpFlatten/FlattenInfo.hs42
1 files changed, 0 insertions, 42 deletions
diff --git a/compiler/ndpFlatten/FlattenInfo.hs b/compiler/ndpFlatten/FlattenInfo.hs
deleted file mode 100644
index 928b5df181..0000000000
--- a/compiler/ndpFlatten/FlattenInfo.hs
+++ /dev/null
@@ -1,42 +0,0 @@
--- $Id$
---
--- Copyright (c) 2002 Manuel M T Chakravarty & Gabriele Keller
---
--- Information for modules outside of the flattening module collection.
---
---- DESCRIPTION ---------------------------------------------------------------
---
--- This module contains information that is needed, and thus imported, by
--- modules that are otherwise independent of flattening and may in fact be
--- directly or indirectly imported by some of the flattening-related
--- modules. This is to avoid cyclic module dependencies.
---
---- DOCU ----------------------------------------------------------------------
---
--- Language: Haskell 98
---
---- TODO ----------------------------------------------------------------------
---
-module FlattenInfo (
- namesNeededForFlattening
-) where
-
-import StaticFlags (opt_Flatten)
-import NameSet (FreeVars, emptyFVs, mkFVs)
-import PrelNames (fstName, andName, orName, lengthPName, replicatePName,
- mapPName, bpermutePName, bpermuteDftPName, indexOfPName)
-
-
--- this is a list of names that need to be available if flattening is
--- performed (EXPORTED)
---
--- * needs to be kept in sync with the names used in Core generation in
--- `FlattenMonad' and `NDPCoreUtils'
---
-namesNeededForFlattening :: FreeVars
-namesNeededForFlattening
- | not opt_Flatten = emptyFVs -- none without -fflatten
- | otherwise
- = mkFVs [fstName, andName, orName, lengthPName, replicatePName, mapPName,
- bpermutePName, bpermuteDftPName, indexOfPName]
- -- stuff from PrelGHC doesn't have to go here