Merge github.com:perl6/nqp into add-goto

Raku · May 12, 2012 · f0bf33d · f0bf33d
2 parents c98f22b + 9ddfc35
commit f0bf33d
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 7 deletions.
diff --git a/3rdparty/libtommath/bn_mp_radix_size.c b/3rdparty/libtommath/bn_mp_radix_size.c
@@ -24,12 +24,6 @@ int mp_radix_size (mp_int * a, int radix, int *size)
 
   *size = 0;
 
-  /* special case for binary */
-  if (radix == 2) {
-    *size = mp_count_bits (a) + (a->sign == MP_NEG ? 1 : 0) + 1;
-    return MP_OKAY;
-  }
-
   /* make sure the radix is in range */
   if (radix < 2 || radix > 64) {
     return MP_VAL;
@@ -40,6 +34,12 @@ int mp_radix_size (mp_int * a, int radix, int *size)
     return MP_OKAY;
   }
 
+  /* special case for binary */
+  if (radix == 2) {
+    *size = mp_count_bits (a) + (a->sign == MP_NEG ? 1 : 0) + 1;
+    return MP_OKAY;
+  }
+
   /* digs is the digit count */
   digs = 0;
 

diff --git a/tools/build/PARROT_REVISION b/tools/build/PARROT_REVISION
@@ -1 +1 @@
-RELEASE_4_3_0-122-ga6ec4a1
+RELEASE_4_3_0-124-g8fd4d39