Index: /trunk/ccl/lisp-kernel/lisp-debug.c
===================================================================
--- /trunk/ccl/lisp-kernel/lisp-debug.c	(revision 4936)
+++ /trunk/ccl/lisp-kernel/lisp-debug.c	(revision 4937)
@@ -102,4 +102,9 @@
                      "rbx", "rbp", "r10", "r11", "r12", "r13", "r14", "r15",
                      "???", "???", "???", "???", "???", "???", "???", "rsp"};
+#endif
+#ifdef DARWIN
+char* Iregnames[] = {"rax", "rbx", "rcx", "rdx", "rdi", "rsi",
+                     "rbp", "rsp", "r8 ", "r9 ", "r10", "r11", "r12", "r13",
+                     "r14", "r15", "rip", "rfl"};
 #endif
 #endif