mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 17:50:29 +02:00
Code Activity

* Remove #& reader extension.

Browse source
This commit is contained in:
Dirk Herrmann 2001-08-31 09:51:25 +00:00
parent fc6629a7d5
commit 431e2ac105
2 changed files with 4 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

4
ice-9/ChangeLog
View file

@ -1,3 +1,7 @@
2001-08-31 Dirk Herrmann <D.Herrmann@tu-bs.de>
* optargs.scm: Remove #& reader extension.
2001-08-31 Dirk Herrmann <D.Herrmann@tu-bs.de> 2001-08-31 Dirk Herrmann <D.Herrmann@tu-bs.de>
* and-let-star-compat.scm: Deleted. * and-let-star-compat.scm: Deleted.

13
ice-9/optargs.scm
View file

@ -200,19 +200,6 @@
accum accum
(loop (car rest) (cdr rest) accum))))))) (loop (car rest) (cdr rest) accum)))))))
;; This is a reader extension to support the (deprecated) use of
;; "#&optional" instead of "#:optional"
(read-hash-extend #\& (lambda (c port)
(issue-deprecation-warning
"`#&' is deprecated, use `#:' instead.")
(case (read port)
((optional) #:optional)
((key) #:key)
((rest) #:rest)
((allow-other-keys) #:allow-other-keys)
(else (error "Bad #& value.")))))
;; lambda* args . body ;; lambda* args . body
;; lambda extended for optional and keyword arguments ;; lambda extended for optional and keyword arguments