Changeset 253


Ignore:
Timestamp:
Nov 28, 2002, 4:21:44 PM (18 years ago)
Author:
luba
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/runtime/rf_int.hh

    r252 r253  
    4646  if (expr.get_last() - q < 10){
    4747    for (; p >= q; p--) {
    48       n += (((rf_char*)p)->to_byte().n - ord('0'))*k;
     48      n += (((rf_char*)p)->to_byte().n + 48 )*k;
    4949      k *= 10;
    5050       
     
    5757     
    5858    for (; p > q ; p--) {
    59       n += (((rf_char*)p)->to_byte().n - ord('0'))*k;
     59      n += (((rf_char*)p)->to_byte().n + 48 )*k;
    6060      k *= 10;
    6161       
     
    6767        error ( Word2Expr("RF-INT") + "Size limit exceeded");
    6868
    69     n += (((rf_char*)q)->to_byte().n - ord('0'))*k;
     69    n += (((rf_char*)q)->to_byte().n + 48 )*k;
    7070  };
    7171
     
    9292  if (n < 0)
    9393    *t = rf_char("-");
    94 
     94    t++;
    9595  uintptr_t k = 1;
    9696  intptr_t num = n / 10;
     
    103103  while ( k ) {
    104104    m = (n / k) % 10;
    105     *t = rf_char(m - ord("0"));
     105    *t = rf_char(m + 48);
    106106    k /= 10;
    107107    t++;
    108108  };
    109   return t++;
     109  return t;
    110110  */
    111111  char str[11];
Note: See TracChangeset for help on using the changeset viewer.