Implement method and variable reflection in dart:mirrors.

runtime/vm/object_test.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 "platform/assert.h"
 #include "vm/assembler.h"
 #include "vm/bigint_operations.h"
 #include "vm/isolate.h"
 #include "vm/object.h"
 #include "vm/object_store.h"
@@ skipping 2652 matching lines @@
   EXPECT(Field::IsGetterName(getter_f));
   EXPECT(!Field::IsSetterName(getter_f));
   EXPECT(!Field::IsGetterName(setter_f));
   EXPECT(Field::IsSetterName(setter_f));
   EXPECT_STREQ(f.ToCString(),
                String::Handle(Field::NameFromGetter(getter_f)).ToCString());
   EXPECT_STREQ(f.ToCString(),
                String::Handle(Field::NameFromSetter(setter_f)).ToCString());
 }
 
+
+// Expose helper function from object.cc for testing.
+bool EqualsIgnoringPrivate(const String& name, const String& private_name);
+
+
+TEST_CASE(EqualsIgnoringPrivate) {
+  String& mangled_name = String::Handle();
+  String& bare_name = String::Handle();
+
+  // Simple matches.
+  mangled_name = String::New("foo");
+  bare_name = String::New("foo");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo.");
+  bare_name = String::New("foo.");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo.named");
+  bare_name = String::New("foo.named");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Simple mismatches.
+  mangled_name = String::New("bar");
+  bare_name = String::New("foo");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo.");
+  bare_name = String::New("foo");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo");
+  bare_name = String::New("foo.");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo.name");
+  bare_name = String::New("foo.named");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  mangled_name = String::New("foo.named");
+  bare_name = String::New("foo.name");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private match.
+  mangled_name = String::New("foo@12345");
+  bare_name = String::New("foo");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private mismatch.
+  mangled_name = String::New("food@12345");
+  bare_name = String::New("foo");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private mismatch 2.
+  mangled_name = String::New("foo@12345");
+  bare_name = String::New("food");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private constructor match.
+  mangled_name = String::New("foo@12345.");
+  bare_name = String::New("foo.");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private constructor mismatch.
+  mangled_name = String::New("foo@12345.");
+  bare_name = String::New("foo");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Private constructor mismatch 2.
+  mangled_name = String::New("foo@12345");
+  bare_name = String::New("foo.");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named private constructor match.
+  mangled_name = String::New("foo@12345.named");
+  bare_name = String::New("foo.named");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named private constructor mismatch.
+  mangled_name = String::New("foo@12345.name");
+  bare_name = String::New("foo.named");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named private constructor mismatch 2.
+  mangled_name = String::New("foo@12345.named");
+  bare_name = String::New("foo.name");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named double-private constructor match.  Yes, this happens.
+  mangled_name = String::New("foo@12345.named@12345");
+  bare_name = String::New("foo.named");
+  EXPECT(EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named double-private constructor mismatch.
+  mangled_name = String::New("foo@12345.name@12345");
+  bare_name = String::New("foo.named");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+
+  // Named double-private constructor mismatch.
+  mangled_name = String::New("foo@12345.named@12345");
+  bare_name = String::New("foo.name");
+  EXPECT(!EqualsIgnoringPrivate(mangled_name, bare_name));
+}
+
+
 #endif  // defined(TARGET_ARCH_IA32) || defined(TARGET_ARCH_X64).
 
 }  // namespace dart