Rework resolving references and namespace creation in modules (#4695)
- Properties of namespace objects are ordered in lexical order - The namespace object is created and imports are bound during linking phase - Namespace imports are changed to read-only - Reduced memory consumption JerryScript-DCO-1.0-Signed-off-by: Zoltan Herczeg zherczeg.u-szeged@partner.samsung.com
This commit is contained in:
@@ -865,17 +865,14 @@ jerry_module_get_namespace (const jerry_value_t module_val) /**< module */
|
||||
return jerry_throw (ecma_raise_type_error (ECMA_ERR_MSG (ecma_error_not_module_p)));
|
||||
}
|
||||
|
||||
if (module_p->namespace_object_p == NULL)
|
||||
if (module_p->header.u.cls.u1.module_state < JERRY_MODULE_STATE_LINKED
|
||||
|| module_p->header.u.cls.u1.module_state > JERRY_MODULE_STATE_EVALUATED)
|
||||
{
|
||||
if (module_p->header.u.cls.u1.module_state < JERRY_MODULE_STATE_LINKED
|
||||
|| module_p->header.u.cls.u1.module_state > JERRY_MODULE_STATE_EVALUATED)
|
||||
{
|
||||
return jerry_throw (ecma_raise_range_error (ECMA_ERR_MSG ("Namespace object cannot be created")));
|
||||
}
|
||||
|
||||
ecma_module_create_namespace_object (module_p);
|
||||
return jerry_throw (ecma_raise_range_error (ECMA_ERR_MSG ("Namespace object is not available")));
|
||||
}
|
||||
|
||||
JERRY_ASSERT (module_p->namespace_object_p != NULL);
|
||||
|
||||
ecma_ref_object (module_p->namespace_object_p);
|
||||
return ecma_make_object_value (module_p->namespace_object_p);
|
||||
#else /* !JERRY_MODULE_SYSTEM */
|
||||
|
||||
@@ -1061,7 +1061,7 @@ typedef struct
|
||||
{
|
||||
uint16_t formal_params_number; /**< for arguments: formal parameters number */
|
||||
#if JERRY_MODULE_SYSTEM
|
||||
uint8_t module_flags; /**< Module flags */
|
||||
uint16_t module_flags; /**< Module flags */
|
||||
#endif /* JERRY_MODULE_SYSTEM */
|
||||
#if JERRY_ESNEXT
|
||||
uint16_t iterator_index; /**< for %Iterator%: [[%Iterator%NextIndex]] property */
|
||||
|
||||
@@ -365,16 +365,20 @@ ecma_clone_decl_lexical_environment (ecma_object_t *lex_env_p, /**< declarative
|
||||
ecma_object_t *new_lex_env_p = ecma_create_decl_lex_env (outer_lex_env_p);
|
||||
|
||||
jmem_cpointer_t prop_iter_cp = lex_env_p->u1.property_list_cp;
|
||||
ecma_property_header_t *prop_iter_p;
|
||||
|
||||
JERRY_ASSERT (prop_iter_cp != JMEM_CP_NULL);
|
||||
|
||||
ecma_property_header_t *prop_iter_p = ECMA_GET_NON_NULL_POINTER (ecma_property_header_t,
|
||||
prop_iter_cp);
|
||||
#if JERRY_PROPERTY_HASHMAP
|
||||
prop_iter_p = ECMA_GET_NON_NULL_POINTER (ecma_property_header_t, prop_iter_cp);
|
||||
|
||||
if (prop_iter_p->types[0] == ECMA_PROPERTY_TYPE_HASHMAP)
|
||||
{
|
||||
prop_iter_cp = prop_iter_p->next_property_cp;
|
||||
}
|
||||
|
||||
JERRY_ASSERT (prop_iter_cp != JMEM_CP_NULL);
|
||||
#endif /* JERRY_PROPERTY_HASHMAP */
|
||||
|
||||
do
|
||||
{
|
||||
@@ -630,9 +634,9 @@ ecma_create_named_accessor_property (ecma_object_t *object_p, /**< object */
|
||||
void
|
||||
ecma_create_named_reference_property (ecma_object_t *object_p, /**< object */
|
||||
ecma_string_t *name_p, /**< property name */
|
||||
ecma_property_t *property_p) /**< referenced property */
|
||||
ecma_value_t reference) /**< property reference */
|
||||
{
|
||||
JERRY_ASSERT (object_p != NULL && name_p != NULL && property_p != NULL);
|
||||
JERRY_ASSERT (object_p != NULL && name_p != NULL);
|
||||
JERRY_ASSERT (ecma_find_named_property (object_p, name_p) == NULL);
|
||||
JERRY_ASSERT ((ecma_is_lexical_environment (object_p)
|
||||
&& ecma_get_lex_env_type (object_p) == ECMA_LEXICAL_ENVIRONMENT_CLASS
|
||||
@@ -640,34 +644,9 @@ ecma_create_named_reference_property (ecma_object_t *object_p, /**< object */
|
||||
|| ecma_object_class_is (object_p, ECMA_OBJECT_CLASS_MODULE_NAMESPACE));
|
||||
|
||||
uint8_t type_and_flags = ECMA_PROPERTY_CONFIGURABLE_ENUMERABLE;
|
||||
|
||||
ecma_property_value_t *referenced_value_p = ECMA_PROPERTY_VALUE_PTR (property_p);
|
||||
ecma_property_value_t value;
|
||||
|
||||
if (*property_p & ECMA_PROPERTY_FLAG_DATA)
|
||||
{
|
||||
jmem_cpointer_tag_t offset = (jmem_cpointer_tag_t) (((uintptr_t) property_p) & 0x1);
|
||||
|
||||
#if JERRY_CPOINTER_32_BIT
|
||||
if (offset != 0)
|
||||
{
|
||||
--referenced_value_p;
|
||||
}
|
||||
#else /* !JERRY_CPOINTER_32_BIT */
|
||||
if (offset == 0)
|
||||
{
|
||||
++referenced_value_p;
|
||||
}
|
||||
#endif /* JERRY_CPOINTER_32_BIT */
|
||||
|
||||
JERRY_ASSERT ((((uintptr_t) referenced_value_p) & (((uintptr_t) 1 << JMEM_ALIGNMENT_LOG) - 1)) == 0);
|
||||
|
||||
ECMA_SET_NON_NULL_POINTER_TAG (value.value, referenced_value_p, offset);
|
||||
}
|
||||
else
|
||||
{
|
||||
value.value = referenced_value_p->value;
|
||||
}
|
||||
value.value = reference;
|
||||
|
||||
ecma_create_property (object_p, name_p, type_and_flags, value, NULL);
|
||||
} /* ecma_create_named_reference_property */
|
||||
@@ -1074,6 +1053,42 @@ ecma_set_named_accessor_property_setter (ecma_object_t *object_p, /**< the prope
|
||||
|
||||
#if JERRY_MODULE_SYSTEM
|
||||
|
||||
/**
|
||||
* Construct a reference to a given property
|
||||
*
|
||||
* @return property reference
|
||||
*/
|
||||
ecma_value_t
|
||||
ecma_property_to_reference (ecma_property_t *property_p) /**< data or reference property */
|
||||
{
|
||||
ecma_property_value_t *referenced_value_p = ECMA_PROPERTY_VALUE_PTR (property_p);
|
||||
|
||||
if (!(*property_p & ECMA_PROPERTY_FLAG_DATA))
|
||||
{
|
||||
return referenced_value_p->value;
|
||||
}
|
||||
|
||||
jmem_cpointer_tag_t offset = (jmem_cpointer_tag_t) (((uintptr_t) property_p) & 0x1);
|
||||
|
||||
#if JERRY_CPOINTER_32_BIT
|
||||
if (offset != 0)
|
||||
{
|
||||
--referenced_value_p;
|
||||
}
|
||||
#else /* !JERRY_CPOINTER_32_BIT */
|
||||
if (offset == 0)
|
||||
{
|
||||
++referenced_value_p;
|
||||
}
|
||||
#endif /* JERRY_CPOINTER_32_BIT */
|
||||
|
||||
JERRY_ASSERT ((((uintptr_t) referenced_value_p) & (((uintptr_t) 1 << JMEM_ALIGNMENT_LOG) - 1)) == 0);
|
||||
|
||||
ecma_value_t result;
|
||||
ECMA_SET_NON_NULL_POINTER_TAG (result, referenced_value_p, offset);
|
||||
return result;
|
||||
} /* ecma_property_to_reference */
|
||||
|
||||
/**
|
||||
* Gets the referenced property value
|
||||
*
|
||||
|
||||
@@ -482,8 +482,7 @@ ecma_property_value_t *
|
||||
ecma_create_named_accessor_property (ecma_object_t *object_p, ecma_string_t *name_p, ecma_object_t *get_p,
|
||||
ecma_object_t *set_p, uint8_t prop_attributes, ecma_property_t **out_prop_p);
|
||||
#if JERRY_MODULE_SYSTEM
|
||||
void ecma_create_named_reference_property (ecma_object_t *object_p, ecma_string_t *name_p,
|
||||
ecma_property_t *property_p);
|
||||
void ecma_create_named_reference_property (ecma_object_t *object_p, ecma_string_t *name_p, ecma_value_t reference);
|
||||
#endif /* JERRY_MODULE_SYSTEM */
|
||||
ecma_property_t *
|
||||
ecma_find_named_property (ecma_object_t *obj_p, ecma_string_t *name_p);
|
||||
@@ -502,8 +501,8 @@ void ecma_set_named_accessor_property_getter (ecma_object_t *object_p, ecma_prop
|
||||
void ecma_set_named_accessor_property_setter (ecma_object_t *object_p, ecma_property_value_t *prop_value_p,
|
||||
ecma_object_t *setter_p);
|
||||
#if JERRY_MODULE_SYSTEM
|
||||
ecma_property_value_t *
|
||||
ecma_get_property_value_from_named_reference (ecma_property_value_t *reference_p);
|
||||
ecma_value_t ecma_property_to_reference (ecma_property_t *property_p);
|
||||
ecma_property_value_t *ecma_get_property_value_from_named_reference (ecma_property_value_t *reference_p);
|
||||
#endif /* JERRY_MODULE_SYSTEM */
|
||||
bool ecma_is_property_writable (ecma_property_t property);
|
||||
void ecma_set_property_writable_attr (ecma_property_t *property_p, bool is_writable);
|
||||
|
||||
+682
-417
File diff suppressed because it is too large
Load Diff
@@ -29,6 +29,7 @@
|
||||
typedef enum
|
||||
{
|
||||
ECMA_MODULE_IS_NATIVE = (1 << 0), /**< native module */
|
||||
ECMA_MODULE_HAS_NAMESPACE = (1 << 1), /**< namespace object has been initialized */
|
||||
} ecma_module_flags_t;
|
||||
|
||||
/**
|
||||
@@ -91,22 +92,14 @@ typedef struct ecma_module_node
|
||||
} u;
|
||||
} ecma_module_node_t;
|
||||
|
||||
/**
|
||||
* A record that can be used to store {module, identifier} pairs
|
||||
*/
|
||||
typedef struct ecma_module_record
|
||||
{
|
||||
ecma_module_t *module_p; /**< module */
|
||||
ecma_string_t *name_p; /**< identifier name */
|
||||
} ecma_module_record_t;
|
||||
|
||||
/**
|
||||
* A list of module records that can be used to identify circular imports during resolution
|
||||
*/
|
||||
typedef struct ecma_module_resolve_set
|
||||
{
|
||||
struct ecma_module_resolve_set *next_p; /**< next in linked list */
|
||||
ecma_module_record_t record; /**< module record */
|
||||
ecma_module_t *module_p; /**< module */
|
||||
ecma_string_t *name_p; /**< identifier name */
|
||||
} ecma_module_resolve_set_t;
|
||||
|
||||
/**
|
||||
@@ -130,7 +123,6 @@ ecma_value_t ecma_module_evaluate (ecma_module_t *module_p);
|
||||
|
||||
ecma_module_t *ecma_module_create (void);
|
||||
void ecma_module_cleanup_context (void);
|
||||
ecma_value_t ecma_module_create_namespace_object (ecma_module_t *module_p);
|
||||
|
||||
void ecma_module_release_module_names (ecma_module_names_t *module_name_p);
|
||||
void ecma_module_release_module (ecma_module_t *module_p);
|
||||
|
||||
Reference in New Issue
Block a user