cp1251 coding ; trying to recognize the coding flag in grammar

This commit is contained in:
aarne
2008-06-24 13:58:04 +00:00
parent 223480bb77
commit 239f310eb5
4 changed files with 41 additions and 10 deletions

View File

@@ -60,4 +60,8 @@ isFlag o opts = elem o [x | OFlag x _ <- opts]
prOpt :: Option -> String
prOpt (OOpt i) = i ----
mkOpt :: String -> Option
mkOpt = OOpt