Renaming core -> jerry-core.

2015-02-17 19:00:34 +03:00
parent b6d018d019
commit 88353e93cf
183 changed files with 14 additions and 14 deletions
@@ -0,0 +1,74 @@
+/* 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-globals.h"
+#include "ecma-helpers.h"
+#include "ecma-number-arithmetic.h"
+
+/** \addtogroup ecma ECMA
+ * @{
+ */
+
+/**
+ * \addtogroup numberarithmetic ECMA number arithmetic operations
+ * @{
+ */
+
+/**
+ * ECMA-defined number remainder calculation.
+ *
+ * See also:
+ *          ECMA-262 v5, 11.5.3
+ *
+ * @return number - calculated remainder.
+ */
+ecma_number_t
+ecma_op_number_remainder (ecma_number_t left_num, /**< left operand */
+                          ecma_number_t right_num) /**< right operand */
+{
+  TODO (Check precision);
+
+  ecma_number_t n = left_num, d = right_num;
+
+  if (ecma_number_is_nan (n)
+      || ecma_number_is_nan (d)
+      || ecma_number_is_infinity (n)
+      || ecma_number_is_zero (d))
+  {
+    return ecma_number_make_nan ();
+  }
+  else if (ecma_number_is_infinity (d)
+           || (ecma_number_is_zero (n)
+               && !ecma_number_is_zero (d)))
+  {
+    return n;
+  }
+
+  JERRY_ASSERT (!ecma_number_is_nan (n)
+                && !ecma_number_is_zero (n)
+                && !ecma_number_is_infinity (n));
+  JERRY_ASSERT (!ecma_number_is_nan (d)
+                && !ecma_number_is_zero (d)
+                && !ecma_number_is_infinity (d));
+
+  ecma_number_t q = ecma_number_trunc (ecma_number_divide (n, d));
+
+  return ecma_number_substract (n, ecma_number_multiply (d, q));
+} /* ecma_op_number_remainder */
+
+/**
+ * @}
+ * @}
+ */