Replace "CId" with "Language" in type signature for PGF.tabularLinearizes

This commit is contained in:
john.j.camilleri
2013-04-02 09:19:08 +00:00
parent bfa7ce816c
commit 5dbeb4beee

View File

@@ -50,7 +50,7 @@ firstLin (_,arr)
-- | Creates a table from feature name to linearization.
-- The outher list encodes the variations
tabularLinearizes :: PGF -> CId -> Expr -> [[(String,String)]]
tabularLinearizes :: PGF -> Language -> Expr -> [[(String,String)]]
tabularLinearizes pgf lang e = map cnv (linTree pgf lang e)
where
cnv ((cat,_),lin) = zip (lbls cat) $ map (unwords . concatMap flattenBracketedString . snd . untokn "") (elems lin)