If you'll include the -fno-common switch with fortran programs, you will get into troubles. This switch forces the allocation of all variables locally. Thus your common block (= local, not initialised variables) will be allocated to some default (likely 0) and you cannot pass any values via the common block. This switch is used with C/C++ programs to force the use of extern to explicitly reference a common variable.
Cheers,
RemiOn Thursday, September 11, 2003, at 07:00 PM, Jeff Whitaker wrote:
Charles: Try including the -fno-common argument when you build your
object files. If that doesn't work, then you are right - libg2c was built
without -fno-common and that may be the problem. Any particular reason
you need a dylib instead of a static lib?
-Jeff
On Thu, 11 Sep 2003, Charles Williams wrote:
Hi,
I'm trying to build a dynamic library using g77, and I've run into the
following problem:
g77 -o
/Users/willic3/MACGPS/build/lib/Darwin-6.x_ppc-shared,debug/ libtecton.dylib
/Users/willic3/MACGPS/build/tmp/Darwin-6.x_ppc-shared,debug/tecton/ tecton/*.o -dynamiclib -flat_namespace -undefined suppress -lcc_dynamic
ld: common symbols not allowed with MH_DYLIB output format with the -multi_module option
/sw/lib/libg2c.a(lread.o) definition of common _f__lioproc (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__fmtbuf (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__init (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__units (size 4800)
/sw/lib/libg2c.a(lwrite.o) definition of common _L_len (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__curunit (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__donewrec (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__external (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__formatted (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__putn (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__reading (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__recpos (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__cblank (size 4)
/sw/lib/libg2c.a(err.o) definition of common f(char, float) (size 4)
/sw/lib/libg2c.a(err.o) definition of common f(char, long *, short__restrict) (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__cursor (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__doed (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__doend (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__doned (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__dorevert (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__elist (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__hiwater (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common _f__nonl (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__scale (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__sequential (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common _f__workdone (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common _f__cnt (size 40)
/sw/lib/libg2c.a(fmt.o) definition of common f(char, *) (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__fmtlen (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common _f__parenlvl (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common f(char *) (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common _f__ret (size 40)
/sw/lib/libg2c.a(fmt.o) definition of common _f__revloc (size 4)
/sw/lib/libg2c.a(fmt.o) definition of common f(long double, *) (size 4)
/sw/lib/libg2c.a(uio.o) definition of common _f__reclen (size 4)
/sw/lib/libg2c.a(sue.o) definition of common _f__recloc (size 8)
/sw/lib/libg2c.a(lread.o) definition of common _f__lchar (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _f__lcount (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _f__lquit (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _f__ltype (size 4)
/sw/lib/libg2c.a(lread.o) definition of common f(long, long long) (size 8)
/sw/lib/libg2c.a(lread.o) definition of common _f__ly (size 8)
/sw/lib/libg2c.a(lread.o) definition of common _l_eof (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _l_getc (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _l_ungetc (size 4)
/sw/lib/libg2c.a(lread.o) definition of common _nml_read (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__getn (size 4)
/sw/lib/libg2c.a(err.o) definition of common _f__icptr (size 4)
/sw/lib/libg2c.a(err.o) definition of common f(short, void, int, char) (size 4)
/sw/lib/libg2c.a(lwrite.o) definition of common _f__Aquote (size 4)
/usr/bin/libtool: internal link edit command failed
make: ***
[/Users/willic3/MACGPS/build/lib/Darwin-6.x_ppc-shared,debug/ libtecton.dylib] Error 1
A quick google search indicated the problem might be that g77 was built
without the -fno-common flag. Is this likely to be the source of my
problem, or is there something more obvious that I'm missing?
Thanks,
Charles
Charles Williams
Dept. of Earth & Environmental Science
Science Center
Rensselaer Polytechnic Institute
Troy, NY 12180
phone: (518) 276-8520
FAX: (518) 276-6680
e-mail: [EMAIL PROTECTED]
------------------------------------------------------- This sf.net email is sponsored by:ThinkGeek Welcome to geek heaven. http://thinkgeek.com/sf _______________________________________________ Fink-users mailing list [EMAIL PROTECTED] https://lists.sourceforge.net/lists/listinfo/fink-users
-- Jeffrey S. Whitaker Phone : (303)497-6313 NOAA/OAR/CDC R/CDC1 FAX : (303)497-6449 325 Broadway Web : http://www.cdc.noaa.gov/~jsw Boulder, CO, USA 80305-3328 Office: Skaggs Research Cntr 1D-124
------------------------------------------------------- This sf.net email is sponsored by:ThinkGeek Welcome to geek heaven. http://thinkgeek.com/sf _______________________________________________ Fink-users mailing list [EMAIL PROTECTED] https://lists.sourceforge.net/lists/listinfo/fink-users
--------------------------------------------------------------------- Computers are like air-conditioners, they stop working properly when you open Windows. (Anonymous)
********************************************************************* Remigius K. Mommsen e-mail: [EMAIL PROTECTED] University of California, Irvine URL: http://cern.ch/mommsen c/o SLAC voice: ++1 (650) 926-3595 2575 Sand Hill Road #35 fax: ++1 (650) 926-3882 Menlo Park, CA 94025, US home: ++1 (650) 233-9041 *********************************************************************
------------------------------------------------------- This sf.net email is sponsored by:ThinkGeek Welcome to geek heaven. http://thinkgeek.com/sf _______________________________________________ Fink-users mailing list [EMAIL PROTECTED] https://lists.sourceforge.net/lists/listinfo/fink-users
