|
@@ -1,70 +1,5 @@
|
|
package runtime
|
|
package runtime
|
|
|
|
|
|
-when ODIN_DEFAULT_TO_NIL_ALLOCATOR || ODIN_OS == "freestanding" || ODIN_OS == "js" {
|
|
|
|
- // mem.nil_allocator reimplementation
|
|
|
|
-
|
|
|
|
- default_allocator_proc :: proc(allocator_data: rawptr, mode: mem.Allocator_Mode,
|
|
|
|
- size, alignment: int,
|
|
|
|
- old_memory: rawptr, old_size: int, loc := #caller_location) -> ([]byte, Allocator_Error) {
|
|
|
|
- return nil, .None;
|
|
|
|
- }
|
|
|
|
-
|
|
|
|
- default_allocator :: proc() -> Allocator {
|
|
|
|
- return Allocator{
|
|
|
|
- procedure = default_allocator_proc,
|
|
|
|
- data = nil,
|
|
|
|
- };
|
|
|
|
- }
|
|
|
|
-
|
|
|
|
-} else when ODIN_OS == "windows" {
|
|
|
|
- default_allocator_proc :: proc(allocator_data: rawptr, mode: Allocator_Mode,
|
|
|
|
- size, alignment: int,
|
|
|
|
- old_memory: rawptr, old_size: int, loc := #caller_location) -> ([]byte, Allocator_Error) {
|
|
|
|
- switch mode {
|
|
|
|
- case .Alloc:
|
|
|
|
- return _windows_default_alloc(size, alignment);
|
|
|
|
-
|
|
|
|
- case .Free:
|
|
|
|
- _windows_default_free(old_memory);
|
|
|
|
-
|
|
|
|
- case .Free_All:
|
|
|
|
- // NOTE(tetra): Do nothing.
|
|
|
|
-
|
|
|
|
- case .Resize:
|
|
|
|
- return _windows_default_resize(old_memory, old_size, size, alignment);
|
|
|
|
-
|
|
|
|
- case .Query_Features:
|
|
|
|
- set := (^Allocator_Mode_Set)(old_memory);
|
|
|
|
- if set != nil {
|
|
|
|
- set^ = {.Alloc, .Free, .Resize, .Query_Features};
|
|
|
|
- }
|
|
|
|
- return nil, nil;
|
|
|
|
-
|
|
|
|
- case .Query_Info:
|
|
|
|
- return nil, nil;
|
|
|
|
- }
|
|
|
|
-
|
|
|
|
- return nil, nil;
|
|
|
|
- }
|
|
|
|
-
|
|
|
|
- default_allocator :: proc() -> Allocator {
|
|
|
|
- return Allocator{
|
|
|
|
- procedure = default_allocator_proc,
|
|
|
|
- data = nil,
|
|
|
|
- };
|
|
|
|
- }
|
|
|
|
-
|
|
|
|
-} else {
|
|
|
|
- // TODO(bill): reimplement these procedures in the os_specific stuff
|
|
|
|
- import "core:os"
|
|
|
|
-
|
|
|
|
- default_allocator_proc :: os.heap_allocator_proc;
|
|
|
|
-
|
|
|
|
- default_allocator :: proc() -> Allocator {
|
|
|
|
- return os.heap_allocator();
|
|
|
|
- }
|
|
|
|
-}
|
|
|
|
-
|
|
|
|
@(private)
|
|
@(private)
|
|
byte_slice :: #force_inline proc "contextless" (data: rawptr, len: int) -> []byte {
|
|
byte_slice :: #force_inline proc "contextless" (data: rawptr, len: int) -> []byte {
|
|
return transmute([]u8)Raw_Slice{data=data, len=max(len, 0)};
|
|
return transmute([]u8)Raw_Slice{data=data, len=max(len, 0)};
|