diff options
author | obrien <obrien@FreeBSD.org> | 2002-05-09 22:47:59 +0000 |
---|---|---|
committer | obrien <obrien@FreeBSD.org> | 2002-05-09 22:47:59 +0000 |
commit | c4cd6f62364376317c26d104dbae2a1d7688c6f1 (patch) | |
tree | 67cbb2dcc743690cb31fd56b75a992ce4a6950d9 /contrib/libf2c/libU77/vxtidate_.c | |
parent | c95b4b5523419271f1bfef55bc47dfbcdced47c7 (diff) | |
parent | eb81e01d5162436a00b210305c91bbba234a0238 (diff) | |
download | FreeBSD-src-c4cd6f62364376317c26d104dbae2a1d7688c6f1.zip FreeBSD-src-c4cd6f62364376317c26d104dbae2a1d7688c6f1.tar.gz |
This commit was generated by cvs2svn to compensate for changes in r96295,
which included commits to RCS files with non-trunk default branches.
Diffstat (limited to 'contrib/libf2c/libU77/vxtidate_.c')
-rw-r--r-- | contrib/libf2c/libU77/vxtidate_.c | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/contrib/libf2c/libU77/vxtidate_.c b/contrib/libf2c/libU77/vxtidate_.c index d5f289c..e5963af 100644 --- a/contrib/libf2c/libU77/vxtidate_.c +++ b/contrib/libf2c/libU77/vxtidate_.c @@ -54,3 +54,18 @@ int G77_vxtidate_y2kbug_0 (integer *m, integer *d, integer *y) *d = lt->tm_mday; return 0; } + +#ifdef PIC +extern const char *G77_Non_Y2K_Compliance_Message; +# ifdef KR_headers +int G77_vxtidate_y2kbuggy_0 (m, d, y) + integer *y, *m, *d; +# else +int G77_vxtidate_y2kbuggy_0 (integer *m, integer *d, integer *y) +# endif +{ + extern int G77_abort_0(); + fprintf (stderr, "%s\n", G77_Non_Y2K_Compliance_Message); + G77_abort_0(); +} +#endif |