Skip to content

Commit 38436f9

Browse files
authored
Correct parameter order of read-pathname
1 parent 885b5ea commit 38436f9

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lisp/l/readmacro.l

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@
6868
;; define a legal shell command.
6969
(set-dispatch-macro-character #\# #\! (get-macro-character #\;))
7070

71-
(defun read-pathname (f n ch)
71+
(defun read-pathname (f ch n)
7272
(pathname (read f)))
7373

7474
(set-dispatch-macro-character #\# #\P 'read-pathname)

0 commit comments

Comments
 (0)