use the native unicode support from GHC 6.12
This commit is contained in:
1 parent
8b5827fc89
commit
6313244eac
23 files changed
+177
-490
No files matched your search
@@ -441,9 +441,7 @@ Exp6
|
||||
| '?' { Meta 0 }
|
||||
| '[' ']' { Empty }
|
||||
| '[' Ident Exps ']' { foldl App (Vr (mkListId $2)) $3 }
|
||||
| '[' String ']' { case $2 of
|
||||
[] -> Empty
|
||||
str -> foldr1 C (map K (words str)) }
|
||||
| '[' String ']' { K $2 }
|
||||
| '{' ListLocDef '}' {% mkR $2 }
|
||||
| '<' ListTupleComp '>' { R (tuple2record $2) }
|
||||
| '<' Exp ':' Exp '>' { Typed $2 $4 }
|
||||
|
||||
Reference in new issue
Block a user