diff --git a/graph-type.hl.rkt b/graph-type.hl.rkt
index 17d88da..edf4968 100644
--- a/graph-type.hl.rkt
+++ b/graph-type.hl.rkt
@@ -28,10 +28,10 @@
        (define-syntax/parse (define-graph-type . :signature)
          (define gi <graph-info>)
          (local-require racket/pretty)
-         (parameterize ([pretty-print-columns 188])
-           (pretty-print gi (current-output-port) 0))
+         #;(parameterize ([pretty-print-columns 188])
+             (pretty-print gi (current-output-port) 0))
          #`(begin
-             #;(define-syntax name #,gi)))]
+             (define-syntax name #,gi)))]
 
 @chunk[<graph-info>
        (graph-info #'name