Changeset 1558 in Sophya for trunk/SophyaLib/TArray/tarray.cc


Ignore:
Timestamp:
Jul 2, 2001, 6:14:32 PM (24 years ago)
Author:
ansari
Message:

Suite implementation decodage ASCII ds EnumeratedSequence et TArray - Reza 2/7/2001

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SophyaLib/TArray/tarray.cc

    r1550 r1558  
    10431043/*!
    10441044  \param is : input stream (ASCII)
    1045  */
    1046 template <class T>
    1047 void TArray<T>::ReadASCII(istream& is)
     1045  \param nr : Number of non empty (or comment) lines in stream (return value)
     1046  \param nc : Number of columns (= ntot/nlines) (return value)
     1047  \return Number of decoded elements
     1048 */
     1049template <class T>
     1050sa_size_t TArray<T>::ReadASCII(istream& is, sa_size_t & nr, sa_size_t & nc)
    10481051{
    10491052  EnumeratedSequence es;
    1050   sa_size_t nr, nc;
    1051   es.FillFromFile(is, nr, nc);
     1053  sa_size_t n = es.FillFromFile(is, nr, nc);
     1054  if ( (n < 1) || (nr < 1) || (nc < 1) ) return(n);
     1055  if (!IsAllocated()) {
     1056    sa_size_t sz[2];
     1057    if (arrtype_ == 2) { // C'est un vecteur
     1058      sz[0] = sz[1] = 1;
     1059      sz[veceli_] = n;
     1060    }
     1061    else {
     1062      sz[RowsKA()] = nr;
     1063      sz[ColsKA()] = nc;
     1064    }
     1065    ReSize(2, sz);
     1066  }
     1067  SetSeq(es);
     1068  cout << "TArray<T>::ReadASCII()/Info: " << n << " elements read from stream "
     1069       << " (Row,Col= " << nr << "," << nc << ")" << endl;
     1070  return(n);
    10521071}
    10531072
     
    10551074/*!
    10561075  \param os : output stream (ASCII)
     1076  \sa Print
    10571077 */
    10581078template <class T>
Note: See TracChangeset for help on using the changeset viewer.