From cc6dce5ead10b02b9787e750311a2b94ff516299 Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Sun, 23 Mar 2008 12:40:06 +0000
Subject: [PATCH] Tidied up the export/import lists for GenerateC and
 GenerateCPPCSP

---
 backends/GenerateC.hs      | 21 +++++++++++++++++++--
 backends/GenerateCPPCSP.hs |  3 ++-
 2 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/backends/GenerateC.hs b/backends/GenerateC.hs
index 2e2f92a..de6ba2e 100644
--- a/backends/GenerateC.hs
+++ b/backends/GenerateC.hs
@@ -16,8 +16,25 @@ You should have received a copy of the GNU General Public License along
 with this program.  If not, see <http://www.gnu.org/licenses/>.
 -}
 
--- | Generate C code from the mangled AST.
-module GenerateC (cgenOps, cgenReplicatorLoop, cgenType, cintroduceSpec, cPreReq, genComma, genCPasses, generate, generateC, genLeftB, genMeta, genName, genRightB, seqComma, withIf ) where
+-- | Generate C code from the mangled AST.  Most of the exports here are actually
+-- for GenerateCPPCSP to use
+module GenerateC
+  ( cgenOps
+  , cgenReplicatorLoop
+  , cgenType
+  , cintroduceSpec
+  , cPreReq
+  , genComma
+  , genCPasses
+  , generate
+  , generateC
+  , genLeftB
+  , genMeta
+  , genName
+  , genRightB
+  , seqComma
+  , withIf
+  ) where
 
 import Data.Char
 import Data.Generics
diff --git a/backends/GenerateCPPCSP.hs b/backends/GenerateCPPCSP.hs
index cdb9917..867b4ec 100644
--- a/backends/GenerateCPPCSP.hs
+++ b/backends/GenerateCPPCSP.hs
@@ -39,7 +39,8 @@ import System.IO
 
 import qualified AST as A
 import CompState
-import GenerateC (cgenOps, cintroduceSpec, cgenReplicatorLoop, cgenType, generate, genComma, genLeftB, genMeta, genName, genRightB, seqComma, withIf)
+import GenerateC (cgenOps, cgenReplicatorLoop, cgenType, cintroduceSpec,
+  generate, genComma, genLeftB, genMeta, genName, genRightB, seqComma, withIf)
 import GenerateCBased
 import Metadata
 import Pass