================
@@ -37,5 +77,30 @@ void FORTRAN_PROCEDURE_NAME(getarg)(
   (void)RTNAME(GetCommandArgument)(
       n, &value, nullptr, nullptr, __FILE__, __LINE__);
 }
+
+// CALL GETLOG(USRNAME)
+void FORTRAN_PROCEDURE_NAME(getlog)(std::int8_t *arg, std::int64_t length) {
----------------
DavidTruby wrote:

nit: I think we should use `std::byte` instead of `std::int8_t`, while they're 
functionally going to be the same here since you're just casting it around it 
would be more clear that that's the intention for the type

https://github.com/llvm/llvm-project/pull/74628
_______________________________________________
cfe-commits mailing list
cfe-commits@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/cfe-commits

Reply via email to