diff options
| author | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-05-31 02:44:34 +0000 |
|---|---|---|
| committer | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2003-05-31 02:44:34 +0000 |
| commit | 4ba8ddefd67418aea8f5ad348076b40e9500a525 (patch) | |
| tree | 0979464d6d8c730e7c1dd2eafd758a282d67fc21 /gcc/f/com-rt.def | |
| parent | 2f08c2ee27bbeadae6be1b8f8fc9b4937a8f1a68 (diff) | |
| download | gcc-4ba8ddefd67418aea8f5ad348076b40e9500a525.tar.gz | |
* com.c (ffecom_init_0): Define built-in functions for tan and atan.
* com-rt.def: Use then to implement g77's tan and atan intrinsics.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@67260 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/f/com-rt.def')
| -rw-r--r-- | gcc/f/com-rt.def | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/f/com-rt.def b/gcc/f/com-rt.def index 2ddc0fb4ff3..185aef52d05 100644 --- a/gcc/f/com-rt.def +++ b/gcc/f/com-rt.def @@ -259,7 +259,7 @@ DEFGFRT (FFECOM_gfrtDIMAG, "d_imag", FFECOM_rttypeDOUBLE_, "&e", FALSE, FALSE, F DEFGFRT (FFECOM_gfrtL_ACOS, "acos", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_ASIN, "asin", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) -DEFGFRT (FFECOM_gfrtL_ATAN, "atan", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) +DEFGFRT (FFECOM_gfrtL_ATAN, "__builtin_atan", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_ATAN2, "__builtin_atan2", FFECOM_rttypeDOUBLE_, "dd", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_COS, "__builtin_cos", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_COSH, "cosh", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) @@ -274,7 +274,7 @@ DEFGFRT (FFECOM_gfrtL_POW, "__builtin_pow", FFECOM_rttypeDOUBLE_, "dd", FALSE, F DEFGFRT (FFECOM_gfrtL_SIN, "__builtin_sin", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_SINH, "sinh", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_SQRT, "__builtin_sqrt", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) -DEFGFRT (FFECOM_gfrtL_TAN, "tan", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) +DEFGFRT (FFECOM_gfrtL_TAN, "__builtin_tan", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtL_TANH, "tanh", FFECOM_rttypeDOUBLE_, "d", FALSE, FALSE, TRUE) DEFGFRT (FFECOM_gfrtPOW_CI, "pow_ci", FFECOM_rttypeCOMPLEX_F2C_, "&c&i", FALSE, TRUE, FALSE) |