Fix line and column for read errors

* module/ice-9/read.scm (%read): Add 1 to both line and column: the
former to make 1-based user lines instead of 0-based Guile lines, and
the latter because apparently that's how we always did it :)  Fixes

module/ice-9/read.scm

@@ -126,7 +126,8 @@
     (scm-error 'read-error #f
                (format #f "~A:~S:~S: ~A"
                        (or filename "#<unknown port>")
-                       (port-line port) (port-column port)
+                       (1+ (port-line port))
+                       (1+ (port-column port))
                        msg)
                args #f))