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

#include "platform.h"

C_String_t Posix_ProcEnv_getenv (NullString8_t s) {
  char *res = getenv((const char*)s);
  return (C_String_t)res;
}
Commit	Line	Data
7f918cf1 CE	1	#include "platform.h"
	2
	3	C_String_t Posix_ProcEnv_getenv (NullString8_t s) {
	4	char res = getenv((const char)s);
	5	return (C_String_t)res;
	6	}