(system_clock_): Remove (just f90 intrinsic).

From-SVN: r20947

diff --git a/libf2c/f2cext.c b/libf2c/f2cext.c
index fa1eff7e19790d91ca1c7f7a93338aa8acf844dd..2b51d88e75ccb7ce23eaece837ad3b8100626e8a 100644 (file)
--- a/libf2c/f2cext.c
+++ b/libf2c/f2cext.c
@@ -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);