svn commit: r541192 - head/science/aircraft-datcom

[Tobias Kortkamp]

Author: tobik
Date: Sat Jul  4 11:07:57 2020
New Revision: 541192
URL: https://svnweb.freebsd.org/changeset/ports/541192

Log:
  science/aircraft-datcom: Unbreak build with GCC 10
  
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:185:40:
  
    168 |      1            TINF,RN,SRF,CBAR,BLRF,XCG,ZCG,DUM,
        |                                   2
  ......
    185 |      1  TRA(78),TRA(76),TRA(79),TRA(80),O,P,Q,R,S,T,NN,NM)
        |                                        1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:187:39:
  
    168 |      1            TINF,RN,SRF,CBAR,BLRF,XCG,ZCG,DUM,
        |                                   2
  ......
    187 |      1  SBD(124),SBD(123),SBD(115),ANA,O,P,Q,R,S,T,NN,NM)
        |                                       1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:302:34:
  
    168 |      1            TINF,RN,SRF,CBAR,BLRF,XCG,ZCG,DUM,
        |                          2
  ......
    302 |      2 FACT(143),FACT(22),WBT(46),H,H,O,P,Q,R,S,T,NN,NM)
        |                                  1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:304:57:
  
    167 |       CALL SWRITE(11,FOR,46,ICONT,1,FLC(I+2),ALT,VINF,PINF,
        |                                                 2
  ......
    304 |      1 CALL SWRITE(6,FOR2,26,JCON,NALPHA,FLC(23),FACT(2),ANONE,
        |                                                         1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:311:33:
  
    168 |      1            TINF,RN,SRF,CBAR,BLRF,XCG,ZCG,DUM,
        |                          2
  ......
    311 |      2 STP(133),SWB(40),STP(111),H,H,O,P,Q,R,S,T,NN,NM)
        |                                 1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:313:57:
  
    167 |       CALL SWRITE(11,FOR,46,ICONT,1,FLC(I+2),ALT,VINF,PINF,
        |                                                 2
  ......
    313 |      1 CALL SWRITE(6,FOR2,26,JCON,NALPHA,FLC(23),SWB(12),ANONE,
        |                                                         1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:336:7:
  
    167 |       CALL SWRITE(11,FOR,46,ICONT,1,FLC(I+2),ALT,VINF,PINF,
        |                                                      2
  ......
    336 |      1 H,O,P,Q,R,S,T,Q,R,S,T,NN,NM)
        |       1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:338:7:
  
    167 |       CALL SWRITE(11,FOR,46,ICONT,1,FLC(I+2),ALT,VINF,PINF,
        |                                                      2
  ......
    338 |      1 H,O,P,Q,R,S,T,Q,R,S,T,NN,NM)
        |       1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  /wrkdirs/usr/ports/science/aircraft-datcom/work/aircraft-datcom-ed877bb/src/auxout.f:348:7:
  
    167 |       CALL SWRITE(11,FOR,46,ICONT,1,FLC(I+2),ALT,VINF,PINF,
        |                                                      2
  ......
    348 |      1 H,O,P,Q,R,S,T,Q,R,S,T,NN,NM)
        |       1
  Error: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
  
  http://package18.nyi.freebsd.org/data/121amd64-default-PR244494/2020-06-10_18h04m44s/logs/errors/aircraft-datcom-0.0.20120723_5.log
  
  PR:		246700

Modified:
  head/science/aircraft-datcom/Makefile

Modified: head/science/aircraft-datcom/Makefile
==============================================================================
--- head/science/aircraft-datcom/Makefile	Sat Jul  4 10:46:08 2020	(r541191)
+++ head/science/aircraft-datcom/Makefile	Sat Jul  4 11:07:57 2020	(r541192)
@@ -15,6 +15,7 @@ GH_ACCOUNT=	arktools
 GH_TAGNAME=	ed877bb
 
 USES=	fortran cmake
+FFLAGS+=	-std=legacy
 
 OPTIONS_DEFINE=	DOCS