------- Comment #9 from rguenth at gcc dot gnu dot org  2006-07-31 12:20 -------
Reduced testcase from comment #8

typedef union cl_lispunion *cl_object;
union cl_lispunion { cl_object cons; };
typedef union { cl_object data; } cl_symbol_initializer;
extern cl_symbol_initializer cl_symbols[];
extern void cl_funcall (cl_object);
extern int _setjmp(vois);
void LC67traverse (cl_object *lex0)
{
  cl_object T0;
  cl_funcall ((cl_object) (cl_symbols + 1));
  if (_setjmp ())
        ;
  if (lex0[0] == (cl_object) cl_symbols)
        goto L791;
  T0 = ((cl_object) (cl_symbols + 1));
L791:;
  cl_funcall (T0);
}


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28490

------- You are receiving this mail because: -------
You are on the CC list for the bug, or are watching someone who is.


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to