diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/langs1.c')
-rw-r--r-- | gdb/testsuite/gdb.base/langs1.c | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/gdb/testsuite/gdb.base/langs1.c b/gdb/testsuite/gdb.base/langs1.c deleted file mode 100644 index 7842259..0000000 --- a/gdb/testsuite/gdb.base/langs1.c +++ /dev/null @@ -1,33 +0,0 @@ -/* langs1.f -- translated by f2c (version of 5 May 1990 1:12:08). */ - -/* f2c output hacked as follows for GDB testsuite: - 1. Change commented out "#" lines to #line directives. - I don't know why this behavior isn't the default for f2c -g. - 2. Remove include of f2c.h and put in just a typedef for "integer". - Additional notes: - 3. f2c was called as "f2c -g langs1.f". - 4. We don't need to use the fortran libraries. */ - -typedef int integer; - -/* Table of constant values */ - -static integer c__10000 = 10000; - -/* I am not sure whether there is a way to have a fortran program without */ -/* a MAIN, but it does not really harm us to have one. */ -/* Main program */ MAIN__() -{ -} /* MAIN__ */ - -#line 4 "langs1.f" -/* Subroutine */ int fsub_() -{ - extern integer cppsub_(); - -#line 5 "langs1.f" -#line 6 "langs1.f" - return cppsub_(&c__10000); -#line 7 "langs1.f" -} /* fsub_ */ - |