Wire GrowableArray to use the internal VM object.

lib/growable_array.cc

Index: lib/growable_array.cc
===================================================================
--- lib/growable_array.cc	(revision 0)
+++ lib/growable_array.cc	(revision 0)
@@ -0,0 +1,92 @@
+// 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/bootstrap_natives.h"
+#include "vm/exceptions.h"
+#include "vm/native_entry.h"
+#include "vm/object.h"
+
+namespace dart {
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_allocate, 2) {
+  const AbstractTypeArguments& type_arguments =
+      AbstractTypeArguments::CheckedHandle(arguments->At(0));
+  ASSERT(type_arguments.IsNull() ||
+         (type_arguments.IsInstantiated() && (type_arguments.Length() == 1)));
+  GET_NATIVE_ARGUMENT(Array, data, arguments->At(1));
+  if ((data.Length() <= 0)) {
+    GrowableArray<const Object*> args;
+    args.Add(&data);

[srdjan, 2012/04/06 21:19:51]

Should this be data.Length() (as smi) ?

[siva, 2012/04/09 20:57:24]

Done.

+    Exceptions::ThrowByType(Exceptions::kIndexOutOfRange, args);
+  }
+  const GrowableObjectArray& new_array =
+      GrowableObjectArray::Handle(GrowableObjectArray::New(data));
+  new_array.SetTypeArguments(type_arguments);
+  arguments->SetReturn(new_array);
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_getIndexed, 2) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));

[srdjan, 2012/04/06 21:19:51]

0 should be accessed via CheckedHandle, as it is the receiver.

[siva, 2012/04/09 20:57:24]

Done.

+  GET_NATIVE_ARGUMENT(Smi, index, arguments->At(1));
+  if ((index.Value() < 0) || (index.Value() >= array.Length())) {
+    GrowableArray<const Object*> args;
+    args.Add(&index);
+    Exceptions::ThrowByType(Exceptions::kIndexOutOfRange, args);
+  }
+  const Instance& obj = Instance::CheckedHandle(array.At(index.Value()));
+  arguments->SetReturn(obj);
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_setIndexed, 3) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));

[srdjan, 2012/04/06 21:19:51]

ditto and elsewhere

[siva, 2012/04/09 20:57:24]

Done.

+  GET_NATIVE_ARGUMENT(Smi, index, arguments->At(1));
+  if ((index.Value() < 0) || (index.Value() >= array.Length())) {
+    GrowableArray<const Object*> args;
+    args.Add(&index);
+    Exceptions::ThrowByType(Exceptions::kIndexOutOfRange, args);
+  }
+  GET_NATIVE_ARGUMENT(Instance, value, arguments->At(2));
+  array.SetAt(index.Value(), value);
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_getLength, 1) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));
+  const Smi& length = Smi::Handle(isolate, Smi::New(array.Length()));
+  arguments->SetReturn(length);
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_getCapacity, 1) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));
+  const Smi& capacity = Smi::Handle(isolate, Smi::New(array.Capacity()));
+  arguments->SetReturn(capacity);
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_setLength, 2) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));
+  GET_NATIVE_ARGUMENT(Smi, length, arguments->At(1));
+  if ((length.Value() < 0) || (length.Value() > array.Capacity())) {
+    GrowableArray<const Object*> args;
+    args.Add(&length);
+    Exceptions::ThrowByType(Exceptions::kIndexOutOfRange, args);
+  }
+  array.SetLength(length.Value());
+}
+
+
+DEFINE_NATIVE_ENTRY(GrowableObjectArray_setData, 2) {
+  GET_NATIVE_ARGUMENT(GrowableObjectArray, array, arguments->At(0));
+  GET_NATIVE_ARGUMENT(Array, data, arguments->At(1));
+  ASSERT(data.Length() > 0);
+  array.SetData(data);
+}
+
+}  // namespace dart