From 445f2e8eb775de413b2c1461c9a7fa17d1730379 Mon Sep 17 00:00:00 2001 From: HarshitaKalani Date: Mon, 29 Jan 2024 20:09:36 +0530 Subject: [PATCH] remove exp, atan, atan2 --- src/lfortran/semantics/comptime_eval.h | 8 -------- 1 file changed, 8 deletions(-) diff --git a/src/lfortran/semantics/comptime_eval.h b/src/lfortran/semantics/comptime_eval.h index 176b4b1885..efb7b8b848 100644 --- a/src/lfortran/semantics/comptime_eval.h +++ b/src/lfortran/semantics/comptime_eval.h @@ -102,7 +102,6 @@ struct IntrinsicProcedures { {"selected_int_kind", {m_kind, &eval_selected_int_kind, true}}, {"selected_real_kind", {m_kind, &eval_selected_real_kind, true}}, {"selected_char_kind", {m_kind, &eval_selected_char_kind, true}}, - {"exp", {m_math, &eval_exp, true}}, {"dexp", {m_math, &eval_dexp, true}}, {"sexp", {m_math, &eval_sexp, true}}, {"cexp", {m_math, &eval_cexp, true}}, @@ -128,13 +127,10 @@ struct IntrinsicProcedures { {"asin", {m_math, &eval_asin, true}}, {"acos", {m_math, &eval_acos, true}}, - {"atan", {m_math, &eval_atan, true}}, {"asinh", {m_math, &eval_asinh, true}}, {"acosh", {m_math, &eval_acosh, true}}, {"atanh", {m_math, &eval_atanh, true}}, - - {"atan2", {m_math, &eval_atan2, true}}, {"sign", {m_math, ¬_implemented, false}}, {"dot_product", {m_math, ¬_implemented, false}}, @@ -467,7 +463,6 @@ struct IntrinsicProcedures { TRIG(asin) TRIG(acos) -TRIG(atan) TRIG(asinh) TRIG(acosh) TRIG(atanh) @@ -501,9 +496,6 @@ TRIG2(atan, datan) static ASR::expr_t *eval_log10(Allocator &al, const Location &loc, Vec &args, const CompilerOptions &compiler_options) { return eval_trig(al, loc, args, compiler_options, &log10, nullptr); } - static ASR::expr_t *eval_atan2(Allocator &al, const Location &loc, Vec &args, const CompilerOptions &compiler_options) { - return eval_2args(al, loc, args, compiler_options, &atan2); - } static ASR::expr_t *eval_len(Allocator &al, const Location &loc, Vec &args, const CompilerOptions &compiler_options) { if( !ASRUtils::all_args_evaluated(args) ) {