Changeset 918


Ignore:
Timestamp:
Jul 1, 2003, 12:15:36 AM (18 years ago)
Author:
orlov
Message:
  • Some corrections and FIXME's.
Location:
to-imperative/trunk/library/Class
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/library/Class/digit_q_.cc

    r905 r918  
    2222      retfail;
    2323    else {
     24      //
     25      // FIXME: here method Char::is_digit() should be used.
    2426      wchar_t c = b->to_wchar_t();
    2527      if (c < 48 || c > 57)
  • to-imperative/trunk/library/Class/int_q_.cc

    r905 r918  
    1919    Term* p = e_Exp.get_first();
    2020    unsigned t = p->get_type();
    21     if (t != type_int)
    22       if (t != type_short_int)
     21    if (t != type_int && t != type_short_int)
    2322      retfail;
    2423  }
  • to-imperative/trunk/library/Class/letter_q_.cc

    r905 r918  
    2222      retfail;
    2323    else {
    24     wchar_t c = b->to_wchar_t();
    25     if (c < 65 || c > 128)
    26       retfail;
     24      //
     25      // FIXME: here method Char::is_letter() should be used.
     26      wchar_t c = b->to_wchar_t();
     27      if (c < 65 || c > 128)
     28        retfail;
    2729    }
    2830  }
Note: See TracChangeset for help on using the changeset viewer.