X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fprofile.c;h=111575b842923e8e204edbc8d0a7154bf228e797;hp=648026f01053a6e457bc91c1fb825ff91989d7e5;hb=46f51e794ddb493a8a76ec2f3be00b41e3b0be22;hpb=ea21eb75bbf90355514d65686bd53bea579f8e23

diff --git a/src/profile.c b/src/profile.c
index 648026f..111575b 100644
--- a/src/profile.c
+++ b/src/profile.c
@@ -119,9 +119,10 @@ sigprof_handler (int signo)
 	{
 	  fun = *backtrace_list->function;
 
-	  if (!SYMBOLP	     (fun) &&
-	      !COMPILED_FUNCTIONP (fun) &&
-	      !SUBRP		     (fun))
+	  if (!SYMBOLP (fun)
+	      && !COMPILED_FUNCTIONP (fun)
+	      && !SUBRP (fun)
+	      && !CONSP (fun))
 	     fun = QSunknown;
 	}
       else