lib/mem/alloc_windows.q

import sys

alloc(length Int) -> Pointer {
	x := sys.mmap(0, length+8, 0x0004, 0x3000)

	if x < 0x1000 {
		return x
	}

	store(x, 8, length)
	return x + 8
}
Improved Windows support 2024-08-19 17:25:51 +02:00			`import sys`

			`alloc(length Int) -> Pointer {`
Fixed incorrect memory allocations 2025-02-09 14:38:01 +01:00			`x := sys.mmap(0, length+8, 0x0004, 0x3000)`
Implemented length storage of allocated memory 2025-02-09 14:14:41 +01:00
Fixed incorrect memory allocations 2025-02-09 14:38:01 +01:00			`if x < 0x1000 {`
Implemented length storage of allocated memory 2025-02-09 14:14:41 +01:00			`return x`
			`}`

			`store(x, 8, length)`
			`return x + 8`
Improved Windows support 2024-08-19 17:25:51 +02:00			`}`