date_.c (G77_date_y2kbuggy_0): Declare G77_abort_0 noreturn.

* libU77/date_.c (G77_date_y2kbuggy_0): Declare G77_abort_0 noreturn.
        * libU77/vxtidate_.c (G77_vxtidate_y2kbuggy_0): Likewise.

From-SVN: r60256
This commit is contained in:
Jason Merrill 2002-12-18 11:37:14 -05:00 committed by Jason Merrill
parent fc88355291
commit 235678dcec
3 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,8 @@
Wed Dec 18 11:33:35 2002 Jason Merrill <jason@redhat.com>
* libU77/date_.c (G77_date_y2kbuggy_0): Declare G77_abort_0 noreturn.
* libU77/vxtidate_.c (G77_vxtidate_y2kbuggy_0): Likewise.
2002-11-26 Nathanael Nerode <neroden@gcc.gnu.org>
* configure.in: Remove skip-this-dir support.

View File

@ -49,7 +49,7 @@ int
G77_date_y2kbuggy_0 (char *buf __attribute__ ((__unused__)),
ftnlen buf_len __attribute__ ((__unused__)))
{
extern int G77_abort_0 ();
extern int G77_abort_0() __attribute__ ((noreturn));
fprintf (stderr, "%s\n", G77_Non_Y2K_Compliance_Message);
G77_abort_0 ();
}

View File

@ -58,7 +58,7 @@ G77_vxtidate_y2kbuggy_0 (integer * m __attribute__ ((__unused__)),
integer * d __attribute__ ((__unused__)),
integer * y __attribute__ ((__unused__)))
{
extern int G77_abort_0 ();
extern int G77_abort_0() __attribute__ ((noreturn));
fprintf (stderr, "%s\n", G77_Non_Y2K_Compliance_Message);
G77_abort_0 ();
}