X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fbacktrace.c;h=d21e4885ed228b1efcde34379ac875038a3de7c2;hb=359a6c88dfc80fbae9bdae5251ce0976d003355c;hp=e10af61db11226cb8881abdaa656e1694fd6e195;hpb=cf4cb9554515c59eddbde38d1cf236339c37f55f;p=sbcl.git diff --git a/src/runtime/backtrace.c b/src/runtime/backtrace.c index e10af61..d21e488 100644 --- a/src/runtime/backtrace.c +++ b/src/runtime/backtrace.c @@ -28,7 +28,7 @@ #include "genesis/primitive-objects.h" #include "thread.h" -#ifndef LISP_FEATURE_X86 +#if !(defined(LISP_FEATURE_X86) || defined(LISP_FEATURE_X86_64)) /* KLUDGE: Sigh ... I know what the call frame looks like and it had * better not change. */ @@ -244,6 +244,7 @@ backtrace(int nframes) string = (struct vector *) object; printf("%s, ", (char *) string->data); } else + /* FIXME: broken from (VECTOR NIL) */ printf("(Not simple string??\?), "); } else printf("(Not other pointer??\?), ");