Added Dart API methods:

runtime/vm/dart_api_impl.cc

 // Copyright (c) 2013, 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 "include/dart_mirrors_api.h"
 #include "include/dart_native_api.h"
 
 #include "platform/assert.h"
 #include "vm/bigint_operations.h"
@@ skipping 3701 matching lines @@
   Object& obj = reused_obj_handle.Handle();
   obj = arguments->NativeArgAt(arg_index);
   if (RawObject::IsStringClassId(obj.GetClassId())) {
     return Api::NewHandle(isolate, obj.raw());
   }
   return Api::NewError("%s expects argument to be of"
                        " type String.", CURRENT_FUNC);
 }
 
 
+DART_EXPORT Dart_Handle Dart_GetNativeIntegerArgument(Dart_NativeArguments args,
+                                                      int index,
+                                                      int64_t* value) {
+  NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args);
+  if ((index < 0) || (index >= arguments->NativeArgCount())) {
+    return Api::NewError(
+        "%s: argument 'index' out of range. Expected 0..%d but saw %d.",
+        CURRENT_FUNC, arguments->NativeArgCount() - 1, index);
+  }
+  Isolate* isolate = arguments->isolate();
+  ReusableObjectHandleScope reused_obj_handle(isolate);
+  Object& obj = reused_obj_handle.Handle();
+  obj = arguments->NativeArgAt(index);
+  intptr_t cid = obj.GetClassId();
+  if (cid == kSmiCid) {
+    *value = Smi::Cast(obj).Value();
+    return Api::Success();
+  }
+  if (cid == kMintCid) {
+    *value = Mint::Cast(obj).value();
+    return Api::Success();
+  }
+  if (cid == kBigintCid) {
+    const Bigint& bigint = Bigint::Cast(obj);
+    if (BigintOperations::FitsIntoInt64(bigint)) {
+      *value = BigintOperations::ToInt64(bigint);
+      return Api::Success();
+    }
+  }
+  return Api::NewError(
+      "%s: argument %d is not an Integer argument.",

[srdjan, 2013/08/21 22:58:43]

Is that correct error message for kBigint that does not fit into int64?

[siva, 2013/08/21 23:08:57]

Good point.
I will add a new error return inside
if (cid == kBigintCid).

On 2013/08/21 22:58:43, srdjan wrote:

+      CURRENT_FUNC, index);
+}
+
+
+DART_EXPORT Dart_Handle Dart_GetNativeBooleanArgument(Dart_NativeArguments args,
+                                                      int index,
+                                                      bool* value) {
+  NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args);
+  if ((index < 0) || (index >= arguments->NativeArgCount())) {
+    return Api::NewError(
+        "%s: argument 'index' out of range. Expected 0..%d but saw %d.",
+        CURRENT_FUNC, arguments->NativeArgCount() - 1, index);
+  }
+  Isolate* isolate = arguments->isolate();
+  ReusableObjectHandleScope reused_obj_handle(isolate);
+  Object& obj = reused_obj_handle.Handle();
+  obj = arguments->NativeArgAt(index);
+  intptr_t cid = obj.GetClassId();
+  if (cid == kBoolCid) {
+    *value = Bool::Cast(obj).value();
+    return Api::Success();
+  }
+  if (obj.IsNull()) {
+    *value = false;
+    return Api::Success();
+  }
+  return Api::NewError(
+      "%s: argument %d is not a Boolean argument.",
+      CURRENT_FUNC, index);
+}
+
+
+DART_EXPORT Dart_Handle Dart_GetNativeDoubleArgument(Dart_NativeArguments args,
+                                                     int index,
+                                                     double* value) {
+  NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args);
+  if ((index < 0) || (index >= arguments->NativeArgCount())) {
+    return Api::NewError(
+        "%s: argument 'index' out of range. Expected 0..%d but saw %d.",
+        CURRENT_FUNC, arguments->NativeArgCount() - 1, index);
+  }
+  Isolate* isolate = arguments->isolate();
+  ReusableObjectHandleScope reused_obj_handle(isolate);
+  Object& obj = reused_obj_handle.Handle();
+  obj = arguments->NativeArgAt(index);
+  intptr_t cid = obj.GetClassId();
+  if (cid == kDoubleCid) {
+    *value = Double::Cast(obj).value();
+    return Api::Success();
+  }
+  if (cid == kSmiCid) {
+    *value = Smi::Cast(obj).AsDoubleValue();
+    return Api::Success();
+  }
+  if (cid == kMintCid) {
+    *value = Mint::Cast(obj).AsDoubleValue();
+    return Api::Success();
+  }
+  if (cid == kBigintCid) {
+    *value = Bigint::Cast(obj).AsDoubleValue();
+    return Api::Success();
+  }
+  return Api::NewError(
+      "%s: argument %d is not a Double argument.",
+      CURRENT_FUNC, index);
+}
+
+
 DART_EXPORT void Dart_SetReturnValue(Dart_NativeArguments args,
                                      Dart_Handle retval) {
   NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args);
   Isolate* isolate = arguments->isolate();
   CHECK_ISOLATE(isolate);
   if ((retval != Api::Null()) && (!Api::IsInstance(retval))) {
     const Object& ret_obj = Object::Handle(Api::UnwrapHandle(retval));
     FATAL1("Return value check failed: saw '%s' expected a dart Instance.",
            ret_obj.ToCString());
   }
@@ skipping 517 matching lines @@
   }
   {
     NoGCScope no_gc;
     RawObject* raw_obj = obj.raw();
     isolate->heap()->SetPeer(raw_obj, peer);
   }
   return Api::Success();
 }
 
 }  // namespace dart