[flang-commits] [flang] f57756a - [flang-rt] Use RT_API_ATTRS for ErfcScaled. (#129598)

[via flang-commits]

Author: Slava Zakharin
Date: 2025-03-03T17:10:50-08:00
New Revision: f57756a6406f93b3f579ce4da2b8be3fe211952f

URL: https://github.com/llvm/llvm-project/commit/f57756a6406f93b3f579ce4da2b8be3fe211952f
DIFF: https://github.com/llvm/llvm-project/commit/f57756a6406f93b3f579ce4da2b8be3fe211952f.diff

LOG: [flang-rt] Use RT_API_ATTRS for ErfcScaled. (#129598)

As long as it is a host-only function, it cannot be referenced
by the flang-rt's ErfcScaled entry points. With the markup in place,
it is compiling properly by a CUDA compiler.

Added: 
    

Modified: 
    flang/include/flang/Common/erfc-scaled.h

Removed: 
    


################################################################################
diff  --git a/flang/include/flang/Common/erfc-scaled.h b/flang/include/flang/Common/erfc-scaled.h
index 88e2183c15d03..001af66baf34a 100644
--- a/flang/include/flang/Common/erfc-scaled.h
+++ b/flang/include/flang/Common/erfc-scaled.h
@@ -9,11 +9,12 @@
 #ifndef FORTRAN_COMMON_ERFC_SCALED_H_
 #define FORTRAN_COMMON_ERFC_SCALED_H_
 
+#include "flang/Common/api-attrs.h"
 #include <cmath>
 #include <limits>
 
 namespace Fortran::common {
-template <typename T> inline T ErfcScaled(T arg) {
+template <typename T> inline RT_API_ATTRS T ErfcScaled(T arg) {
   // Coefficients for approximation to erfc in the first interval.
   static const T a[5] = {3.16112374387056560e00, 1.13864154151050156e02,
       3.77485237685302021e02, 3.20937758913846947e03, 1.85777706184603153e-1};