Partial implementation of ECMA Function object creation routine.

src/libecmaoperations/ecma-function-object.c

@@ -0,0 +1,86 @@
+/* Copyright 2014 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include "ecma-function-object.h"
+#include "ecma-gc.h"
+#include "ecma-globals.h"
+#include "ecma-helpers.h"
+
+/** \addtogroup ecma ---TODO---
+ * @{
+ * 
+ * \addtogroup ecmafunctionobject ECMA Function object related routines
+ * @{
+ */
+
+/**
+ * Function object creation operation.
+ *
+ * See also: ECMA-262 v5, 13.2
+ *
+ * @return pointer to newly created Function object
+ */
+ecma_object_t*
+ecma_op_create_function_object( const ecma_char_t* formal_parameter_list_p[], /**< formal parameters list */
+                                size_t formal_parameters_number, /**< formal parameters list's length */
+                                ecma_object_t *scope_p, /**< function's scope */
+                                bool is_strict, /**< 'strict' flag */
+                                interp_bytecode_idx first_opcode_idx) /**< index of first opcode of function's body */
+{
+  // 1., 4., 13.
+  FIXME( Setup prototype of Function object to built-in Function prototype object (15.3.3.1) );
+
+  ecma_object_t *f = ecma_create_object( NULL, true, ECMA_OBJECT_TYPE_FUNCTION);
+
+  // 2., 8
+  /*
+   * We don't setup [[Get]], [[HasInstance]] for each function object.
+   * Instead we set the object's type to ECMA_OBJECT_TYPE_FUNCTION
+   * that defines which version of [[Get]] routine should be used on demand.
+   */
+
+  // 3.
+  ecma_property_t *class_prop_p = ecma_create_internal_property( f, ECMA_INTERNAL_PROPERTY_CLASS);
+  class_prop_p->u.internal_property.value = ECMA_OBJECT_CLASS_FUNCTION;
+
+  // 6., 7.
+  TODO( Decide how to setup [[Call]] and [[Construct]] );
+
+  ecma_ref_object( scope_p);
+
+  // 9.
+  ecma_property_t *scope_prop_p = ecma_create_internal_property( f, ECMA_INTERNAL_PROPERTY_SCOPE);
+  ecma_set_pointer( scope_prop_p->u.internal_property.value, scope_p);
+
+  // 10., 11., 14., 15.
+  if ( formal_parameters_number != 0 )
+    {
+      JERRY_UNIMPLEMENTED_REF_UNUSED_VARS( formal_parameter_list_p);
+    }
+
+  // 12.
+  ecma_property_t *code_prop_p = ecma_create_internal_property( f, ECMA_INTERNAL_PROPERTY_CODE);
+  code_prop_p->u.internal_property.value = first_opcode_idx;
+
+  TODO( Steps 16 - 19 );
+  (void)is_strict;
+
+  return f;
+} /* ecma_op_create_function_object */
+
+/**
+ * @}
+ * @}
+ */

src/libecmaoperations/ecma-function-object.h

@@ -0,0 +1,41 @@
+/* Copyright 2014 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#ifndef ECMA_FUNCTION_OBJECT_H
+#define ECMA_FUNCTION_OBJECT_H
+
+#include "ecma-globals.h"
+#include "interpreter.h"
+
+/** \addtogroup ecma ---TODO---
+ * @{
+ * 
+ * \addtogroup ecmafunctionobject ECMA Function object related routines
+ * @{
+ */
+
+extern ecma_object_t*
+ecma_op_create_function_object( const ecma_char_t* formal_parameter_list_p[],
+                                size_t formal_parameters_number,
+                                ecma_object_t *scope_p,
+                                bool is_strict,
+                                interp_bytecode_idx first_opcode_idx);
+
+/**
+ * @}
+ * @}
+ */
+
+#endif /* !ECMA_FUNCTION_OBJECT_H */