User: crestani Date: 06/03/31 01:10:41 Modified: xemacs/src ChangeLog lisp.h Log: * lisp.h (Dynarr_add): Add local variable imp to avoid VC6 internal compiler error. Revision Changes Path 1.938 +5 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.937 retrieving revision 1.938 diff -u -p -r1.937 -r1.938 --- ChangeLog 2006/03/28 17:43:52 1.937 +++ ChangeLog 2006/03/30 23:10:36 1.938 ＠＠ -1,3 +1,8 ＠＠ +2006-03-30 Adrian Aichner <adrian(a)xemacs.org&gt; + + * lisp.h (Dynarr_add): Add local variable imp to avoid VC6 + internal compiler error. + 2006-03-26 Marcus Crestani <crestani(a)xemacs.org&gt; * gc.c: Remove functions for explicitly-freed statistics 1.141 +3 -3 XEmacs/xemacs/src/lisp.h Index: lisp.h =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/lisp.h,v retrieving revision 1.140 retrieving revision 1.141 diff -u -p -r1.140 -r1.141 --- lisp.h 2006/03/26 14:33:39 1.140 +++ lisp.h 2006/03/30 23:10:38 1.141 ＠＠ -1612,14 +1612,14 ＠＠ do { \ #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) \