diff options
Diffstat (limited to 'flang-rt/lib/runtime/extensions.cpp')
| -rw-r--r-- | flang-rt/lib/runtime/extensions.cpp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/flang-rt/lib/runtime/extensions.cpp b/flang-rt/lib/runtime/extensions.cpp index a24810b4f344..be0eed6f49dc 100644 --- a/flang-rt/lib/runtime/extensions.cpp +++ b/flang-rt/lib/runtime/extensions.cpp @@ -148,7 +148,7 @@ uid_t RTNAME(GetUID)() { void GetUsernameEnvVar(const char *envName, char *arg, std::int64_t length) { Descriptor name{*Descriptor::Create( - 1, std::strlen(envName) + 1, const_cast<char *>(envName), 0)}; + 1, runtime::strlen(envName) + 1, const_cast<char *>(envName), 0)}; Descriptor value{*Descriptor::Create(1, length, arg, 0)}; RTNAME(GetEnvVariable) @@ -172,7 +172,7 @@ void FORTRAN_PROCEDURE_NAME(fdate)(char *arg, std::int64_t length) { char str[26]; // Insufficient space, fill with spaces and return. if (length < 24) { - std::memset(arg, ' ', length); + runtime::memset(arg, ' ', length); return; } @@ -204,8 +204,8 @@ void FORTRAN_PROCEDURE_NAME(getarg)( void FORTRAN_PROCEDURE_NAME(getlog)(char *arg, std::int64_t length) { #if _REENTRANT || _POSIX_C_SOURCE >= 199506L if (length >= 1 && getlogin_r(arg, length) == 0) { - auto loginLen{std::strlen(arg)}; - std::memset( + auto loginLen{runtime::strlen(arg)}; + runtime::memset( arg + loginLen, ' ', static_cast<std::size_t>(length) - loginLen); return; } @@ -259,7 +259,7 @@ std::int64_t FORTRAN_PROCEDURE_NAME(access)(const char *name, char *newName{nullptr}; if (name[nameLength - 1] != '\0') { newName = static_cast<char *>(std::malloc(nameLength + 1)); - std::memcpy(newName, name, nameLength); + runtime::memcpy(newName, name, nameLength); newName[nameLength] = '\0'; name = newName; } |