[Turbofan] Introduce OtherNumberConstant.

src/compiler/types.h

 // Copyright 2014 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #ifndef V8_COMPILER_TYPES_H_
 #define V8_COMPILER_TYPES_H_
 
 #include "src/conversions.h"
 #include "src/handles.h"
+#include "src/objects-inl.h"
 #include "src/objects.h"
 #include "src/ostreams.h"
 
 namespace v8 {
 namespace internal {
 namespace compiler {
 
 // SUMMARY
 //
 // A simple type system for compiler-internal use. It is based entirely on
@@ skipping 236 matching lines @@
   static inline const Boundary* Boundaries();
   static inline size_t BoundariesSize();
 };
 
 // -----------------------------------------------------------------------------
 // Superclass for non-bitset types (internal).
 class TypeBase {
  protected:
   friend class Type;
 
-  enum Kind { kConstant, kTuple, kUnion, kRange };
+  enum Kind { kConstant, kOtherNumberConstant, kTuple, kUnion, kRange };
 
   Kind kind() const { return kind_; }
   explicit TypeBase(Kind kind) : kind_(kind) {}
 
   static bool IsKind(Type* type, Kind kind) {
     if (BitsetType::IsBitset(type)) return false;
     TypeBase* base = reinterpret_cast<TypeBase*>(type);
     return base->kind() == kind;
   }
 
   // The hacky conversion to/from Type*.
   static Type* AsType(TypeBase* type) { return reinterpret_cast<Type*>(type); }
   static TypeBase* FromType(Type* type) {
     return reinterpret_cast<TypeBase*>(type);
   }
 
  private:
   Kind kind_;
 };
 
 // -----------------------------------------------------------------------------
 // Constant types.
 
+class OtherNumberConstantType : public TypeBase {
+ public:
+  double Value() { return value_; }
+
+  static bool IsInteger(double x) {
+    return nearbyint(x) == x && !i::IsMinusZero(x);  // Allows for infinities.
+  }
+
+  static bool IsOtherNumberConstant(double value) {
+    // Not an integer, not NaN, and not -0.
+    return !std::isnan(value) && !IsInteger(value) && !i::IsMinusZero(value);

[Jarin, 2016/10/04 13:14:55]

IsInteger => Type::IsInteger (and remove the IsInteger method above?)

[mvstanton, 2016/10/05 13:51:10]

Let me keep this for now, I wouldn't be able to inline very well because of
definition ordering.

+  }
+
+  static bool IsOtherNumberConstant(Object* value) {
+    if (value->IsHeapNumber()) {
+      return IsOtherNumberConstant(HeapNumber::cast(value)->value());

[Jarin, 2016/10/04 13:14:55]

Nit: 

return value->IsHeapNumber() &&
    IsOtherNumberConstant(HeapNumber::cast(value)->value());

[mvstanton, 2016/10/05 13:51:10]

Done.

+    }
+    return false;
+  }
+
+ private:
+  friend class Type;
+  friend class BitsetType;
+
+  static Type* New(double value, Zone* zone) {
+    return AsType(new (zone->New(sizeof(OtherNumberConstantType)))
+                      OtherNumberConstantType(value));
+  }
+
+  static OtherNumberConstantType* cast(Type* type) {
+    DCHECK(IsKind(type, kOtherNumberConstant));
+    return static_cast<OtherNumberConstantType*>(FromType(type));
+  }
+
+  OtherNumberConstantType(double value)
+      : TypeBase(kOtherNumberConstant), value_(value) {
+    CHECK(IsOtherNumberConstant(value));
+  }
+
+  BitsetType::bitset Lub() { return BitsetType::kOtherNumber; }
+
+  double value_;
+};
+
 class ConstantType : public TypeBase {

[Jarin, 2016/10/04 13:14:55]

Maybe ConstantType => HeapConstantType?

[mvstanton, 2016/10/05 13:51:10]

Done.

  public:
   i::Handle<i::Object> Value() { return object_; }
 
  private:
   friend class Type;
   friend class BitsetType;
 
   static Type* New(i::Handle<i::Object> value, Zone* zone) {
     BitsetType::bitset bitset = BitsetType::Lub(*value);
     return AsType(new (zone->New(sizeof(ConstantType)))
                       ConstantType(bitset, value));
   }
 
   static ConstantType* cast(Type* type) {
     DCHECK(IsKind(type, kConstant));
     return static_cast<ConstantType*>(FromType(type));
   }
 
   ConstantType(BitsetType::bitset bitset, i::Handle<i::Object> object)
-      : TypeBase(kConstant), bitset_(bitset), object_(object) {}
+      : TypeBase(kConstant), bitset_(bitset), object_(object) {
+    CHECK(!object->IsSmi());  // Smis should always be RangeTypes.
+    CHECK(!OtherNumberConstantType::IsOtherNumberConstant(*object));
+  }
 
   BitsetType::bitset Lub() { return bitset_; }
 
   BitsetType::bitset bitset_;
   Handle<i::Object> object_;
 };
-// TODO(neis): Also cache value if numerical.
 
 // -----------------------------------------------------------------------------
 // Range types.
 
 class RangeType : public TypeBase {
  public:
   struct Limits {
     double min;
     double max;
     Limits(double min, double max) : min(min), max(max) {}
@@ skipping 139 matching lines @@
   PROPER_BITSET_TYPE_LIST(DEFINE_TYPE_CONSTRUCTOR)
 #undef DEFINE_TYPE_CONSTRUCTOR
 
   static Type* SignedSmall() {
     return BitsetType::New(BitsetType::SignedSmall());
   }
   static Type* UnsignedSmall() {
     return BitsetType::New(BitsetType::UnsignedSmall());
   }
 
+  static Type* OtherNumberConstant(double value, Zone* zone) {
+    return OtherNumberConstantType::New(value, zone);
+  }
   static Type* Constant(i::Handle<i::Object> value, Zone* zone) {

[Jarin, 2016/10/04 13:14:55]

Maybe Constant => HeapConstant?

[mvstanton, 2016/10/05 13:51:10]

Done.

     return ConstantType::New(value, zone);
   }
   static Type* Range(double min, double max, Zone* zone) {
     return RangeType::New(min, max, zone);
   }
   static Type* Tuple(Type* first, Type* second, Type* third, Zone* zone) {
     Type* tuple = TupleType::New(3, zone);
     tuple->AsTuple()->InitElement(0, first);
     tuple->AsTuple()->InitElement(1, second);
     tuple->AsTuple()->InitElement(2, third);
     return tuple;
   }
 
+  // NewConstant is a factory that returns Constant, Range or Number.
+  static Type* NewConstant(i::Handle<i::Object> value, Zone* zone);
+
   static Type* Union(Type* type1, Type* type2, Zone* zone);
   static Type* Intersect(Type* type1, Type* type2, Zone* zone);
 
   static Type* Of(double value, Zone* zone) {
     return BitsetType::New(BitsetType::ExpandInternals(BitsetType::Lub(value)));
   }
   static Type* Of(i::Object* value, Zone* zone) {
     return BitsetType::New(BitsetType::ExpandInternals(BitsetType::Lub(value)));
   }
   static Type* Of(i::Handle<i::Object> value, Zone* zone) {
     return Of(*value, zone);
   }
 
   static Type* For(i::Map* map) {
     return BitsetType::New(BitsetType::ExpandInternals(BitsetType::Lub(map)));
   }
   static Type* For(i::Handle<i::Map> map) { return For(*map); }
 
   // Predicates.
   bool IsInhabited() { return BitsetType::IsInhabited(this->BitsetLub()); }
 
   bool Is(Type* that) { return this == that || this->SlowIs(that); }
   bool Maybe(Type* that);
   bool Equals(Type* that) { return this->Is(that) && that->Is(this); }
 
   // Inspection.
   bool IsRange() { return IsKind(TypeBase::kRange); }
   bool IsConstant() { return IsKind(TypeBase::kConstant); }

[Jarin, 2016/10/04 13:14:55]

IsHeapConstant?

[mvstanton, 2016/10/05 13:51:10]

Done.

+  bool IsOtherNumberConstant() {
+    return IsKind(TypeBase::kOtherNumberConstant);
+  }
   bool IsTuple() { return IsKind(TypeBase::kTuple); }
 
   ConstantType* AsConstant() { return ConstantType::cast(this); }
+  OtherNumberConstantType* AsOtherNumberConstant() {
+    return OtherNumberConstantType::cast(this);
+  }
   RangeType* AsRange() { return RangeType::cast(this); }
   TupleType* AsTuple() { return TupleType::cast(this); }
 
   // Minimum and maximum of a numeric type.
   // These functions do not distinguish between -0 and +0.  If the type equals
   // kNaN, they return NaN; otherwise kNaN is ignored.  Only call these
   // functions on subtypes of Number.
   double Min();
   double Max();
 
@@ skipping 66 matching lines @@
                           RangeType::Limits* limits, Zone* zone);
   static Type* NormalizeUnion(Type* unioned, int size, Zone* zone);
   static Type* NormalizeRangeAndBitset(Type* range, bitset* bits, Zone* zone);
 };
 
 }  // namespace compiler
 }  // namespace internal
 }  // namespace v8
 
 #endif  // V8_COMPILER_TYPES_H_