From 56426fdbaf3ed75f9a52bcb32f99d8801b881243 Mon Sep 17 00:00:00 2001
From: Keisuke Nishida <kxn30@po.cwru.edu>
Date: Sun, 15 Apr 2001 22:55:49 +0000
Subject: [PATCH] Deprecate `id'.

---
 NEWS    | 23 +++++++++++++++++++++++
 RELEASE |  2 +-
 2 files changed, 24 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index 2db1398a1..292872726 100644
--- a/NEWS
+++ b/NEWS
@@ -288,6 +288,21 @@ objects are usually permanent.
 ** Escape procedures created by call-with-current-continuation now
 accept any number of arguments, as required by R5RS.
 
+** New function `call-with-deprecation'
+
+Call a thunk, displaying a deprecation message at the first call:
+
+  (define (id x)
+    (call-with-deprecation "`id' is deprecated.  Use `identity' instead."
+      (lambda ()
+	(identity x))))
+
+  guile> (id 1)
+  ;; `id' is deprecated.  Use `identity' instead.
+  1
+  guile> (id 1)
+  1
+
 ** New function `make-object-property'
 
 This function returns a new `procedure with setter' P that can be used
@@ -487,6 +502,14 @@ The data can then be retrieved by `get-output-string'.
 
 Return the contents of an output string port.
 
+** New function: identity
+
+Return the argument.
+
+** Deprecated: id
+
+Use `identity' instead.
+
 ** Deprecated: close-all-ports-except.
 
 This was intended for closing ports in a child process after a fork,
diff --git a/RELEASE b/RELEASE
index 2ffa89fca..1d67c6dc2 100644
--- a/RELEASE
+++ b/RELEASE
@@ -55,7 +55,7 @@ In release 1.6:
     gc.c: scm_remember
     string.c: scm_makstr
 - remove deprecated procedures:
-    boot-9.scm:eval-in-module
+    boot-9.scm: eval-in-module, id
 - remove deprecated macros: SCM_OUTOFRANGE, SCM_NALLOC, SCM_HUP_SIGNAL, 
   SCM_INT_SIGNAL, SCM_FPE_SIGNAL, SCM_BUS_SIGNAL, SCM_SEGV_SIGNAL, 
   SCM_ALRM_SIGNAL, SCM_GC_SIGNAL, SCM_TICK_SIGNAL, SCM_SIG_ORD,