summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjmz <jmz@FreeBSD.org>1998-11-16 23:51:14 +0000
committerjmz <jmz@FreeBSD.org>1998-11-16 23:51:14 +0000
commite3777e3acc5df7012eed016cf627ccddfec75048 (patch)
tree9dd5a374df342bb3410e3c303508f3031fd8bf54
parentb1e41ac988d76d4eac6000d8e640b5f0b811ea79 (diff)
downloadFreeBSD-src-e3777e3acc5df7012eed016cf627ccddfec75048.zip
FreeBSD-src-e3777e3acc5df7012eed016cf627ccddfec75048.tar.gz
Add an emply MAIN__() function. This avoid an unresolved reference error
during link phase when using fortran subroutines with non-fortran 'main()'.
-rw-r--r--lib/libF77/MAIN.c1
-rw-r--r--lib/libf2c/Makefile2
2 files changed, 2 insertions, 1 deletions
diff --git a/lib/libF77/MAIN.c b/lib/libF77/MAIN.c
new file mode 100644
index 0000000..99b7114
--- /dev/null
+++ b/lib/libF77/MAIN.c
@@ -0,0 +1 @@
+MAIN__(){}
diff --git a/lib/libf2c/Makefile b/lib/libf2c/Makefile
index 6183d58..fd17e2a 100644
--- a/lib/libf2c/Makefile
+++ b/lib/libf2c/Makefile
@@ -5,7 +5,7 @@ CFLAGS+= -DIEEE_drem -DNON_ANSI_RW_MODES -DNON_UNIX_STDIO -DPedantic -I${.CURDIR
MISC = Version.c main.c s_rnge.c abort_.c getarg_.c iargc_.c getenv_.c\
signal_.c s_stop.c s_paus.c system_.c cabs.c\
- derf_.c derfc_.c erf_.c erfc_.c sig_die.c F77_aloc.c exit.c
+ derf_.c derfc_.c erf_.c erfc_.c sig_die.c F77_aloc.c exit.c MAIN.c
POW = pow_ci.c pow_dd.c pow_di.c pow_hh.c pow_ii.c pow_ri.c pow_zi.c pow_zz.c
CX = c_abs.c c_cos.c c_div.c c_exp.c c_log.c c_sin.c c_sqrt.c
DCX = z_cos.c z_div.c z_exp.c z_log.c z_sin.c z_sqrt.c
OpenPOWER on IntegriCloud