that was trashing the byte just beyond the CHARACTER*(*) argument. From-SVN: r19427
"libf2c" directory. From-SVN: r17568