YourWishes/jerryscript
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

On-demand built-ins instantiation.

Browse Source
This commit is contained in:
Ruben Ayrapetyan
2014-10-28 17:52:07 +03:00
parent e35ec87209
commit 87310e43c6
1 changed files with 58 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/libecmabuiltins/ecma-builtins.c
+58 -25
View File
@@ -40,6 +40,7 @@ ecma_builtin_dispatch_routine (ecma_builtin_id_t builtin_object_id,
ecma_value_t this_arg_value, ecma_value_t this_arg_value,
ecma_value_t arguments_list [], ecma_value_t arguments_list [],
ecma_length_t arguments_number); ecma_length_t arguments_number);
static void ecma_instantiate_builtin (ecma_builtin_id_t id);
/** /**
* Pointer to instances of built-in objects * Pointer to instances of built-in objects
@@ -55,7 +56,11 @@ ecma_builtin_is (ecma_object_t *obj_p, /**< pointer to an object */
{ {
JERRY_ASSERT (obj_p != NULL && !ecma_is_lexical_environment (obj_p)); JERRY_ASSERT (obj_p != NULL && !ecma_is_lexical_environment (obj_p));
JERRY_ASSERT (builtin_id < ECMA_BUILTIN_ID__COUNT); JERRY_ASSERT (builtin_id < ECMA_BUILTIN_ID__COUNT);
JERRY_ASSERT (ecma_builtin_objects [builtin_id] != NULL);
if (unlikely (ecma_builtin_objects [builtin_id] == NULL))
{
ecma_instantiate_builtin (builtin_id);
}
return (obj_p == ecma_builtin_objects [builtin_id]); return (obj_p == ecma_builtin_objects [builtin_id]);
} /* ecma_builtin_is */ } /* ecma_builtin_is */
@@ -69,7 +74,11 @@ ecma_object_t*
ecma_builtin_get (ecma_builtin_id_t builtin_id) /**< id of built-in to check on */ ecma_builtin_get (ecma_builtin_id_t builtin_id) /**< id of built-in to check on */
{ {
JERRY_ASSERT (builtin_id < ECMA_BUILTIN_ID__COUNT); JERRY_ASSERT (builtin_id < ECMA_BUILTIN_ID__COUNT);
JERRY_ASSERT (ecma_builtin_objects [builtin_id] != NULL);
if (unlikely (ecma_builtin_objects [builtin_id] == NULL))
{
ecma_instantiate_builtin (builtin_id);
}
ecma_ref_object (ecma_builtin_objects [builtin_id]); ecma_ref_object (ecma_builtin_objects [builtin_id]);
@@ -145,7 +154,7 @@ ecma_builtin_init_object (ecma_builtin_id_t obj_builtin_id, /**< built-in ID */
} /* ecma_builtin_init_object */ } /* ecma_builtin_init_object */
/** /**
* Initialize ECMA built-in objects * Initialize ECMA built-ins components
*/ */
void void
ecma_init_builtins (void) ecma_init_builtins (void)
@@ -156,35 +165,59 @@ ecma_init_builtins (void)
{ {
ecma_builtin_objects [id] = NULL; ecma_builtin_objects [id] = NULL;
} }
} /* ecma_init_builtins */
#define INIT_BUILTIN(builtin_id, \ /**
* Instantiate specified ECMA built-in object
*/
static void
ecma_instantiate_builtin (ecma_builtin_id_t id) /**< built-in id */
{
switch (id)
{
#define CASE_BUILTIN(builtin_id, \
object_type, \ object_type, \
object_class, \ object_class, \
object_prototype_builtin_id, \ object_prototype_builtin_id, \
lowercase_name) \ lowercase_name) \
{ \ case ECMA_BUILTIN_ID_ ## builtin_id: \
ecma_object_t *prototype_obj_p; \
if (object_prototype_builtin_id == ECMA_BUILTIN_ID__COUNT) \
{ \ { \
prototype_obj_p = NULL; \ JERRY_ASSERT (ecma_builtin_objects [ECMA_BUILTIN_ID_ ## builtin_id] == NULL); \
} \ \
else \ ecma_object_t *prototype_obj_p; \
{ \ if (object_prototype_builtin_id == ECMA_BUILTIN_ID__COUNT) \
prototype_obj_p = ecma_builtin_objects [object_prototype_builtin_id]; \ { \
JERRY_ASSERT (prototype_obj_p != NULL); \ prototype_obj_p = NULL; \
} \ } \
\ else \
ecma_object_t *builtin_obj_p = ecma_builtin_init_object (ECMA_BUILTIN_ID_ ## builtin_id, \ { \
prototype_obj_p, \ if (ecma_builtin_objects [object_prototype_builtin_id] == NULL) \
ECMA_OBJECT_ ## object_type, \ { \
ECMA_MAGIC_STRING_ ## object_class); \ ecma_instantiate_builtin (object_prototype_builtin_id); \
ecma_builtin_objects [ECMA_BUILTIN_ID_ ## builtin_id] = builtin_obj_p; \ } \
prototype_obj_p = ecma_builtin_objects [object_prototype_builtin_id]; \
JERRY_ASSERT (prototype_obj_p != NULL); \
} \
\
ecma_object_t *builtin_obj_p = ecma_builtin_init_object (ECMA_BUILTIN_ID_ ## builtin_id, \
prototype_obj_p, \
ECMA_OBJECT_ ## object_type, \
ECMA_MAGIC_STRING_ ## object_class); \
ecma_builtin_objects [ECMA_BUILTIN_ID_ ## builtin_id] = builtin_obj_p; \
\
break; \
}
ECMA_BUILTIN_LIST (CASE_BUILTIN);
#undef CASE_BUILTIN
default:
{
JERRY_UNREACHABLE ();
}
} }
} /* ecma_instantiate_builtin */
ECMA_BUILTIN_LIST (INIT_BUILTIN);
#undef INIT_BUILTIN
} /* ecma_init_builtins */
/** /**
* Finalize ECMA built-in objects * Finalize ECMA built-in objects