From a8d356d59913f0ac32b1066fadca0fb674d79385 Mon Sep 17 00:00:00 2001
From: bringert <bringert@cs.chalmers.se>
Date: Tue, 20 Mar 2007 21:15:59 +0000
Subject: Renamed removeEmptyCats to bottomUpFilter.

---
 src/GF/Speech/TransformCFG.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/GF/Speech/TransformCFG.hs')

diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs
index eb63ad57a..689125ef3 100644
--- a/src/GF/Speech/TransformCFG.hs
+++ b/src/GF/Speech/TransformCFG.hs
@@ -87,8 +87,8 @@ stateGFCC :: StateGrammar -> GFCC
 stateGFCC = mkGFCC . mkCanon2gfcc . stateGrammarST
 
 -- | Remove productions which use categories which have no productions
-removeEmptyCats :: CFRules -> CFRules
-removeEmptyCats = fix removeEmptyCats'
+bottomUpFilter :: CFRules -> CFRules
+bottomUpFilter = fix removeEmptyCats'
     where
     removeEmptyCats' :: CFRules -> CFRules
     removeEmptyCats' rs = k'
-- 
cgit v1.2.3