Implement a native identical function in the VM.

runtime/lib/identical.cc

+// Copyright (c) 2012, 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/bootstrap_natives.h"
+
+#include "vm/object.h"
+
+namespace dart {
+
+DEFINE_NATIVE_ENTRY(Identical_comparison, 2) {
+  GET_NATIVE_ARGUMENT(
+     Instance, a, arguments->NativeArgAt(0));

[srdjan, 2012/12/17 23:30:20]

Can this fit in one line (80 chars).

+  GET_NATIVE_ARGUMENT(
+     Instance, b, arguments->NativeArgAt(1));

[srdjan, 2012/12/17 23:30:20]

Ditto.

+  if (a.raw() == b.raw()) return Bool::True();
+  if (a.IsInteger() && b.IsInteger()) {
+    return Bool::Get(a.Equals(b));
+  }
+  if (a.IsDouble() && b.IsDouble()) {
+    if (a.Equals(b)) return Bool::True();
+    // Check for NaN

[srdjan, 2012/12/17 23:30:20]

Terminate comment with a period.

+    const Double& a_double = Double::Cast(a);
+    const Double& b_double = Double::Cast(b);
+    if (isnan(a_double.value()) && isnan(b_double.value())) {
+      return Bool::True();
+    }
+  }
+  return Bool::False();
+}
+
+
+}  // namespace dart