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:
parent
fc88355291
commit
235678dcec
@ -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.
|
||||
|
@ -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 ();
|
||||
}
|
||||
|
@ -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 ();
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user