make sure you can say "import Dict" as first entry
The normal file parser requires at least one declaration, so this
change makes it so there is always an extra declaration generated.
commit0529e7daff29f64f457527a1c9d1a06833bc2327
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateMon 15 Jul 2019, 19:12 (7 years ago)
parentcc76ccb
terminal/src/Repl.hs+4−4
@@ -435,16 +435,16 @@ toByteString (State imports types decls) output =
435435
436436outputToBuilder :: Output -> B.Builder
437437outputToBuilder output =
438+ N.toBuilder N.replValueToPrint <> " =" <>
438439 case output of
439440 OutputNothing ->
440− mempty
441+ " ()\n"
441442
442443 OutputDecl _ ->
443− mempty
444+ " ()\n"
444445
445446 OutputExpr expr ->
446− N.toBuilder N.replValueToPrint <> " ="
447− <> foldr (\line rest -> "\n " <> B.byteString line <> rest) "\n" (BSC.lines expr)
447+ foldr (\line rest -> "\n " <> B.byteString line <> rest) "\n" (BSC.lines expr)
448448
449449
450450