From 20eae7786f420ce02e8043c43c82e31e49c5af72 Mon Sep 17 00:00:00 2001
From: peb <unknown>
Date: Fri, 13 May 2005 11:40:18 +0000
Subject: "Committed_by_peb"

---
 src/GF/Parsing/MCFG/ViaCFG.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/GF/Parsing/MCFG/ViaCFG.hs')

diff --git a/src/GF/Parsing/MCFG/ViaCFG.hs b/src/GF/Parsing/MCFG/ViaCFG.hs
index 5007eec20..00fff83e0 100644
--- a/src/GF/Parsing/MCFG/ViaCFG.hs
+++ b/src/GF/Parsing/MCFG/ViaCFG.hs
@@ -161,7 +161,7 @@ convert _ _                      = []
 ----------------------------------------------------------------------------------}
 
 -- FULKOD !
-nrOfCats :: Eq c => MCFG.Lin c l t  -> Int
+nrOfCats :: Eq c => MCFG.Lin c l t  -> Int
 nrOfCats (MCFG.Lin l syms) = length $ nub [(c, i) | Cat (c, l, i) <- syms]
 
 
-- 
cgit v1.2.3