Fraction class prototype and test (not to be committed).

runtime/vm/intrinsifier_arm64.cc

 // Copyright (c) 2014, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include "vm/globals.h"  // Needed here to get TARGET_ARCH_ARM64.
 #if defined(TARGET_ARCH_ARM64)
 
 #include "vm/intrinsifier.h"
 
 #include "vm/assembler.h"
@@ skipping 590 matching lines @@
   __ LoadObject(R0, Bool::True());
   __ ret();
 
   // At least one of the arguments was not Smi.
   Label receiver_not_smi;
   __ Bind(&check_for_mint);
 
   __ tsti(R1, Immediate(kSmiTagMask));  // Check receiver.
   __ b(&receiver_not_smi, NE);
 
-  // Left (receiver) is Smi, return false if right is not Double.
+  // Left (receiver) is Smi, return false if right is not Double or Fraction.
   // Note that an instance of Mint or Bigint never contains a value that can be
   // represented by Smi.
 
-  __ CompareClassId(R0, kDoubleCid);
+  __ LoadClassId(TMP, R0);
+  __ CompareImmediate(TMP, kDoubleCid);
+  __ b(&fall_through, EQ);
+  __ CompareImmediate(TMP, kFractionCid);
   __ b(&fall_through, EQ);
   __ LoadObject(R0, Bool::False());  // Smi == Mint -> false.
   __ ret();
 
   __ Bind(&receiver_not_smi);
   // R1: receiver.
 
   __ CompareClassId(R1, kMintCid);
   __ b(&fall_through, NE);
   // Receiver is Mint, return false if right is Smi.
@@ skipping 1586 matching lines @@
   __ cmp(R0, Operand(0));
   __ LoadObject(R0, Bool::False());
   __ LoadObject(TMP, Bool::True());
   __ csel(R0, TMP, R0, NE);
   __ ret();
 }
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_ARM64