summaryrefslogtreecommitdiff
path: root/contrib/libf2c/libF77/setarg.c
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/libf2c/libF77/setarg.c')
-rw-r--r--contrib/libf2c/libF77/setarg.c29
1 files changed, 0 insertions, 29 deletions
diff --git a/contrib/libf2c/libF77/setarg.c b/contrib/libf2c/libF77/setarg.c
deleted file mode 100644
index 929860aeef3aa..0000000000000
--- a/contrib/libf2c/libF77/setarg.c
+++ /dev/null
@@ -1,29 +0,0 @@
-/* Set up the global argc/argv info for use by getarg_, iargc_, and
- g77's inlined intrinsic equivalents. */
-
-#ifndef KR_headers
-#undef VOID
-#include <stdlib.h>
-#endif
-
-#ifndef VOID
-#define VOID void
-#endif
-
-int f__xargc;
-char **f__xargv;
-
-#ifdef __cplusplus
- }
-#endif
-
- void
-#ifdef KR_headers
-f_setarg(argc, argv) int argc; char **argv;
-#else
-f_setarg(int argc, char **argv)
-#endif
-{
-f__xargc = argc;
-f__xargv = argv;
-}