diff src/doc.c @ 108550:339bb0f23bf9

merge trunk
author Kenichi Handa <handa@etlken>
date Thu, 06 May 2010 09:50:39 +0900
parents 514ebf69b289
children 2bc9a0c04c87
line wrap: on
line diff
--- a/src/doc.c	Wed Apr 28 10:00:38 2010 +0900
+++ b/src/doc.c	Thu May 06 09:50:39 2010 +0900
@@ -538,7 +538,7 @@
 	{
 	  tem = Fcdr (Fcdr (fun));
 	  if (CONSP (tem) && INTEGERP (XCAR (tem)))
-	    XSETCARFASTINT (tem, offset);
+	    XSETCAR (tem, make_number (offset));
 	}
       else if (EQ (tem, Qmacro))
 	store_function_docstring (XCDR (fun), offset);