[hcoop/debian/mlton.git] / runtime / basis / Posix / ProcEnv / getlogin.c

#include "platform.h"

C_Errno_t(C_String_t) Posix_ProcEnv_getlogin (void) {
  char *res = getlogin ();
  return (C_Errno_t(C_String_t))res;
}
Commit	Line	Data
7f918cf1 CE	1	#include "platform.h"
	2
	3	C_Errno_t(C_String_t) Posix_ProcEnv_getlogin (void) {
	4	char *res = getlogin ();
	5	return (C_Errno_t(C_String_t))res;
	6	}