Add the save attribute to variables that are lazily initialized and reused across calls

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6765 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Bill Somerville 2016-06-11 18:51:04 +00:00
parent 282459b665
commit bac8da7859

View File

@ -39,7 +39,7 @@ subroutine syncmsk144(cdat,npts,pchk_file,msgreceived,fest,nutc,t0)
data first/.true./ data first/.true./
data s8/0,1,1,1,0,0,1,0/ data s8/0,1,1,1,0,0,1,0/
save first,cb,pi,twopi,dt save first,cb,pi,twopi,dt,s8,rcw,pp
if(first) then if(first) then
i=index(pchk_file,".pchk") i=index(pchk_file,".pchk")