[svn:parrot] r39128 - branches/tt452_reduce_mmd/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Sun May 24 03:48:57 2009
New Revision: 39128
URL: https://trac.parrot.org/parrot/changeset/39128

Log:
[pmc] Use float comparition in default case of Integer.cmp

Modified:
   branches/tt452_reduce_mmd/src/pmc/integer.pmc

Modified: branches/tt452_reduce_mmd/src/pmc/integer.pmc
==============================================================================
--- branches/tt452_reduce_mmd/src/pmc/integer.pmc	Sun May 24 03:48:19 2009	(r39127)
+++ branches/tt452_reduce_mmd/src/pmc/integer.pmc	Sun May 24 03:48:57 2009	(r39128)
@@ -1016,12 +1016,7 @@
                 return fdiff > 0 ? 1 : -1;
                 break;
 
-            case enum_class_Float:
-                fdiff = SELF.get_number() - VTABLE_get_number(INTERP, value);
-                return fdiff > 0 ? 1 : fdiff < 0 ? -1 : 0;
-                break;
-
-            default:
+            case enum_class_Integer:
                 {
                     /* int or undef */
                     const INTVAL selfint  = SELF.get_integer();
@@ -1029,6 +1024,12 @@
 
                     return selfint > valueint ? 1 : selfint < valueint ? -1 : 0;
                 }
+
+            default:
+                fdiff = SELF.get_number() - VTABLE_get_number(INTERP, value);
+                return fdiff > 0 ? 1 : fdiff < 0 ? -1 : 0;
+                break;
+
         }
     }