cli/q
1
0
Fork 0
Code Issues Pull requests Releases Activity

Improved Windows support

Browse source
This commit is contained in:
Eduard Urbach 2024-08-19 17:25:51 +02:00
parent e9a0494aa7
commit 6b48ee0a48
No known key found for this signature in database
GPG key ID: C874F672B1AF20C0
8 changed files with 50 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/mem/alloc_windows.q Normal file
View file

@ -0,0 +1,5 @@
import sys
alloc(length Int) -> Pointer {
return sys.mmap(0, length, 0x0004, 0x3000)
}

4
lib/sys/sys_windows.q
View file

@ -8,6 +8,10 @@ mmap(address Int, length Int, protection Int, flags Int) -> Pointer {
return kernel32.VirtualAlloc(address, length, flags, protection)
}
munmap(address Pointer, length Int) -> Int {
return kernel32.VirtualFree(address, length, 0x4000)
}
exit(code Int) {
kernel32.ExitProcess(code)
}