Commit 40eea150 by Dave Love

(system_clock_): Remove (just f90 intrinsic).

From-SVN: r20947
parent 28ef523e
......@@ -512,13 +512,6 @@ integer symlnk_ (const char *path1, const char *path2, const ftnlen Lpath1, cons
}
#endif
#ifdef Lsclock
int system_clock_ (integer *count, integer *count_rate, integer *count_max) {
extern int G77_system_clock_0 (integer *count, integer *count_rate, integer *count_max);
return G77_system_clock_0 (count, count_rate, count_max);
}
#endif
#ifdef Ltime
longint time_ (void) {
extern longint G77_time_0 (void);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment