diff options
Diffstat (limited to 'src/GF/Compile.hs')
| -rw-r--r-- | src/GF/Compile.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Compile.hs b/src/GF/Compile.hs index 92a956d5f..5d5081541 100644 --- a/src/GF/Compile.hs +++ b/src/GF/Compile.hs @@ -208,7 +208,7 @@ compileSourceModule opts env@(k,gr,_) mo@(i,mi) = do generateModuleCode :: Options -> FilePath -> SourceModule -> IOE SourceModule generateModuleCode opts file minfo = do let minfo1 = subexpModule minfo - out = prGrammar (MGrammar [codeSourceModule encodeUTF8 minfo1]) + out = codeStringLiterals encodeUTF8 $ prGrammar (MGrammar [minfo1]) putPointE Normal opts (" wrote file" +++ file) $ ioeIO $ writeFile file $ out return minfo1 |