diff options
| author | aarne <aarne@chalmers.se> | 2011-06-02 16:10:46 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2011-06-02 16:10:46 +0000 |
| commit | a3924abece87303a26ab8066cbf0509976864a48 (patch) | |
| tree | 05ca8bcb9b2269cac04fa265854fc3b92ca2f4e3 /src/compiler/GF/Grammar/Predef.hs | |
| parent | d9ccb26c9891f296e95af531ec2473c3f4dd732a (diff) | |
Predef functions toUpper, toLower, isUpper
Diffstat (limited to 'src/compiler/GF/Grammar/Predef.hs')
| -rw-r--r-- | src/compiler/GF/Grammar/Predef.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/compiler/GF/Grammar/Predef.hs b/src/compiler/GF/Grammar/Predef.hs index f9c2c5d18..b77aea40e 100644 --- a/src/compiler/GF/Grammar/Predef.hs +++ b/src/compiler/GF/Grammar/Predef.hs @@ -32,6 +32,7 @@ module GF.Grammar.Predef , cLength, cDrop, cTake, cTk, cDp, cEqStr, cOccur , cOccurs, cEqInt, cLessInt, cPlus, cShow, cRead , cToStr, cMapStr, cError + , cToUpper, cToLower, cIsUpper -- hacks , cMeta, cAs, cChar, cChars, cSeq, cAlt, cRep @@ -116,6 +117,15 @@ cTk = identC (BS.pack "tk") cDp :: Ident cDp = identC (BS.pack "dp") +cToUpper :: Ident +cToUpper = identC (BS.pack "toUpper") + +cToLower :: Ident +cToLower = identC (BS.pack "toLower") + +cIsUpper :: Ident +cIsUpper = identC (BS.pack "isUpper") + cEqStr :: Ident cEqStr = identC (BS.pack "eqStr") |