diff --git a/collects/typed-scheme/types/printer.rkt b/collects/typed-scheme/types/printer.rkt
index 61d92dd9..122e6f0c 100644
--- a/collects/typed-scheme/types/printer.rkt
+++ b/collects/typed-scheme/types/printer.rkt
@@ -61,7 +61,7 @@
   (define (fp . args) (apply fprintf port args))
   (match c
     [(NoObject:) (fp "-")]
-    [(Empty:) (fp "")]
+    [(Empty:) (fp "-")]
     [(Path: pes i) (fp "~a" (append pes (list i)))]    
     [else (fp "(Unknown Object: ~a)" (struct->vector c))]))