2009/5/18 Tobias Burnus <bur...@net-b.de>: > Can you try whether the following patch works? If so, you can > commit it as obvious. (I cannot test/commit it until this evening.) > > Tobias > > Index: intrinsic.c > =================================================================== > --- intrinsic.c (revision 147659) > +++ intrinsic.c (working copy) > @@ -303,7 +303,7 @@ > type = (bt) va_arg (argp, int); > kind = va_arg (argp, int); > optional = va_arg (argp, int); > - intent = va_arg (argp, int); > + intent = (sym_intent) va_arg (argp, int); > > if (sizing != SZ_NOTHING) > nargs++;
This seems to work. I will commit it. I'm really sorry I broke bootstrap. I usually don't test my Fortran patches with a full bootstrap (to save time), since I assumed bootstrapping would not be essential for the Fortran front end. Sorry for the inconvenience, Janus
