Cleanup toNumber and toNumeric abstract operations (#4034)
JerryScript-DCO-1.0-Signed-off-by: Virag Orkenyi orkvi@inf.u-szeged.hu
This commit is contained in:
@@ -924,32 +924,24 @@ ecma_op_array_object_set_length (ecma_object_t *object_p, /**< the array object
|
||||
uint32_t flags) /**< configuration options */
|
||||
{
|
||||
bool is_throw = (flags & ECMA_ARRAY_OBJECT_SET_LENGTH_FLAG_IS_THROW);
|
||||
|
||||
ecma_value_t completion = ecma_op_to_number (new_value, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_number_t new_len_num;
|
||||
ecma_value_t completion = ecma_op_to_number (new_value, &new_len_num);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (completion))
|
||||
{
|
||||
return completion;
|
||||
}
|
||||
|
||||
JERRY_ASSERT (!ECMA_IS_VALUE_ERROR (completion)
|
||||
&& ecma_is_value_number (completion));
|
||||
|
||||
ecma_number_t new_len_num = ecma_get_number_from_value (completion);
|
||||
|
||||
ecma_free_value (completion);
|
||||
JERRY_ASSERT (!ECMA_IS_VALUE_ERROR (completion));
|
||||
|
||||
if (ecma_is_value_object (new_value))
|
||||
{
|
||||
ecma_value_t compared_num_val = ecma_op_to_number (new_value, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_value_t compared_num_val = ecma_op_to_number (new_value, &new_len_num);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (compared_num_val))
|
||||
{
|
||||
return compared_num_val;
|
||||
}
|
||||
|
||||
new_len_num = ecma_get_number_from_value (compared_num_val);
|
||||
ecma_free_value (compared_num_val);
|
||||
}
|
||||
|
||||
uint32_t new_len_uint32 = ecma_number_to_uint32 (new_len_num);
|
||||
|
||||
@@ -119,16 +119,12 @@ ecma_op_create_arraybuffer_object (const ecma_value_t *arguments_list_p, /**< li
|
||||
}
|
||||
else
|
||||
{
|
||||
ecma_value_t to_number_value = ecma_op_to_number (arguments_list_p[0], ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_value_t to_number_value = ecma_op_to_number (arguments_list_p[0], &length_num);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (to_number_value))
|
||||
{
|
||||
return to_number_value;
|
||||
}
|
||||
|
||||
length_num = ecma_get_number_from_value (to_number_value);
|
||||
|
||||
ecma_free_value (to_number_value);
|
||||
}
|
||||
|
||||
if (ecma_number_is_nan (length_num))
|
||||
|
||||
@@ -113,16 +113,17 @@ ecma_op_abstract_equality_compare (ecma_value_t x, /**< first operand */
|
||||
if (ecma_is_value_number (y))
|
||||
{
|
||||
/* 4. */
|
||||
ecma_value_t x_num_value = ecma_op_to_number (x, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_number_t num;
|
||||
ecma_value_t x_num_value = ecma_op_to_number (x, &num);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (x_num_value))
|
||||
{
|
||||
return x_num_value;
|
||||
}
|
||||
ecma_value_t num_value = ecma_make_number_value (num);
|
||||
ecma_value_t compare_result = ecma_op_abstract_equality_compare (num_value, y);
|
||||
|
||||
ecma_value_t compare_result = ecma_op_abstract_equality_compare (x_num_value, y);
|
||||
|
||||
ecma_free_value (x_num_value);
|
||||
ecma_free_value (num_value);
|
||||
return compare_result;
|
||||
}
|
||||
|
||||
|
||||
@@ -276,79 +276,11 @@ ecma_op_to_boolean (ecma_value_t value) /**< ecma value */
|
||||
* @return ecma value
|
||||
* Returned value must be freed with ecma_free_value
|
||||
*/
|
||||
ecma_value_t
|
||||
inline ecma_value_t JERRY_ATTR_ALWAYS_INLINE
|
||||
ecma_op_to_number (ecma_value_t value, /**< ecma value */
|
||||
ecma_to_numeric_options_t options) /**< option bits */
|
||||
ecma_number_t *number_p) /**< [out] ecma number */
|
||||
{
|
||||
JERRY_UNUSED (options);
|
||||
|
||||
ecma_check_value_type_is_spec_defined (value);
|
||||
|
||||
if (ecma_is_value_integer_number (value))
|
||||
{
|
||||
return value;
|
||||
}
|
||||
|
||||
if (ecma_is_value_float_number (value))
|
||||
{
|
||||
return ecma_copy_value (value);
|
||||
}
|
||||
|
||||
if (ecma_is_value_string (value))
|
||||
{
|
||||
ecma_string_t *str_p = ecma_get_string_from_value (value);
|
||||
return ecma_make_number_value (ecma_string_to_number (str_p));
|
||||
}
|
||||
|
||||
if (ecma_is_value_undefined (value))
|
||||
{
|
||||
return ecma_make_nan_value ();
|
||||
}
|
||||
|
||||
if (ecma_is_value_null (value))
|
||||
{
|
||||
return ecma_make_integer_value (0);
|
||||
}
|
||||
|
||||
if (ecma_is_value_boolean (value))
|
||||
{
|
||||
return ecma_make_integer_value (ecma_is_value_true (value) ? 1 : 0);
|
||||
}
|
||||
|
||||
#if ENABLED (JERRY_ESNEXT)
|
||||
if (ecma_is_value_symbol (value))
|
||||
{
|
||||
return ecma_raise_type_error (ECMA_ERR_MSG ("Cannot convert a Symbol value to a number"));
|
||||
}
|
||||
#endif /* ENABLED (JERRY_ESNEXT) */
|
||||
|
||||
#if ENABLED (JERRY_BUILTIN_BIGINT)
|
||||
if (ecma_is_value_bigint (value))
|
||||
{
|
||||
if (options & ECMA_TO_NUMERIC_ALLOW_BIGINT)
|
||||
{
|
||||
return ecma_copy_value (value);
|
||||
}
|
||||
return ecma_raise_type_error (ECMA_ERR_MSG ("Cannot convert a BigInt value to a number"));
|
||||
}
|
||||
#endif /* ENABLED (JERRY_BUILTIN_BIGINT) */
|
||||
|
||||
JERRY_ASSERT (ecma_is_value_object (value));
|
||||
|
||||
ecma_object_t *obj_p = ecma_get_object_from_value (value);
|
||||
|
||||
ecma_value_t def_value = ecma_op_object_default_value (obj_p, ECMA_PREFERRED_TYPE_NUMBER);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (def_value))
|
||||
{
|
||||
return def_value;
|
||||
}
|
||||
|
||||
ecma_value_t ret_value = ecma_op_to_number (def_value, options);
|
||||
|
||||
ecma_fast_free_value (def_value);
|
||||
|
||||
return ret_value;
|
||||
return ecma_op_to_numeric (value, number_p, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
} /* ecma_op_to_number */
|
||||
|
||||
/**
|
||||
@@ -944,6 +876,30 @@ free_desc:
|
||||
return ret_value;
|
||||
} /* ecma_op_to_property_descriptor */
|
||||
|
||||
/**
|
||||
* IsInteger operation.
|
||||
*
|
||||
* See also:
|
||||
* ECMA-262 v5, 9.4
|
||||
* ECMA-262 v6, 7.1.4
|
||||
*
|
||||
* @return true - if the argument is integer
|
||||
* false - otherwise
|
||||
*/
|
||||
bool
|
||||
ecma_op_is_integer (ecma_number_t num) /**< ecma number */
|
||||
{
|
||||
|
||||
if (ecma_number_is_nan (num) || ecma_number_is_infinity (num))
|
||||
{
|
||||
return false;
|
||||
}
|
||||
|
||||
ecma_number_t floor_fabs = floor (fabs (num));
|
||||
ecma_number_t fabs_value = fabs (num);
|
||||
|
||||
return (floor_fabs == fabs_value);
|
||||
} /* ecma_op_is_integer*/
|
||||
/**
|
||||
* ToInteger operation.
|
||||
*
|
||||
@@ -964,7 +920,7 @@ ecma_op_to_integer (ecma_value_t value, /**< ecma value */
|
||||
}
|
||||
|
||||
/* 1 */
|
||||
ecma_value_t to_number = ecma_op_to_numeric (value, number_p, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_value_t to_number = ecma_op_to_number (value, number_p);
|
||||
|
||||
/* 2 */
|
||||
if (ECMA_IS_VALUE_ERROR (to_number))
|
||||
@@ -988,7 +944,6 @@ ecma_op_to_integer (ecma_value_t value, /**< ecma value */
|
||||
}
|
||||
|
||||
ecma_number_t floor_fabs = floor (fabs (number));
|
||||
|
||||
/* 5 */
|
||||
*number_p = ecma_number_is_negative (number) ? -floor_fabs : floor_fabs;
|
||||
return ECMA_VALUE_EMPTY;
|
||||
@@ -1044,7 +999,7 @@ ecma_op_to_length (ecma_value_t value, /**< ecma value */
|
||||
#else /* !ENABLED (JERRY_ESNEXT) */
|
||||
/* In the case of ES5, ToLength(ES6) operation is the same as ToUint32(ES5) */
|
||||
ecma_number_t num;
|
||||
ecma_value_t to_number = ecma_op_to_numeric (value, &num, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_value_t to_number = ecma_op_to_number (value, &num);
|
||||
|
||||
/* 2 */
|
||||
if (ECMA_IS_VALUE_ERROR (to_number))
|
||||
|
||||
@@ -53,11 +53,12 @@ bool ecma_op_same_value_zero (ecma_value_t x, ecma_value_t y, bool strict_equali
|
||||
#endif /* ENABLED (JERRY_BUILTIN_MAP) */
|
||||
ecma_value_t ecma_op_to_primitive (ecma_value_t value, ecma_preferred_type_hint_t preferred_type);
|
||||
bool ecma_op_to_boolean (ecma_value_t value);
|
||||
ecma_value_t ecma_op_to_number (ecma_value_t value, ecma_to_numeric_options_t options);
|
||||
ecma_value_t ecma_op_to_number (ecma_value_t value, ecma_number_t *number_p);
|
||||
ecma_value_t ecma_op_to_numeric (ecma_value_t value, ecma_number_t *number_p, ecma_to_numeric_options_t options);
|
||||
ecma_string_t *ecma_op_to_string (ecma_value_t value);
|
||||
ecma_string_t *ecma_op_to_property_key (ecma_value_t value);
|
||||
ecma_value_t ecma_op_to_object (ecma_value_t value);
|
||||
bool ecma_op_is_integer (ecma_number_t value);
|
||||
ecma_value_t ecma_op_to_integer (ecma_value_t value, ecma_number_t *number_p);
|
||||
ecma_value_t ecma_op_to_length (ecma_value_t value, ecma_length_t *length);
|
||||
#if ENABLED (JERRY_ESNEXT)
|
||||
|
||||
@@ -71,7 +71,7 @@ ecma_op_dataview_create (const ecma_value_t *arguments_list_p, /**< arguments li
|
||||
if (arguments_list_len > 1)
|
||||
{
|
||||
ecma_number_t number_offset, offset_num;
|
||||
if (ECMA_IS_VALUE_ERROR (ecma_op_to_numeric (arguments_list_p[1], &number_offset, ECMA_TO_NUMERIC_NO_OPTS)))
|
||||
if (ECMA_IS_VALUE_ERROR (ecma_op_to_number (arguments_list_p[1], &number_offset)))
|
||||
{
|
||||
return ECMA_VALUE_ERROR;
|
||||
}
|
||||
|
||||
@@ -41,13 +41,15 @@
|
||||
ecma_value_t
|
||||
ecma_op_create_number_object (ecma_value_t arg) /**< argument passed to the Number constructor */
|
||||
{
|
||||
ecma_value_t conv_to_num_completion = ecma_op_to_number (arg, ECMA_TO_NUMERIC_NO_OPTS);
|
||||
ecma_number_t num;
|
||||
ecma_value_t conv_to_num_completion = ecma_op_to_number (arg, &num);
|
||||
|
||||
if (ECMA_IS_VALUE_ERROR (conv_to_num_completion))
|
||||
{
|
||||
return conv_to_num_completion;
|
||||
}
|
||||
|
||||
conv_to_num_completion = ecma_make_number_value (num);
|
||||
#if ENABLED (JERRY_BUILTIN_NUMBER)
|
||||
ecma_object_t *prototype_obj_p = ecma_builtin_get (ECMA_BUILTIN_ID_NUMBER_PROTOTYPE);
|
||||
#else /* ENABLED (JERRY_BUILTIN_NUMBER) */
|
||||
|
||||
@@ -2207,7 +2207,7 @@ ecma_regexp_split_helper (ecma_value_t this_arg, /**< this value */
|
||||
{
|
||||
/* ECMA-262 v11, 21.2.5.13 13 */
|
||||
ecma_number_t num;
|
||||
if (ECMA_IS_VALUE_ERROR (ecma_op_to_numeric (limit_arg, &num, ECMA_TO_NUMERIC_NO_OPTS)))
|
||||
if (ECMA_IS_VALUE_ERROR (ecma_op_to_number (limit_arg, &num)))
|
||||
{
|
||||
goto cleanup_splitter;
|
||||
}
|
||||
|
||||
@@ -32,7 +32,7 @@
|
||||
#define ECMA_OP_TO_NUMBER_TRY_CATCH(num_var, value, return_value) \
|
||||
JERRY_ASSERT (return_value == ECMA_VALUE_EMPTY); \
|
||||
ecma_number_t num_var; \
|
||||
return_value = ecma_op_to_numeric (value, &num_var, ECMA_TO_NUMERIC_NO_OPTS); \
|
||||
return_value = ecma_op_to_number (value, &num_var); \
|
||||
\
|
||||
if (JERRY_LIKELY (ecma_is_value_empty (return_value))) \
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user