Index: netcdf.cc diff -c netcdf.cc:1.1 netcdf.cc:1.2 *** netcdf.cc:1.1 Mon Apr 21 09:44:55 1997 --- netcdf.cc Tue Jul 1 09:17:43 1997 *************** *** 4,10 **** * * Purpose: Implements class interface for netCDF over C interface * ! * $Header: /upc/share/CVS/netcdf-3/cxx/netcdf.cc,v 1.1 1997/04/21 15:44:55 russ Exp $ *********************************************************************/ #include --- 4,10 ---- * * Purpose: Implements class interface for netCDF over C interface * ! * $Header: /upc/share/CVS/netcdf-3/cxx/netcdf.cc,v 1.2 1997/07/01 15:17:43 russ Exp $ *********************************************************************/ #include *************** *** 428,437 **** } #define Nc_as(TYPE) name2(as_,TYPE) ! #define NcTypedComponent_as(TYPE) \ ! TYPE NcTypedComponent::Nc_as(TYPE)( long n ) const \ ! { \ ! return values()->Nc_as(TYPE)(n); \ } NcTypedComponent_as(ncbyte) NcTypedComponent_as(char) --- 428,440 ---- } #define Nc_as(TYPE) name2(as_,TYPE) ! #define NcTypedComponent_as(TYPE) \ ! TYPE NcTypedComponent::Nc_as(TYPE)( long n ) const \ ! { \ ! NcValues *tmp = values(); \ ! TYPE rval = tmp->Nc_as(TYPE)(n); \ ! delete tmp; \ ! return rval; \ } NcTypedComponent_as(ncbyte) NcTypedComponent_as(char) *************** *** 443,449 **** char* NcTypedComponent::as_string( long n ) const { ! return values()->as_string(n); } NcTypedComponent::NcTypedComponent ( NcFile* nc ) --- 446,455 ---- char* NcTypedComponent::as_string( long n ) const { ! NcValues *tmp = values(); ! char *rval = tmp->as_string(n); ! delete tmp; ! return rval; } NcTypedComponent::NcTypedComponent ( NcFile* nc )