[MITgcm-support] latest cvs code doesn't compile...mnc_cw_citer.f:

[Karsten Friis]

Hi Ed,

I guess you are the one to ask. The latest cvs code doesn't compile on 
my machine. I include some older subroutines with the genmake2 command 
but I don't think this is the problem here. I get the following report 
that refers to the mnc package which is actived for an offline 
executeable... Can you help me out?

So long,
-best
karsten

----------------------------------------------------------------------
MNC_CW_READWRITE_RS.f:6365: warning: `npath' might be used uninitialized 
in this function
cat mnc_cw_citer.F | ../../tools/set64bitConst.sh |  cpp  -traditional 
-P -D_BYTESWAPIO -DWORDLENGTH=4 -DHAVE_SYSTEM -DHAVE_FDATE -DHAVE_ETIME 
-DHAVE_CLOC -DHAVE_STAT  -I/diatom/s0/kfriis/netcdf-3.5.1/src/fortran > 
mnc_cw_citer.f
g77 -Wimplicit -Wunused -Wuninitialized -O3 -malign-double 
-funroll-loops -c mnc_cw_citer.f
mnc_cw_citer.f: In subroutine `mnc_cw_citer_setg':
mnc_cw_citer.f:636:
          mnc_cw_cit(1,igroup) = iflag
          1          2
Unrecognized statement name at (1) and invalid form for assignment or 
statement-function definition at (2)
mnc_cw_citer.f:639:
            IF ( mnc_cw_cit(2,igroup) .NE. ival_curr ) THEN
                 ^
Invalid declaration of or reference to symbol `mnc_cw_cit' at (^) 
[initially seen at (^)]
mnc_cw_citer.f:644:
                IF ( mnc_cw_fgci(i) .eq. igroup ) THEN
                     ^
Invalid declaration of or reference to symbol `mnc_cw_fgci' at (^) 
[initially seen at (^)]
mnc_cw_citer.f: In subroutine `mnc_cw_citer_getg':
mnc_cw_citer.f:882:
          iflag     = mnc_cw_cit(1,igroup)
          ^
Invalid form for IF statement at (^)
mnc_cw_citer.f:882:
          iflag     = mnc_cw_cit(1,igroup)
                      1
mnc_cw_citer.f:883: (continued):
          ival_curr = mnc_cw_cit(2,igroup)
                      2
Invalid declaration of or reference to symbol `mnc_cw_cit' at (2) 
[initially seen at (1)]
mnc_cw_citer.f: In subroutine `mnc_cw_set_citer':
mnc_cw_citer.f:1329:
            igroup = mnc_cw_fgci(indfg)
                     ^
Invalid declaration of or reference to symbol `mnc_cw_fgci' at (^) 
[initially seen at (^)]
mnc_cw_citer.f: In subroutine `mnc_cw_get_citer':
mnc_cw_citer.f:1786:
          igroup = mnc_cw_fgci(indfg)
                   ^
Invalid declaration of or reference to symbol `mnc_cw_fgci' at (^) 
[initially seen at (^)]
make: *** [mnc_cw_citer.o] Error 1
-------------------------------------------------------------------


-------------- next part --------------
A non-text attachment was scrubbed...
Name: kfriis.vcf
Type: text/x-vcard
Size: 242 bytes
Desc: not available
URL: <http://mitgcm.org/pipermail/mitgcm-support/attachments/20050921/9a604a7a/attachment.vcf>