From owner-freebsd-ports@FreeBSD.ORG Mon Jul 14 21:16:00 2003 Return-Path: Delivered-To: freebsd-ports@freebsd.org Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id C71A237B401 for ; Mon, 14 Jul 2003 21:16:00 -0700 (PDT) Received: from web13407.mail.yahoo.com (web13407.mail.yahoo.com [216.136.175.65]) by mx1.FreeBSD.org (Postfix) with SMTP id 305A543FB1 for ; Mon, 14 Jul 2003 21:16:00 -0700 (PDT) (envelope-from giffunip@yahoo.com) Message-ID: <20030715041600.45856.qmail@web13407.mail.yahoo.com> Received: from [200.91.194.110] by web13407.mail.yahoo.com via HTTP; Tue, 15 Jul 2003 05:16:00 BST Date: Tue, 15 Jul 2003 05:16:00 +0100 (BST) From: "=?iso-8859-1?q?Pedro=20F.=20Giffuni?=" To: freebsd-ports@FreeBSD.org MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="0-1206357594-1058242560=:45641" Content-Transfer-Encoding: 8bit Subject: FORTRAN porting problems with DUNS X-BeenThere: freebsd-ports@freebsd.org X-Mailman-Version: 2.1.1 Precedence: list List-Id: Porting software to FreeBSD List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 15 Jul 2003 04:16:01 -0000 --0-1206357594-1058242560=:45641 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit Content-Id: Content-Disposition: inline Hi; I am trying to build a port that can be used along with CalculiX for CFD. http://sourceforge.net/projects/duns/ Unfortunately our FORTRAN compilers (g77 and f77 from 5.0R) seem unable to build it, and on the CalculiX list it was suggested I should try gcc-2.95 and add -traditional in the preprocessor line. Our gcc-2.95 port doesn't carry FORTRAN, and -traditional is, AFAIK, being obsoleted in the latest gcc. Any hint on how to fix this would be welcome. cheers, Pedro. ps. I wonder why all our gcc's are listed in Java when the older ones don't carry Java at all! ________________________________________________________________________ Want to chat instantly with your online friends? Get the FREE Yahoo! Messenger http://uk.messenger.yahoo.com/ --0-1206357594-1058242560=:45641 Content-Type: text/plain; name="duns-log.txt" Content-Description: duns-log.txt Content-Disposition: inline; filename="duns-log.txt" fpp -D"real_precision"=real -DFUNDER -DISNAN prepar.F >prepar.f f77 -O -ff77 -c prepar.f prepar.F: In subroutine `prepar': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first prepar.F:156: warning: call precision(iprec) ^ Reference to unimplemented intrinsic `PRECISION' at (^) (assumed EXTERNAL) fpp -D"real_precision"=real -DFUNDER -DISNAN inprepar.F >inprepar.f f77 -O -ff77 -c inprepar.f fpp -D"real_precision"=real -DFUNDER -DISNAN gridread.F >gridread.f f77 -O -ff77 -c gridread.f fpp -D"real_precision"=real -DFUNDER -DISNAN qread.F >qread.f f77 -O -ff77 -c qread.f fpp -D"real_precision"=real -DFUNDER -DISNAN config.F >config.f f77 -O -ff77 -c config.f config.F: In subroutine `config': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first config.F: In subroutine `tracefile': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first fpp -D"real_precision"=real -DFUNDER -DISNAN assemble.F >assemble.f f77 -O -ff77 -c assemble.f fpp -D"real_precision"=real -DFUNDER -DISNAN bcassemble.F >bcassemble.f f77 -O -ff77 -c bcassemble.f fpp -D"real_precision"=real -DFUNDER -DISNAN metric.F >metric.f f77 -O -ff77 -c metric.f fpp -D"real_precision"=real -DFUNDER -DISNAN getintgc.F >getintgc.f f77 -O -ff77 -c getintgc.f fpp -D"real_precision"=real -DFUNDER -DISNAN getaxismap.F >getaxismap.f f77 -O -ff77 -c getaxismap.f fpp -D"real_precision"=real -DFUNDER -DISNAN getsurface.F >getsurface.f f77 -O -ff77 -c getsurface.f fpp -D"real_precision"=real -DFUNDER -DISNAN corners.F >corners.f f77 -O -ff77 -c corners.f fpp -D"real_precision"=real -DFUNDER -DISNAN rdist.F >rdist.f f77 -O -ff77 -c rdist.f fpp -D"real_precision"=real -DFUNDER -DISNAN interpold.F >interpold.f f77 -O -ff77 -c interpold.f fpp -D"real_precision"=real -DFUNDER -DISNAN timestp.F >timestp.f f77 -O -ff77 -c timestp.f timestp.F: In subroutine `timestp': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first fpp -D"real_precision"=real -DFUNDER -DISNAN preset.F >preset.f f77 -O -ff77 -c preset.f fpp -D"real_precision"=real -DFUNDER -DISNAN step1.F >step1.f f77 -O -ff77 -c step1.f step1.F: In subroutine `step1': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first fpp -D"real_precision"=real -DFUNDER -DISNAN update.F >update.f f77 -O -ff77 -c update.f update.F: In subroutine `update': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first fpp -D"real_precision"=real -DFUNDER -DISNAN intupdate.F >intupdate.f f77 -O -ff77 -c intupdate.f fpp -D"real_precision"=real -DFUNDER -DISNAN check.F >check.f f77 -O -ff77 -c check.f fpp -D"real_precision"=real -DFUNDER -DISNAN rhsupwind.F >rhsupwind.f f77 -O -ff77 -c rhsupwind.f fpp -D"real_precision"=real -DFUNDER -DISNAN lhs.F >lhs.f f77 -O -ff77 -c lhs.f lhs.F: In subroutine `lhs': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first lhs.F: In subroutine `lhs_spec': include/dualtime.Inc:22: warning: common/dual1/delt,time,timetrace,th,gamdt,qn,qnm1,qnm2,qavg, ^ Padding of 4 bytes required before `qavg' in common block `dual1' at (^) -- consider reordering members, largest-type-size first fpp -D"real_precision"=real -DFUNDER -DISNAN eos.F >eos.f f77 -O -ff77 -c eos.f eos.F: In subroutine `eos': eos.F:217: warning: zcmp(n) = yic(n,2) ^ Array element value at (^) out of defined range eos.F:222: warning: rc(n) = rliq*yic(n,1) + yic(n,2)*pc(n)/(rgt*tc(n)) ^ Array element value at (^) out of defined range eos.F:224: warning: hst(n) = cpliq*yic(n,1) + gm*rgas/g1*yic(n,2) ^ Array element value at (^) out of defined range eos.F:231: warning: rspn = yic(n,2)/(rgas*tc(n)) ^ Array element value at (^) out of defined range eos.F:237: warning: rst(n) = -yic(n,2)*rc(n)/tc(n)/dnm1 ^ Array element value at (^) out of defined range eos.F:243: warning: vis(n) = yic(n,1)*rmuliq + yic(n,2)*rmu0 ^ Array element value at (^) out of defined range eos.F:244: warning: tcnd(n)= yic(n,1)*tcndliq + yic(n,2)*hst(n)*rmu0/pr ^ Array element value at (^) out of defined range eos.F:246: warning: rdif(n,2)=vis(n) ^ Array element value at (^) out of defined range eos.F: In subroutine `eosbc': eos.F:905: warning: zcmp(ncl)=yic(ncl,2) ^ Array element value at (^) out of defined range eos.F:910: warning: rc(ncl) = rliq*yic(ncl,1) + yic(ncl,2)*pc(ncl)/(rgt*tc(ncl)) ^ Array element value at (^) out of defined range eos.F:912: warning: hst(ncl) = cpliq*yic(ncl,1) + gm*rgas/g1*yic(ncl,2) ^ Array element value at (^) out of defined range eos.F:919: warning: rspn = yic(ncl,2)/(rgas*tc(ncl)) ^ Array element value at (^) out of defined range eos.F:925: warning: rst(ncl) = -yic(ncl,2)*rc(ncl)/tc(ncl)/dnm1 ^ Array element value at (^) out of defined range eos.F:931: warning: vis(ncl)=yic(ncl,1)*rmuliq + yic(ncl,2)*rmu0 ^ Array element value at (^) out of defined range eos.F:932: warning: tcnd(ncl)=yic(ncl,1)*tcndliq + yic(ncl,2)*hst(ncl)*rmu0/pr ^ Array element value at (^) out of defined range eos.F:934: warning: rdif(ncl,2)=vis(ncl) ^ Array element value at (^) out of defined range eos.F:954: warning: zcmp(ncl)=yic(ncl,2) ^ Array element value at (^) out of defined range eos.F:959: warning: rc(ncl) = rliq*yic(ncl,1) + yic(ncl,2)*pc(ncl)/(rgt*tc(ncl)) ^ Array element value at (^) out of defined range eos.F:961: warning: hst(ncl) = cpliq*yic(ncl,1) + yic(ncl,2)*gm*rgas/g1 ^ Array element value at (^) out of defined range eos.F:968: warning: rspn = yic(ncl,2)/(rgas*tc(ncl)) ^ Array element value at (^) out of defined range eos.F:974: warning: rst(ncl) = -yic(ncl,2)*rc(ncl)/tc(ncl)/dnm1 ^ Array element value at (^) out of defined range eos.F:980: warning: vis(ncl)=yic(ncl,1)*rmuliq + yic(ncl,2)*rmu0 ^ Array element value at (^) out of defined range eos.F:981: warning: tcnd(ncl)=yic(ncl,1)*tcndliq + yic(ncl,2)*hst(ncl)*rmu0/pr ^ Array element value at (^) out of defined range eos.F:983: warning: rdif(ncl,2)=vis(ncl) ^ Array element value at (^) out of defined range fpp -D"real_precision"=real -DFUNDER -DISNAN sprop.F >sprop.f f77 -O -ff77 -c sprop.f fpp -D"real_precision"=real -DFUNDER -DISNAN spropck.F >spropck.f f77 -O -ff77 -c spropck.f fpp -D"real_precision"=real -DFUNDER -DISNAN turbsource.F >turbsource.f f77 -O -ff77 -c turbsource.f fpp -D"real_precision"=real -DFUNDER -DISNAN turbeddy.F >turbeddy.f f77 -O -ff77 -c turbeddy.f fpp -D"real_precision"=real -DFUNDER -DISNAN bc.F >bc.f f77 -O -ff77 -c bc.f bc.F: In subroutine `bc': bc.F:62: do 1000 ibck=1,iblock 1 bc.F:551: (continued): end 2 Statement at (2) invalid in context established by statement at (1) bc.F:62: do 1000 ibck=1,iblock ^ End of source file before end of block started at (^) *** Error code 1 Stop in /usr/ports/cad/duns/work/Duns/src. --0-1206357594-1058242560=:45641--