src/GamIO/ML5Tag.cc
// ____________________________________________________________________________
// B                    MATLAB MAT 5 Tag Access Functions
// ____________________________________________________________________________
B                    MATLAB MAT 5 Tag Access Functions
B MATLAB MAT 5 Tag Access Functions
int MatLab5Tag::Type(int LE) const
  {
  longchars LC;
  int i;
  if(!LE &&  this->IsBigEndian())
    for(i=0; i<4; i++) LC.chars[i] =  EightBytes[3-i];
  else
    for(i=0; i<4; i++) LC.chars[i] =  EightBytes[i];
  return int(LC.longval);
  }
int MatLab5Tag :: Type ( int LE ) const { longchars LC ; int i ; if ( ! LE && this -> IsBigEndian ( ) ) for ( i = 0 ; i < 4 ; i ++ ) LC . chars [ i ] = EightBytes [ 3 - i ] ; else for ( i = 0 ; i < 4 ; i ++ ) LC . chars [ i ] = EightBytes [ i ] ; return int ( LC . longval ) ; }
____________________________________________________________________________
B                    MATLAB MAT 5 Tag Access Functions
____________________________________________________________________________
____________________________________________________________________________ B MATLAB MAT 5 Tag Access Functions ____________________________________________________________________________
// Input 		ML5T    : MAT version 5 tag (this) //			LE      : Little Endian flag // Output               type	: An integer for the data type // Note				: Byte swapping done if the endian //				  specified doesn't match here