* Fix bug in numeric construction when cl_value_len is large (for CLN 1.2).
authorRichard Kreckel <Richard.Kreckel@uni-mainz.de>
Mon, 19 Dec 2005 00:58:28 +0000 (00:58 +0000)
committerRichard Kreckel <Richard.Kreckel@uni-mainz.de>
Mon, 19 Dec 2005 00:58:28 +0000 (00:58 +0000)
ginac/numeric.cpp

index 8825bdb992f6a78825fef3b9ace567a3b0e64591..9f7968ea0d4d5167b6cf5052a6ec0fe3428c529a 100644 (file)
@@ -107,7 +107,7 @@ numeric::numeric(unsigned int i) : basic(TINFO_numeric)
        // emphasizes efficiency.  However, if the integer is small enough
        // we save space and dereferences by using an immediate type.
        // (C.f. <cln/object.h>)
-       if (i < (1U << (cl_value_len-1)))
+       if (i < (1UL << (cl_value_len-1)))
                value = cln::cl_I(i);
        else
                value = cln::cl_I(static_cast<unsigned long>(i));