When trying to build a .NET DLL, at the export of the following subroutine I got the message: error 1148 - Array PROPTOT is not of assumed shape, and so cannot appear as an argument to a routine containing an ASSEMBLY_INTERFACE, the subroutine starts with the following code:
SUBROUTINE STPFLASH(TIN,PIN,X1,X2,X3,X4,X5,X6,X7,X8,X9,X10,
& X11,X12,X13,X14,X15,X16,X17,X18,X19,X20,X21,IUNITIN,
& FRAC,HTOT,STOT,UTOT,VTOT,PROPTOT,XL,XV,PROPL,PROPV,
& FUGL,FUGV,FUGAL,FUGAV)
C***********************************************************************
ASSEMBLY_INTERFACE(NAME='STPFLASH')
IMPLICIT REAL*8 (A-H,O-Z)
C INTEGER*4 IUNITIN
PARAMETER (MAXC=21,NAUX=16)
PARAMETER (NPROP=24)
DIMENSION XVEC(MAXC) , LIST(MAXC) , ZFEED(MAXC)
DIMENSION X(MAXC) , Y(MAXC) , AUXX(NAUX) , AUXY(NAUX)
DIMENSION FGX(MAXC) , FGY(MAXC)
DIMENSION PROPL(NPROP) , PROPV(NPROP) , PROPTOT(NPROP)
DIMENSION HSUVTOT(5)
DIMENSION XL(MAXC) , XV(MAXC) , FUGL(MAXC) , FUGV(MAXC) ,
& FUGAL(MAXC) , FUGAV(MAXC)
C
The same error message were given for the arrays XL,XV,PROPL,PROPV,FUGL,FUGV,FUGAL,FUGAV
with the same code it was no problem to build a Win32-DLL. Any idea?