Add support for interrupting an isolate in the vm. Interrupts are

runtime/vm/dart_api_impl.cc

 // Copyright (c) 2011, 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 510 matching lines @@
 
 DART_EXPORT Dart_Handle Dart_MakePersistentHandle(Dart_Handle object) {
   UNIMPLEMENTED();
   return NULL;
 }
 
 
 // --- Initialization and Globals ---
 
 
-// TODO(iposva): This is a placeholder for the eventual external Dart API.
-DART_EXPORT bool Dart_Initialize(Dart_IsolateCreateCallback callback) {
-  return Dart::InitOnce(callback);
+DART_EXPORT bool Dart_Initialize(Dart_IsolateCreateCallback create,
+                                 Dart_IsolateInterruptCallback interrupt) {
+  return Dart::InitOnce(create, interrupt);
 }
 
 DART_EXPORT bool Dart_SetVMFlags(int argc, const char** argv) {
   return Flags::ProcessCommandLineFlags(argc, argv);
 }
 
 DART_EXPORT bool Dart_IsVMFlagSet(const char* flag_name) {
   if (Flags::Lookup(flag_name) != NULL) {
     return true;
   }
@@ skipping 112 matching lines @@
   if (msg != NULL) {
     return Api::Error(msg);
   }
   ScriptSnapshotWriter writer(root_lib, buffer, ApiAllocator);
   writer.WriteScriptSnapshot();
   *size = writer.Size();
   return Api::Success();
 }
 
 
+DART_EXPORT void Dart_InterruptIsolate(Dart_Isolate isolate) {
+  if (isolate == NULL) {
+    FATAL1("%s expects argument 'isolate' to be non-null.",  CURRENT_FUNC);
+  }
+  Isolate* iso = reinterpret_cast<Isolate*>(isolate);
+  iso->ScheduleInterrupts(Isolate::kApiInterrupt);
+}
+
+
 // --- Messages and Ports ---
 
 
 DART_EXPORT void Dart_SetMessageCallbacks(
     Dart_PostMessageCallback post_message_callback,
     Dart_ClosePortCallback close_port_callback) {
   Isolate* isolate = Isolate::Current();
   CHECK_ISOLATE(isolate);
   ASSERT(post_message_callback != NULL);
   ASSERT(close_port_callback != NULL);
@@ skipping 506 matching lines @@
   DARTSCOPE(Isolate::Current());
   const String& str = Api::UnwrapStringHandle(object);
   if (str.IsNull()) {
     RETURN_TYPE_ERROR(object, String);
   }
   if (!str.IsExternal()) {
     return Api::Error("%s expects argument 'object' to be an external String.",
                       CURRENT_FUNC);
   }
   if (peer == NULL) {
-    return Api::Error("%s expects argument 'peer' to be non-NULL.",
+    return Api::Error("%s expects argument 'peer' to be non-null.",
                       CURRENT_FUNC);
   }
   *peer = str.GetPeer();
   return Api::Success();
 }
 
 
 DART_EXPORT Dart_Handle Dart_NewExternalString8(const uint8_t* codepoints,
                                                 intptr_t length,
                                                 void* peer,
@@ skipping 1267 matching lines @@
     }
     delete debug_region;
   } else {
     *buffer = NULL;
     *buffer_size = 0;
   }
 }
 
 
 }  // namespace dart