Changeset 0a6f36 in git for factory/cf_factory.cc

Timestamp:

Oct 28, 2020, 11:49:49 AM (3 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

1950d7ac77c33b4a0454f61ac82599d8eace0d48

Parents:

2fb01f7e774076d3244a324901f61c3c34260054

Message:

fix: 32bit factory

File:

• factory/cf_factory.cc (modified) (3 diffs)

factory/cf_factory.cc

@@ -58 +58 @@
 }
 
-#if SIZEOF_LONG == 8
 InternalCF *
 CFFactory::basic ( int value )
@@ -65 +64 @@
   {
     case IntegerDomain:
-            return int2imm( value );
-//     else  if ( currenttype == RationalDomain )
-//         if ( value >= MINIMMEDIATE && value <= MAXIMMEDIATE )
-//             return int2imm( value );
-//         else
-//             return new InternalRational( value );
+#if SIZEOF_LONG == 8
+            return int2imm( value );
+#else
+        if (LIKELY( value >= MINIMMEDIATE && value <= MAXIMMEDIATE ))
+            return int2imm( value );
+        else
+            return new InternalInteger( value );
+#endif
+    case RationalDomain:
+#if SIZEOF_LONG == 8
+            return int2imm( value );
+#else
+        if (LIKELY( value >= MINIMMEDIATE && value <= MAXIMMEDIATE ))
+            return int2imm( value );
+        else
+            return new InternalRational( value );
+#endif
     case FiniteFieldDomain:
         return int2imm_p( ff_norm( value ) );
@@ -85 +95 @@
   }
 }
-#endif
 
 InternalCF *