Introduce VM API for the patching mechanism.

runtime/vm/dart_api_impl.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 "include/dart_api.h"
 
 #include "vm/bigint_operations.h"
 #include "vm/class_finalizer.h"
 #include "vm/compiler.h"
 #include "vm/dart.h"
@@ skipping 4404 matching lines @@
   if (source_str.IsNull()) {
     RETURN_TYPE_ERROR(isolate, source, String);
   }
   Dart_Handle result;
   CompileSource(isolate, lib, url_str, source_str,
                 RawScript::kSourceTag, &result);
   return result;
 }
 
 
+DART_EXPORT Dart_Handle Dart_LoadPatch(Dart_Handle library,

[Mads Ager (google), 2012/10/25 10:47:46]

This code is completely duplicated from LoadSource. See patch set 1 for the code
where I have shared the implementation. The reason for duplicating here is the
macro that uses CURRENT_FUNC for the error message. 

+                                       Dart_Handle url,
+                                       Dart_Handle patch_source) {
+  TIMERSCOPE(time_script_loading);
+  Isolate* isolate = Isolate::Current();
+  DARTSCOPE(isolate);
+  if (FLAG_use_cha) {

[Ivan Posva, 2012/10/26 04:33:34]

Leave it like this but note: dartbug.com/6288

+    RemoveOptimizedCode();
+  }
+  const Library& lib = Api::UnwrapLibraryHandle(isolate, library);
+  if (lib.IsNull()) {
+    RETURN_TYPE_ERROR(isolate, library, Library);
+  }
+  const String& url_str = Api::UnwrapStringHandle(isolate, url);
+  if (url_str.IsNull()) {
+    RETURN_TYPE_ERROR(isolate, url, String);
+  }
+  const String& source_str = Api::UnwrapStringHandle(isolate, patch_source);
+  if (source_str.IsNull()) {
+    RETURN_TYPE_ERROR(isolate, patch_source, String);
+  }
+  Dart_Handle result;
+  CompileSource(isolate, lib, url_str, source_str,
+                RawScript::kPatchTag, &result);
+  return result;
+}
+
+
 DART_EXPORT Dart_Handle Dart_SetNativeResolver(
     Dart_Handle library,
     Dart_NativeEntryResolver resolver) {
   Isolate* isolate = Isolate::Current();
   DARTSCOPE(isolate);
   const Library& lib = Api::UnwrapLibraryHandle(isolate, library);
   if (lib.IsNull()) {
     RETURN_TYPE_ERROR(isolate, library, Library);
   }
   lib.set_native_entry_resolver(resolver);
@@ skipping 74 matching lines @@
   }
   {
     NoGCScope no_gc;
     RawObject* raw_obj = obj.raw();
     isolate->heap()->SetPeer(raw_obj, peer);
   }
   return Api::Success(isolate);
 }
 
 }  // namespace dart