Remove more debug info

GrammaticalFramework · Sep 30, 2023 · 9bc6a07 · 9bc6a07
1 parent 5ea706b
commit 9bc6a07
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/compiler/GF/Grammar/Printer.hs b/src/compiler/GF/Grammar/Printer.hs
@@ -290,7 +290,6 @@ ppNValue q d (NVClos env e) = ppValue q d (VClos env e)
 
 ppConstrs :: Constraints -> [Doc]
 ppConstrs = map $ \(v,w) -> braces (ppValue Unqualified 0 v <+> "<>" <+> ppValue Unqualified 0 w)
-  $$ braces(show v <+> "<>" <+> show w)
 
 ppEnv :: Env -> Doc
 ppEnv e = hcat (map (\(x,t) -> braces (x <> ":=" <> ppValue Unqualified 0 t)) e)