From 1484dfe2d07ade18bd9b42ddf344ee839ce5e9ff Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Sat, 16 Apr 2005 02:05:06 +0000 Subject: [PATCH] Gdb on OS X 10.2.8 (at least) doesn't like local variables names with the same name as a structure name. So change the name of the local. (Stupid gdb.) --- lisp/alloc.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/alloc.c b/lisp/alloc.c index 51ad6e32e..9ec65ed22 100644 --- a/lisp/alloc.c +++ b/lisp/alloc.c @@ -1,4 +1,4 @@ -/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/alloc.c,v 1.8 2004/07/08 17:49:04 rtoy Exp $ */ +/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/alloc.c,v 1.9 2005/04/16 02:05:06 rtoy Exp $ */ #include <string.h> @@ -123,11 +123,11 @@ lispobj alloc_string(char *str) lispobj alloc_sap(void *ptr) { #ifndef alpha - struct sap *sap = (struct sap *)alloc_unboxed(type_Sap, 1); + struct sap *sap_ptr = (struct sap *)alloc_unboxed(type_Sap, 1); #else - struct sap *sap = (struct sap *)alloc_unboxed(type_Sap, 3); + struct sap *sap_ptr = (struct sap *)alloc_unboxed(type_Sap, 3); #endif - sap->pointer = ptr; + sap_ptr->pointer = ptr; - return (lispobj) sap | type_OtherPointer; + return (lispobj) sap_ptr | type_OtherPointer; } -- GitLab