[hcoop/debian/mlton.git] / runtime / platform / mmap.c

static inline void *mmapAnon (void *start, size_t length) {
        return mmap (start, length, PROT_READ | PROT_WRITE, 
                        MAP_PRIVATE | MAP_ANON, -1, 0);
}

static void munmap_safe (void *base, size_t length) {
        assert (base != NULL);
        if (0 == length)
                return;
        if (0 != munmap (base, length))
                diee ("munmap failed");
}
Commit	Line	Data
7f918cf1 CE	1	static inline void mmapAnon (void start, size_t length) {
	2	return mmap (start, length, PROT_READ \| PROT_WRITE,
	3	MAP_PRIVATE \| MAP_ANON, -1, 0);
	4	}
	5
	6	static void munmap_safe (void *base, size_t length) {
	7	assert (base != NULL);
	8	if (0 == length)
	9	return;
	10	if (0 != munmap (base, length))
	11	diee ("munmap failed");
	12	}