diff --git a/get-module-bytecode.rkt b/get-module-bytecode.rkt
index 5f18969..0b43f2a 100644
--- a/get-module-bytecode.rkt
+++ b/get-module-bytecode.rkt
@@ -80,6 +80,7 @@
                  ;; Note: we're trying to preserve the context, to avoid code expansion.
                  [compile-context-preservation-enabled #t]
                  [current-namespace base-namespace])
+    (port-count-lines! ip)
     (define stx (read-syntax (object-name ip) ip))
     
     ;(printf "got stx; now expanding out the images\n")
diff --git a/version.rkt b/version.rkt
index 104be2d..70734d3 100644
--- a/version.rkt
+++ b/version.rkt
@@ -6,4 +6,4 @@
 
 (provide version)
 (: version String)
-(define version "1.54")
+(define version "1.55")