mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 13:30:26 +02:00
Code Activity

(feature?): Added deprecation message.

Browse source
This commit is contained in:
Marius Vollmer 2002-09-15 21:30:39 +00:00
parent 5fc0857ef6
commit f4232aa664
2 changed files with 8 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
ice-9/ChangeLog
View file

@ -1,3 +1,7 @@
2002-09-15 Marius Vollmer <mvo@zagadka.ping.de>
* boot-9.scm (feature?): Added deprecation message.
2002-09-14 Rob Browning <rlb@defaultvalue.org>
* boot-9.scm (sqrt): minor indentation fix.

5
ice-9/boot-9.scm
View file

@ -83,7 +83,10 @@
(and (memq feature *features*) #t))
(begin-deprecated
(define feature? provided?))
(define (feature? sym)
(issue-deprecation-warning
"`feature?' is deprecated. Use `provided?' instead.")
(provided? sym)))
;;; let format alias simple-format until the more complete version is loaded
(define format simple-format)