GitHub/gf-core
1
0 Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-10-26 16:53:17 -06:00
Code Issues Packages Projects Releases Wiki Activity

improve the syntax for options

Browse Source
This commit is contained in:
Krasimir Angelov committed 2025-08-19 18:01:37 +02:00
1 parent 1a512473cd
commit cbac8b4fd2
6 files changed
+34 -21
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/compiler/api/GF/Grammar/Printer.hs
+2 -1
View File
@@ -272,7 +272,8 @@ ppEquation q (ps,e) = hcat (map (ppPatt q 2) ps) <+> "->" <+> ppTerm q 0 e
ppCase q (p,e) = ppPatt q 0 p <+> "=>" <+> ppTerm q 0 e
ppOpt q (p,e) = '(' <> ppTerm q 0 p <> ')' <+> "=>" <+> ppTerm q 0 e
ppOpt q (Just p, e) = ppTerm q 0 p <+> "=>" <+> ppTerm q 0 e
ppOpt q (Nothing,e) = ppTerm q 0 e
ppControl q (id,Nothing) = pp id
ppControl q (id,Just t ) = pp id <> ':' <+> ppTerm q 6 t