X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=libgfortran%2Fgenerated%2Fexponent_r4.c;h=70c376c952bef74e36b0cdcdf68f13168d80a945;hb=7b6cb5bd2ce5a30c6074488312de984b1c69674a;hp=34e76b65edb1240361142d0f1d2a379527d0fb9e;hpb=2027d2d27693ee46db98fb7d407b8856d64fb864;p=pf3gnuchains%2Fgcc-fork.git diff --git a/libgfortran/generated/exponent_r4.c b/libgfortran/generated/exponent_r4.c index 34e76b65edb..70c376c952b 100644 --- a/libgfortran/generated/exponent_r4.c +++ b/libgfortran/generated/exponent_r4.c @@ -22,8 +22,11 @@ Boston, MA 02111-1307, USA. */ #include "libgfortran.h" +extern GFC_INTEGER_4 exponent_r4 (GFC_REAL_4 s); +export_proto(exponent_r4); + GFC_INTEGER_4 -prefix(exponent_r4) (GFC_REAL_4 s) +exponent_r4 (GFC_REAL_4 s) { int ret; frexpf (s, &ret);