mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-09-14 22:36:01 -06:00
permit string literals in flags
This commit is contained in:
@@ -294,6 +294,9 @@ FlagDef
|
|||||||
: Posn Ident '=' Ident Posn {% case parseModuleOptions ["--" ++ showIdent $2 ++ "=" ++ showIdent $4] of
|
: Posn Ident '=' Ident Posn {% case parseModuleOptions ["--" ++ showIdent $2 ++ "=" ++ showIdent $4] of
|
||||||
Ok x -> return x
|
Ok x -> return x
|
||||||
Bad msg -> failLoc $1 msg }
|
Bad msg -> failLoc $1 msg }
|
||||||
|
| Posn Ident '=' String Posn {% case parseModuleOptions ["--" ++ showIdent $2 ++ "=" ++ $4] of
|
||||||
|
Ok x -> return x
|
||||||
|
Bad msg -> failLoc $1 msg }
|
||||||
| Posn Ident '=' Double Posn {% case parseModuleOptions ["--" ++ showIdent $2 ++ "=" ++ show $4] of
|
| Posn Ident '=' Double Posn {% case parseModuleOptions ["--" ++ showIdent $2 ++ "=" ++ show $4] of
|
||||||
Ok x -> return x
|
Ok x -> return x
|
||||||
Bad msg -> failLoc $1 msg }
|
Bad msg -> failLoc $1 msg }
|
||||||
|
|||||||
Reference in New Issue
Block a user