diff src/lisp.h @ 3319:2f13ae1532db

[xemacs-hg @ 2006-03-30 23:10:36 by crestani] * lisp.h (Dynarr_add): Add local variable imp to avoid VC6 internal compiler error.
author crestani
date Thu, 30 Mar 2006 23:10:38 +0000
parents 73051095a712
children b544987e2eca
line wrap: on
line diff
--- a/src/lisp.h	Thu Mar 30 21:51:09 2006 +0000
+++ b/src/lisp.h	Thu Mar 30 23:10:38 2006 +0000
@@ -1612,14 +1612,14 @@
 #ifdef NEW_GC
 #define Dynarr_add(d, el)					\
 do {								\
+  const struct lrecord_implementation *imp = (d)->lisp_imp;	\
   if (Dynarr_verify_mod (d)->cur >= (d)->max)			\
     Dynarr_resize ((d), (d)->cur+1);				\
   ((d)->base)[(d)->cur] = (el);					\
 								\
-  if ((d)->lisp_imp)						\
+  if (imp)							\
     set_lheader_implementation					\
-     ((struct lrecord_header *)&(((d)->base)[(d)->cur]),	\
-      (d)->lisp_imp);						\
+     ((struct lrecord_header *)&(((d)->base)[(d)->cur]), imp);	\
 								\
   (d)->cur++;							\
   if ((d)->cur > (d)->largest)					\