[hcoop/debian/mlton.git] / runtime / basis / Posix / FileSys / Utimbuf.c

#include "platform.h"

static struct utimbuf Posix_FileSys_Utimbuf_utimbuf;

void Posix_FileSys_Utimbuf_setAcTime (C_Time_t t) {
  Posix_FileSys_Utimbuf_utimbuf.actime = t;
}

void Posix_FileSys_Utimbuf_setModTime (C_Time_t t) {
  Posix_FileSys_Utimbuf_utimbuf.modtime = t;
} 

C_Errno_t(C_Int_t) Posix_FileSys_Utimbuf_utime (NullString8_t s) {
  return utime((const char *)s, &Posix_FileSys_Utimbuf_utimbuf);
}
Commit	Line	Data
7f918cf1 CE	1	#include "platform.h"
	2
	3	static struct utimbuf Posix_FileSys_Utimbuf_utimbuf;
	4
	5	void Posix_FileSys_Utimbuf_setAcTime (C_Time_t t) {
	6	Posix_FileSys_Utimbuf_utimbuf.actime = t;
	7	}
	8
	9	void Posix_FileSys_Utimbuf_setModTime (C_Time_t t) {
	10	Posix_FileSys_Utimbuf_utimbuf.modtime = t;
	11	}
	12
	13	C_Errno_t(C_Int_t) Posix_FileSys_Utimbuf_utime (NullString8_t s) {
	14	return utime((const char *)s, &Posix_FileSys_Utimbuf_utimbuf);
	15	}