Changeset 866


Ignore:
Timestamp:
Jun 23, 2003, 3:00:08 PM (18 years ago)
Author:
luba
Message:
  • ShortInt::create_expr(pxx::WString& ) method is corrected
File:
1 edited

Legend:

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

    r862 r866  
    3131}
    3232
     33
    3334Expr ShortInt::create_expr (pxx::WString& _str) {
    3435  wchar_t const* s = _str.get_data();
    35   size_t s_len = wcslen(s);
    36   wchar_t last = s[s_len - 1];
    37   wchar_t* last_ptr = &last;
    38   wchar_t** last_ptr_ptr = &last_ptr;
    39   intptr_t n = wcstol(s, last_ptr_ptr, 10);
    40   return ShortInt::create_expr(n);
    41 
     36  return ShortInt::create_expr( wcstol(s, null, 10));
    4237}
    4338
Note: See TracChangeset for help on using the changeset viewer.