projects / chise / xemacs-chise.git.1 / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
XEmacs 21.2.25 "Hephaestus".
[chise/xemacs-chise.git.1] / src / profile.c
diff --git a/src/profile.c b/src/profile.c
index 648026f..111575b 100644 (file)
--- 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