Changeset 1106 for to-imperative/trunk/runtime/rf_char.cc

Timestamp:

Aug 6, 2003, 5:30:09 PM (17 years ago)

Author:

luba

Message:

• type_short_int is replaced by type_int32, class ShortInt? is renamed to Int32

File:

• to-imperative/trunk/runtime/rf_char.cc (modified) (3 diffs)

to-imperative/trunk/runtime/rf_char.cc

@@ -24 +24 @@
   char const* saved_locale = null;
   if (_locale != null) {
+
     saved_locale = setlocale(LC_CTYPE, null);
     setlocale(LC_CTYPE, _locale);
@@ -105 +106 @@
   uintptr_t temp;
   for (; p < q; p++, r++) {
-    temp = uintptr_t(((ShortInt*)p)->to_int());
+    temp = uintptr_t(((Int32*)p)->to_int());
     new(r) Char(temp);
   };
@@ -119 +120 @@
   Term* r = e.get_first();
   for (; p < q; p++, r++) {
-    new(r) ShortInt(((Char*)p)->uint_data2);
+    new(r) Int32(((Char*)p)->uint_data2);
   }
   return e;