diff options
| author | krasimir <krasimir@chalmers.se> | 2008-04-17 13:22:10 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2008-04-17 13:22:10 +0000 |
| commit | 4c73735de917e2811f1ce75561397dc875365f94 (patch) | |
| tree | 3ecf7cefde8c3194d4075f2f4f4b249af8aed54a /src/GF/Compile/PGrammar.hs | |
| parent | 21e5a60ce20652826a8d74a4357706fca86edfa9 (diff) | |
Some more ByteString related chandes in GF2
Diffstat (limited to 'src/GF/Compile/PGrammar.hs')
| -rw-r--r-- | src/GF/Compile/PGrammar.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/GF/Compile/PGrammar.hs b/src/GF/Compile/PGrammar.hs index 1c6f0b411..e4e60d623 100644 --- a/src/GF/Compile/PGrammar.hs +++ b/src/GF/Compile/PGrammar.hs @@ -29,10 +29,11 @@ import GF.Grammar.Macros import GF.Grammar.MMacros import GF.Data.Operations +import qualified Data.ByteString.Char8 as BS pTerm :: String -> Err Term pTerm s = do - e <- err2err $ pExp $ myLexer s + e <- err2err $ pExp $ myLexer (BS.pack s) transExp e pTrm :: String -> Term |