diff src/print.c @ 233:52952cbfc5b5 r20-5b15

Import from CVS: tag r20-5b15
author cvs
date Mon, 13 Aug 2007 10:14:14 +0200
parents 2c611d1463a6
children 51092a27c943
line wrap: on
line diff
--- a/src/print.c	Mon Aug 13 10:13:49 2007 +0200
+++ b/src/print.c	Mon Aug 13 10:14:14 2007 +0200
@@ -1602,7 +1602,11 @@
 	}
       if (COMPILED_FUNCTIONP (*bt->function))
 	{
+#if defined(COMPILED_FUNCTION_ANNOTATION_HACK)
 	  Lisp_Object ann = Fcompiled_function_annotation (*bt->function);
+#else
+	  Lisp_Object ann = Qnil;
+#endif
 	  if (!NILP (ann))
 	    {
 	      stderr_out ("<compiled-function from ");