[flang-commits] [flang] GETLOG runtime and extension implementation: get login username (PR #70917)

[Yi Wu via flang-commits]

================
@@ -222,6 +253,22 @@ std::int32_t RTNAME(GetCommand)(const Descriptor *value,
   return stat;
 }
 
+std::int32_t RTNAME(GetLog)(const Descriptor *value, const Descriptor *errmsg) {
+  FillWithSpaces(*value);
+
+  const char *arg = getlogin();
----------------
PAX-12-WU wrote:

I have changed to `getlogin_r` in commit: https://github.com/llvm/llvm-project/pull/70917/commits/e0df6ab9683a070e2c7e94325a26f68d369736f4

https://github.com/llvm/llvm-project/pull/70917