Changeset 256

Timestamp:

Nov 29, 2002, 1:11:19 PM (18 years ago)

Author:

luba

Message:

* empty log message *

Location:

to-imperative/trunk/runtime

Files:

• convert.cc (modified) (1 diff)
• rf_int.hh (modified) (3 diffs)

to-imperative/trunk/runtime/convert.cc

@@ -153 +153 @@
       retfail;                             
                                                 
-  if ( rf_char("-") == *(rf_char*)q )         
+  if ( rf_char('-') == *(rf_char*)q )         
     s_Int = Expr(rf_int(e_t_exp, false, 1));
 
   else if( ((rf_char*)q)->is_digit())  
          s_Int = Expr(rf_int(e_t_exp, true, 0));                                                                                         
-       else if (rf_char("+") == *(rf_char*)q)
+       else if (rf_char('+') == *(rf_char*)q)
               s_Int = Expr(rf_int(e_t_exp, true, 1))
             else retfail;

to-imperative/trunk/runtime/rf_int.hh

@@ -31 +31 @@
   Term* q = expr.get_first() + i;
 
-  rf_char a = rf_char("0");
+  rf_char a = rf_char('0');
 
   for (; q < expr.get_last(); q++)
@@ -91 +91 @@
   /*
   if (n < 0) {
-    *t = rf_char("-"); 
+    *t = rf_char('-'); 
     t++;
   };
@@ -104 +104 @@
   while ( k ) {
     m = (n / k) % 10;
-    *t = rf_char(m - 48);
+    *t = rf_char(m + 48);
     k /= 10;
     t++;