summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/compiler/GF/Grammar/Canonical.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/compiler/GF/Grammar/Canonical.hs b/src/compiler/GF/Grammar/Canonical.hs
index 2a164c578..8d61a8a53 100644
--- a/src/compiler/GF/Grammar/Canonical.hs
+++ b/src/compiler/GF/Grammar/Canonical.hs
@@ -2,6 +2,7 @@
-- high-level constructions such as functors and opers have been eliminated
-- by partial evaluation.
module GF.Grammar.Canonical where
+import Prelude hiding ((<>))
import GF.Text.Pretty
-- | A Complete grammar
@@ -169,7 +170,7 @@ instance Pretty LinType where
ParamType pt -> pp pt
RecordType rs -> block rs
StrType -> pp "Str"
- TableType pt lt -> pt <+> "=>" <+> lt
+ TableType pt lt -> sep [pt <+> "=>",pp lt]
TupleType lts -> "<"<>punctuate "," lts<>">"
instance RhsSeparator LinType where rhsSep _ = pp ":"