Declare ABORT as intrinsic
From-SVN: r26757
This commit is contained in:
parent
2b0bdd9a77
commit
dbd9ec970e
@ -1,3 +1,8 @@
|
||||
1999-05-03 Craig Burley <craig@jcb-sc.com>
|
||||
|
||||
* g77.f-torture/execute/u77-test.f (main): Declare ABORT as
|
||||
intrinsic.
|
||||
|
||||
1999-05-03 Craig Burley <craig@jcb-sc.com>
|
||||
|
||||
* g77.f-torture/execute/u77-test.f: Reverse order of two
|
||||
|
@ -50,7 +50,7 @@
|
||||
+ stat, lstat, getcwd, gmtime, etime, chmod, itime, date,
|
||||
+ chdir, fgetc, fputc, system_clock, second, idate, secnds,
|
||||
+ time, ctime, fdate, ttynam, date_and_time, mclock, mclock8,
|
||||
+ cpu_time, dtime, ftell
|
||||
+ cpu_time, dtime, ftell, abort
|
||||
external lenstr, ctrlc
|
||||
integer lenstr
|
||||
logical l
|
||||
|
@ -1,3 +1,7 @@
|
||||
Mon May 3 19:15:07 1999 Craig Burley <craig@jcb-sc.com>
|
||||
|
||||
* libU77/u77-test.f (main): Declare ABORT as intrinsic.
|
||||
|
||||
1999-05-03 Craig Burley <craig@jcb-sc.com>
|
||||
|
||||
* libU77/u77-test.f: Reverse order of two arguments to
|
||||
|
@ -53,7 +53,7 @@
|
||||
+ stat, lstat, getcwd, gmtime, etime, chmod, itime, date,
|
||||
+ chdir, fgetc, fputc, system_clock, second, idate, secnds,
|
||||
+ time, ctime, fdate, ttynam, date_and_time, mclock, mclock8,
|
||||
+ cpu_time, dtime, ftell
|
||||
+ cpu_time, dtime, ftell, abort
|
||||
external lenstr, ctrlc
|
||||
integer lenstr
|
||||
logical l
|
||||
|
Loading…
Reference in New Issue
Block a user