Add read-line for Con compile-file.

Author: dvanhorn

www/notes/con/compile-file.rkt

@@ -8,6 +8,7 @@
 (define (main fn)
   (with-input-from-file fn
     (λ ()
-      (let ((p (read)))
+      (let ((_ (read-line))
+            (p (read)))
         (unless (expr? p) (error "syntax error" p))
         (asm-display (compile p))))))