>>>> Well LTIME cannot accept both kind(4) and kind(8) arguments. The reference >>>> to TIME8 looks like a mistake, isn’t it? >>> >>> Huh, in libgfortran I see two versions with different kinds (ltime_i4 >>> and ltime_i8), but in my tests I never get LTIME to work with kind=8 >>> arguments. I guess that is the real bug here ... >> >> I think the origin of the bug is: >> >> void >> gfc_resolve_ltime (gfc_code *c) >> { >> c->resolved_sym >> = gfc_get_intrinsic_sub_symbol (gfc_get_string (PREFIX ("ltime_i%d"), >> gfc_default_integer_kind)); >> } >> >> >> This always uses the ITIME version corresponding to >> gfc_default_integer_kind, disregarding the actual kind of the >> arguments. > > LTIME, ITIME, TIME, TIME8, IDATE are g77 intrinsics, from back before > newfangled things like kinds. So there are versions for integer kind=4 > and kind=8 due to -fdefault-integer-8.
Ok, I see. Thanks for the comment. Still, since we internally already have both implementations for kind=4 and kind=8, we could as well make use of them, I guess. If not, we definitely need to fix the documentation of LTIME, since the current version simply does not work with TIME8(), unless one uses -fdefault-integer-8 (which is not mentioned in the docu). Cheers, Janus