1 files changed, 0 insertions, 28 deletions
diff --git a/contrib/libf2c/libF77/system_.c b/contrib/libf2c/libF77/system_.c
deleted file mode 100644
index dbbd0bea9ec2..000000000000
--- a/contrib/libf2c/libF77/system_.c
+++ /dev/null
@@ -1,28 +0,0 @@
-/* f77 interface to system routine */
-
-#include "f2c.h"
-
-#undef abs
-#undef min
-#undef max
-#include <stdlib.h>
-extern char *F77_aloc (ftnlen, char *);
-
-integer
-G77_system_0 (register char *s, ftnlen n)
-{
-  char buff0[256], *buff;
-  register char *bp, *blast;
-  integer rv;
-
-  buff = bp = n < (ftnlen) sizeof (buff0) ? buff0 : F77_aloc (n + 1, "system_");
-  blast = bp + n;
-
-  while (bp < blast && *s)
-    *bp++ = *s++;
-  *bp = 0;
-  rv = system (buff);
-  if (buff != buff0)
-    free (buff);
-  return rv;
-}