diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index f904b6864..f1e675d51 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,8 @@
+2003-05-12  Mikael Djurfeldt  <djurfeldt@nada.kth.se>
+
+	* deprecated.h (SCM_GC8MARKP, SCM_SETGC8MARK, SCM_CLRGC8MARK):
+	Use current names in definitions.
+
 2003-05-10  Kevin Ryde  <user42@zip.com.au>
 
 	* numbers.c (scm_num_eq_p, scm_less_p): Don't pass NaN to mpz_cmp_d.
diff --git a/libguile/deprecated.h b/libguile/deprecated.h
index 11811f0fa..1f00e7acb 100644
--- a/libguile/deprecated.h
+++ b/libguile/deprecated.h
@@ -58,9 +58,9 @@ SCM_API SCM scm_unprotect_object (SCM obj);
   (SCM_SETCDR ((x), SCM_PACK (SCM_UNPACK (SCM_CDR (x)) | (y))))
 #define SCM_FREEP(x) (SCM_FREE_CELL_P (x))
 #define SCM_NFREEP(x) (!SCM_FREE_CELL_P (x))
-#define SCM_GC8MARKP(x) SCM_GCMARKP (x)
-#define SCM_SETGC8MARK(x) SCM_SETGCMARK (x)
-#define SCM_CLRGC8MARK(x) SCM_CLRGCMARK (x)
+#define SCM_GC8MARKP(x) SCM_GC_MARK_P (x)
+#define SCM_SETGC8MARK(x) SCM_SET_GC_MARK (x)
+#define SCM_CLRGC8MARK(x) SCM_CLEAR_GC_MARK (x)
 #define SCM_GCTYP16(x) SCM_TYP16 (x)
 #define SCM_GCCDR(x) SCM_CDR (x)
 SCM_API void scm_remember (SCM * ptr);