Commit in lcio/src/cpp/src/CPPFORT on MAIN
lctrk.cc+1-11.7 -> 1.8
f77 interface bug corrected

lcio/src/cpp/src/CPPFORT
lctrk.cc 1.7 -> 1.8
diff -u -r1.7 -r1.8
--- lctrk.cc	10 Oct 2005 11:16:21 -0000	1.7
+++ lctrk.cc	10 Oct 2005 11:23:51 -0000	1.8
@@ -77,7 +77,7 @@
 
 int lctrkgetcovmatrix( PTRTYPE track, float cvmtx[NCOVARIANCE] ) {
   TrackImpl* trk = f2c_pointer<TrackImpl,LCObject>( track ) ;
-  for( int i=0 ; i<NCOVARIANCE ;  cvmtx[i] = trk->getCovMatrix()[i++]  ) ;
+  for( int i=0 ; i<NCOVARIANCE ;  *cvmtx++ = trk->getCovMatrix()[i++]  ) ;
   return LCIO::SUCCESS ;
 }
 
CVSspam 0.2.8