Added regexps grammar printer. This is a first step towards recursion-free SRGS.

This commit is contained in:
bringert
2007-06-20 16:08:23 +00:00
parent 91dcc27668
commit 6968004f19
4 changed files with 21 additions and 7 deletions

View File

@@ -52,7 +52,7 @@ type MutRecSets = Map Cat_ MutRecSet
--
data MFALabel a = MFASym a | MFASub String
deriving Eq
deriving (Eq,Ord)
data MFA a = MFA (DFA (MFALabel a)) [(String,DFA (MFALabel a))]