Changeset 755


Ignore:
Timestamp:
May 25, 2003, 8:57:46 PM (18 years ago)
Author:
luba
Message:
  • processing of terms of Char type is corrected (spaces around the

digits are ignored)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/runtime/rf_short_int.cc

    r740 r755  
    7070    }
    7171    if (p->get_type() == type_char) {
    72       n = n * 10 + (((Char*)p)->to_wchar_t() - 48);
     72      if (((Char*)p)->is_not_space())
     73        n = n * 10 + (((Char*)p)->to_wchar_t() - 48);
    7374    }
    7475    if (p->get_type() == type_word) {
     
    8687
    8788      for (; i.in_bounds(); i++){       
    88         //        n_word += ((*i)-48) * k_word;
    8989        n_word += (*i) * k_word;
    9090        k_word /= 10;
Note: See TracChangeset for help on using the changeset viewer.