1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 20:30:28 +02:00

* optargs.scm (#\&): Emit warning about `#&' being deprecated.

This commit is contained in:
Marius Vollmer 2000-08-16 22:42:41 +00:00
parent 76ef92f358
commit a099f10e49

View file

@ -199,6 +199,9 @@
;; "#&optional" instead of "#:optional"
(read-hash-extend #\& (lambda (c port)
(display
"WARNING: `#&' is deprecated, use `#:' instead\n"
(current-error-port))
(case (read port)
((optional) #:optional)
((key) #:key)