Mercurial > hg > xemacs-beta

diff src/free-hook.c @ 20:859a2309aef8 r19-15b93

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b93
author cvs
date Mon, 13 Aug 2007 08:50:05 +0200
parents 376386a54a3c
children 3d6bfa290dbd
line wrap: on
line diff
--- a/src/free-hook.c	Mon Aug 13 08:49:44 2007 +0200
+++ b/src/free-hook.c	Mon Aug 13 08:50:05 2007 +0200
@@ -431,12 +431,11 @@
 
 void really_free_one_entry (void *, int, int *);
 
-DEFUN ("really-free", Freally_free, Sreally_free, 0, 1, "P" /*
+DEFUN ("really-free", Freally_free, 0, 1, "P", /*
 Actually free the storage held by the free() debug hook.
 A no-op if the free hook is disabled.
-*/ )
-     (arg)
-     Lisp_Object arg;
+*/
+       (arg))
 {
   int count[2];
   Lisp_Object lisp_count[2];
@@ -477,7 +476,7 @@
 void
 syms_of_free_hook (void)
 {
-  defsubr (&Sreally_free);
+  DEFSUBR (Freally_free);
 }
 
 #else