|
@@ -14,11 +14,11 @@ foreign kernel32 {
|
|
|
HeapFree :: proc(hHeap: rawptr, dwFlags: u32, lpMem: rawptr) -> b32 ---
|
|
|
}
|
|
|
|
|
|
-_heap_alloc :: proc(size: int, zero_memory := true) -> rawptr {
|
|
|
+_heap_alloc :: proc "contextless" (size: int, zero_memory := true) -> rawptr {
|
|
|
HEAP_ZERO_MEMORY :: 0x00000008
|
|
|
return HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY if zero_memory else 0, uint(size))
|
|
|
}
|
|
|
-_heap_resize :: proc(ptr: rawptr, new_size: int) -> rawptr {
|
|
|
+_heap_resize :: proc "contextless" (ptr: rawptr, new_size: int) -> rawptr {
|
|
|
if new_size == 0 {
|
|
|
_heap_free(ptr)
|
|
|
return nil
|
|
@@ -30,7 +30,7 @@ _heap_resize :: proc(ptr: rawptr, new_size: int) -> rawptr {
|
|
|
HEAP_ZERO_MEMORY :: 0x00000008
|
|
|
return HeapReAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, ptr, uint(new_size))
|
|
|
}
|
|
|
-_heap_free :: proc(ptr: rawptr) {
|
|
|
+_heap_free :: proc "contextless" (ptr: rawptr) {
|
|
|
if ptr == nil {
|
|
|
return
|
|
|
}
|