This website requires JavaScript.
Explore
Help
Sign In
OpenE2K
/
gcc
Watch
2
Star
0
Fork
You've already forked gcc
0
Code
Issues
Pull Requests
Projects
Releases
Wiki
Activity
113dc14387
gcc
/
libf2c
/
libF77
/
iargc_.c
8 lines
94 B
C
Raw
Normal View
History
Unescape
Escape
* Previous contents of gcc/f/runtime moved into toplevel "libf2c" directory. From-SVN: r17568
1998-02-01 02:37:08 +01:00
#
include
"f2c.h"
ftnint
G77_iargc_0
(
void
)
{
Break up main() into separate .o's so making and linking against shared... Tue May 19 12:50:27 1998 Craig Burley <burley@gnu.org> Break up main() into separate .o's so making and linking against shared libraries with non-Fortran main() routines is easier: * Makefile.in (MISC): Add setarg.o and setsig.o. * libF77/Makefile.in (MISC): Ditto. * libF77/setarg.c: New file, contains f_setarg(). * libF77/setsig.c: New file, contains f_setsig(). * libF77/getarg_.c: Rename xarg* to f__xarg*. * libF77/iargc_.c: Ditto From-SVN: r19956
1998-05-22 12:32:18 +02:00
extern
int
f__xargc
;
return
(
f__xargc
-
1
)
;
* Previous contents of gcc/f/runtime moved into toplevel "libf2c" directory. From-SVN: r17568
1998-02-01 02:37:08 +01:00
}