Adds new apis Dart_GetField/Dart_SetField.

vm/object.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/object.h"
 
 #include "platform/assert.h"
 #include "vm/assembler.h"
 #include "vm/bigint_operations.h"
 #include "vm/bootstrap.h"
@@ skipping 552 matching lines @@
   object_store->set_object_class(cls);
   cls.set_name(String::Handle(String::NewSymbol("Object")));
   cls.set_script(script);
   core_lib.AddClass(cls);
   pending_classes.Add(&Class::ZoneHandle(cls.raw()));
   type = Type::NewNonParameterizedType(cls);
   object_store->set_object_type(type);
 
   cls = Class::New<InternalByteArray>();
   object_store->set_internal_byte_array_class(cls);
-  cls.set_name(String::Handle(core_lib.PrivateName("_InternalByteArray")));
+  String& public_class_name = String::Handle();
+  public_class_name = String::New("_InternalByteArray");
+  cls.set_name(String::Handle(core_lib.PrivateName(public_class_name)));
   cls.set_script(script);
   core_lib.AddClass(cls);
 
   cls = Class::New<ExternalByteArray>();
   object_store->set_external_byte_array_class(cls);
-  cls.set_name(String::Handle(core_lib.PrivateName("_ExternalByteArray")));
+  public_class_name = String::New("_ExternalByteArray");
+  cls.set_name(String::Handle(core_lib.PrivateName(public_class_name)));
   cls.set_script(script);
   core_lib.AddClass(cls);
 
   // Set the super type of class Stacktrace to Object type so that the
   // 'toString' method is implemented.
   cls = object_store->stacktrace_class();
   cls.set_super_type(type);
 
   cls = CreateAndRegisterInterface("Function", script, core_lib);
   pending_classes.Add(&Class::ZoneHandle(cls.raw()));
@@ skipping 3867 matching lines @@
     if (entry_name.Equals(name)) {
       return entry.raw();
     }
     index = (index + 1) % dict_size;
     entry = dict.At(index);
   }
   return Class::null();
 }
 
 
+RawField* Library::LookupLocalField(const String& name) const {
+  Isolate* isolate = Isolate::Current();
+  Field& field = Field::Handle(isolate, Field::null());
+  Object& obj = Object::Handle(isolate, Object::null());
+  obj = LookupLocalObject(name);
+  if (obj.IsNull()) {
+    String& private_name = String::Handle(isolate, PrivateName(name));
+    obj = LookupLocalObject(private_name);
+  }
+  if (!obj.IsNull()) {
+    if (obj.IsField()) {
+      field ^= obj.raw();
+      return field.raw();
+    }
+  }
+
+  // No field found.
+  return Field::null();
+}
+
+
+RawFunction* Library::LookupLocalFunction(const String& name) const {
+  Isolate* isolate = Isolate::Current();
+  Function& function = Function::Handle(isolate, Function::null());
+  Object& obj = Object::Handle(isolate, Object::null());
+  obj = LookupLocalObject(name);
+  if (obj.IsNull()) {
+    String& private_name = String::Handle(isolate, PrivateName(name));
+    obj = LookupLocalObject(private_name);
+  }
+  if (!obj.IsNull()) {
+    if (obj.IsFunction()) {
+      function ^= obj.raw();
+      return function.raw();
+    }
+  }
+
+  // No function found.
+  return Function::null();
+}
+
+
 RawObject* Library::LookupObjectFiltered(const String& name,
                                          const Library& filter_lib) const {
   // First check if name is found in the local scope of the library.
   Object& obj = Object::Handle(LookupLocalObject(name));
   if (!obj.IsNull()) {
     return obj.raw();
   }
   // Now check if name is found in the top level scope of any imported libs.
   const Array& imports = Array::Handle(this->imports());
   Library& import_lib = Library::Handle();
@@ skipping 395 matching lines @@
     lib_key = lib_url.Hash();
     if (lib_key == key) {
       return true;
     }
     lib = lib.next_registered();
   }
   return false;
 }
 
 
-RawString* Library::PrivateName(const char* name) {
-  ASSERT(name[0] == '_');
-  ASSERT(strchr(name, '@') == NULL);
+RawString* Library::PrivateName(const String& name) const {
+  // TODO(turnidge): Should check for prefix of "_", "get:_", or "set:_" here.

[Ivan Posva, 2012/03/07 20:02:58]

ASSERT(name.CharAt(0) == '_');

[turnidge, 2012/03/07 21:17:12]

Done...

+  // ASSERT(strchr(name, '@') == NULL);
   String& str = String::Handle();
-  str = String::New(name);
+  str ^= name.raw();
   str = String::Concat(str, String::Handle(this->private_key()));
   str = String::NewSymbol(str);
   return str.raw();
 }
 
 
 void Library::Register() const {
   ASSERT(Library::LookupLibrary(String::Handle(url())) == Library::null());
   raw_ptr()->next_registered_ =
       Isolate::Current()->object_store()->registered_libraries();
@@ skipping 3627 matching lines @@
   result.set_num_args_tested(num_args_tested);
   // Number of array elements in one test entry (num_args_tested + 1)
   intptr_t len = result.TestEntryLength();
   // IC data array must be null terminated (sentinel entry).
   Array& ic_data = Array::Handle(Array::New(len, Heap::kOld));
   result.set_ic_data(ic_data);
   return result.raw();
 }
 
 }  // namespace dart