mirror of
https://github.com/odin-lang/Odin.git
synced 2026-06-07 11:04:17 +00:00
Merge branch 'master' into bill/sdl3
This commit is contained in:
@@ -13,6 +13,8 @@ _load_library :: proc(path: string, global_symbols: bool, allocator: runtime.All
|
||||
flags := posix.RTLD_Flags{.NOW}
|
||||
if global_symbols {
|
||||
flags += {.GLOBAL}
|
||||
} else {
|
||||
flags += posix.RTLD_LOCAL
|
||||
}
|
||||
|
||||
cpath := strings.clone_to_cstring(path, allocator)
|
||||
|
||||
@@ -126,7 +126,7 @@ _i64_err :: #force_inline proc "contextless" (n: int, err: Error) -> (i64, Error
|
||||
}
|
||||
|
||||
|
||||
// read reads up to len(p) bytes into s. It returns the number of bytes read and any error if occurred.
|
||||
// read reads up to len(p) bytes into p. It returns the number of bytes read and any error if occurred.
|
||||
//
|
||||
// When read encounters an .EOF or error after successfully reading n > 0 bytes, it returns the number of
|
||||
// bytes read along with the error.
|
||||
@@ -142,7 +142,7 @@ read :: proc(s: Reader, p: []byte, n_read: ^int = nil) -> (n: int, err: Error) {
|
||||
return
|
||||
}
|
||||
|
||||
// write writes up to len(p) bytes into s. It returns the number of bytes written and any error if occurred.
|
||||
// write writes up to len(p) bytes into p. It returns the number of bytes written and any error if occurred.
|
||||
write :: proc(s: Writer, p: []byte, n_written: ^int = nil) -> (n: int, err: Error) {
|
||||
if s.procedure != nil {
|
||||
n64: i64
|
||||
|
||||
@@ -468,7 +468,7 @@ Example:
|
||||
Possible Output:
|
||||
|
||||
15.312
|
||||
673.130
|
||||
273.130
|
||||
|
||||
*/
|
||||
@(require_results) float32_range :: proc(low, high: f32, gen := context.random_generator) -> (val: f32) {
|
||||
|
||||
@@ -1031,14 +1031,17 @@ Returns:
|
||||
*/
|
||||
@private
|
||||
_split_iterator :: proc(s: ^string, sep: string, sep_save: int) -> (res: string, ok: bool) {
|
||||
m: int
|
||||
if sep == "" {
|
||||
res = s[:]
|
||||
ok = true
|
||||
s^ = s[len(s):]
|
||||
return
|
||||
if len(s) == 0 {
|
||||
m = -1
|
||||
} else {
|
||||
_, w := utf8.decode_rune_in_string(s^)
|
||||
m = w
|
||||
}
|
||||
} else {
|
||||
m = index(s^, sep)
|
||||
}
|
||||
|
||||
m := index(s^, sep)
|
||||
if m < 0 {
|
||||
// not found
|
||||
res = s[:]
|
||||
|
||||
@@ -532,9 +532,9 @@ gb_internal void report_os_info() {
|
||||
return;
|
||||
}
|
||||
|
||||
uint32_t major, minor, patch;
|
||||
uint32_t major, minor, patch = 0;
|
||||
|
||||
if (sscanf(cast(const char *)sw_vers, "%u.%u.%u", &major, &minor, &patch) != 3) {
|
||||
if (sscanf(cast(const char *)sw_vers, "%u.%u.%u", &major, &minor, &patch) < 1) {
|
||||
gb_printf("macOS Unknown\n");
|
||||
return;
|
||||
}
|
||||
|
||||
@@ -5544,6 +5544,9 @@ gb_internal bool check_builtin_procedure(CheckerContext *c, Operand *operand, As
|
||||
// NOTE(bill): Is this even correct?
|
||||
new_type->Union.node = operand->expr;
|
||||
new_type->Union.scope = bt->Union.scope;
|
||||
if (bt->Union.kind == UnionType_no_nil) {
|
||||
new_type->Union.kind = UnionType_no_nil;
|
||||
}
|
||||
|
||||
operand->type = new_type;
|
||||
}
|
||||
|
||||
@@ -169,11 +169,17 @@ gb_internal void lb_correct_entity_linkage(lbGenerator *gen) {
|
||||
other_global = LLVMGetNamedGlobal(ec.other_module->mod, ec.cname);
|
||||
if (other_global) {
|
||||
LLVMSetLinkage(other_global, LLVMWeakAnyLinkage);
|
||||
if (!ec.e->Variable.is_export) {
|
||||
LLVMSetVisibility(other_global, LLVMHiddenVisibility);
|
||||
}
|
||||
}
|
||||
} else if (ec.e->kind == Entity_Procedure) {
|
||||
other_global = LLVMGetNamedFunction(ec.other_module->mod, ec.cname);
|
||||
if (other_global) {
|
||||
LLVMSetLinkage(other_global, LLVMWeakAnyLinkage);
|
||||
if (!ec.e->Procedure.is_export) {
|
||||
LLVMSetVisibility(other_global, LLVMHiddenVisibility);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -3364,9 +3364,7 @@ gb_internal lbValue lb_build_unary_and(lbProcedure *p, Ast *expr) {
|
||||
auto args = array_make<lbValue>(permanent_allocator(), arg_count);
|
||||
args[0] = ok;
|
||||
|
||||
args[1] = lb_find_or_add_entity_string(p->module, get_file_path_string(pos.file_id));
|
||||
args[2] = lb_const_int(p->module, t_i32, pos.line);
|
||||
args[3] = lb_const_int(p->module, t_i32, pos.column);
|
||||
lb_set_file_line_col(p, array_slice(args, 1, args.count), pos);
|
||||
|
||||
if (!build_context.no_rtti) {
|
||||
args[4] = lb_typeid(p->module, src_type);
|
||||
@@ -3393,9 +3391,7 @@ gb_internal lbValue lb_build_unary_and(lbProcedure *p, Ast *expr) {
|
||||
auto args = array_make<lbValue>(permanent_allocator(), 6);
|
||||
args[0] = ok;
|
||||
|
||||
args[1] = lb_find_or_add_entity_string(p->module, get_file_path_string(pos.file_id));
|
||||
args[2] = lb_const_int(p->module, t_i32, pos.line);
|
||||
args[3] = lb_const_int(p->module, t_i32, pos.column);
|
||||
lb_set_file_line_col(p, array_slice(args, 1, args.count), pos);
|
||||
|
||||
args[4] = any_id;
|
||||
args[5] = id;
|
||||
|
||||
@@ -15,7 +15,6 @@ gb_global isize lb_global_type_info_member_offsets_index = 0;
|
||||
gb_global isize lb_global_type_info_member_usings_index = 0;
|
||||
gb_global isize lb_global_type_info_member_tags_index = 0;
|
||||
|
||||
|
||||
gb_internal void lb_init_module(lbModule *m, Checker *c) {
|
||||
m->info = &c->info;
|
||||
|
||||
@@ -540,6 +539,22 @@ gb_internal lbValue lb_build_addr_ptr(lbProcedure *p, Ast *expr) {
|
||||
return lb_addr_get_ptr(p, addr);
|
||||
}
|
||||
|
||||
gb_internal void lb_set_file_line_col(lbProcedure *p, Array<lbValue> arr, TokenPos pos) {
|
||||
String file = get_file_path_string(pos.file_id);
|
||||
i32 line = pos.line;
|
||||
i32 col = pos.column;
|
||||
|
||||
if (build_context.obfuscate_source_code_locations) {
|
||||
file = obfuscate_string(file, "F");
|
||||
line = obfuscate_i32(line);
|
||||
col = obfuscate_i32(col);
|
||||
}
|
||||
|
||||
arr[0] = lb_find_or_add_entity_string(p->module, file);
|
||||
arr[1] = lb_const_int(p->module, t_i32, line);
|
||||
arr[2] = lb_const_int(p->module, t_i32, col);
|
||||
}
|
||||
|
||||
gb_internal void lb_emit_bounds_check(lbProcedure *p, Token token, lbValue index, lbValue len) {
|
||||
if (build_context.no_bounds_check) {
|
||||
return;
|
||||
@@ -553,14 +568,8 @@ gb_internal void lb_emit_bounds_check(lbProcedure *p, Token token, lbValue index
|
||||
index = lb_emit_conv(p, index, t_int);
|
||||
len = lb_emit_conv(p, len, t_int);
|
||||
|
||||
lbValue file = lb_find_or_add_entity_string(p->module, get_file_path_string(token.pos.file_id));
|
||||
lbValue line = lb_const_int(p->module, t_i32, token.pos.line);
|
||||
lbValue column = lb_const_int(p->module, t_i32, token.pos.column);
|
||||
|
||||
auto args = array_make<lbValue>(temporary_allocator(), 5);
|
||||
args[0] = file;
|
||||
args[1] = line;
|
||||
args[2] = column;
|
||||
lb_set_file_line_col(p, args, token.pos);
|
||||
args[3] = index;
|
||||
args[4] = len;
|
||||
|
||||
@@ -582,14 +591,8 @@ gb_internal void lb_emit_matrix_bounds_check(lbProcedure *p, Token token, lbValu
|
||||
row_count = lb_emit_conv(p, row_count, t_int);
|
||||
column_count = lb_emit_conv(p, column_count, t_int);
|
||||
|
||||
lbValue file = lb_find_or_add_entity_string(p->module, get_file_path_string(token.pos.file_id));
|
||||
lbValue line = lb_const_int(p->module, t_i32, token.pos.line);
|
||||
lbValue column = lb_const_int(p->module, t_i32, token.pos.column);
|
||||
|
||||
auto args = array_make<lbValue>(temporary_allocator(), 7);
|
||||
args[0] = file;
|
||||
args[1] = line;
|
||||
args[2] = column;
|
||||
lb_set_file_line_col(p, args, token.pos);
|
||||
args[3] = row_index;
|
||||
args[4] = column_index;
|
||||
args[5] = row_count;
|
||||
@@ -610,14 +613,8 @@ gb_internal void lb_emit_multi_pointer_slice_bounds_check(lbProcedure *p, Token
|
||||
low = lb_emit_conv(p, low, t_int);
|
||||
high = lb_emit_conv(p, high, t_int);
|
||||
|
||||
lbValue file = lb_find_or_add_entity_string(p->module, get_file_path_string(token.pos.file_id));
|
||||
lbValue line = lb_const_int(p->module, t_i32, token.pos.line);
|
||||
lbValue column = lb_const_int(p->module, t_i32, token.pos.column);
|
||||
|
||||
auto args = array_make<lbValue>(permanent_allocator(), 5);
|
||||
args[0] = file;
|
||||
args[1] = line;
|
||||
args[2] = column;
|
||||
lb_set_file_line_col(p, args, token.pos);
|
||||
args[3] = low;
|
||||
args[4] = high;
|
||||
|
||||
@@ -632,16 +629,11 @@ gb_internal void lb_emit_slice_bounds_check(lbProcedure *p, Token token, lbValue
|
||||
return;
|
||||
}
|
||||
|
||||
lbValue file = lb_find_or_add_entity_string(p->module, get_file_path_string(token.pos.file_id));
|
||||
lbValue line = lb_const_int(p->module, t_i32, token.pos.line);
|
||||
lbValue column = lb_const_int(p->module, t_i32, token.pos.column);
|
||||
high = lb_emit_conv(p, high, t_int);
|
||||
|
||||
if (!lower_value_used) {
|
||||
auto args = array_make<lbValue>(permanent_allocator(), 5);
|
||||
args[0] = file;
|
||||
args[1] = line;
|
||||
args[2] = column;
|
||||
lb_set_file_line_col(p, args, token.pos);
|
||||
args[3] = high;
|
||||
args[4] = len;
|
||||
|
||||
@@ -651,9 +643,7 @@ gb_internal void lb_emit_slice_bounds_check(lbProcedure *p, Token token, lbValue
|
||||
low = lb_emit_conv(p, low, t_int);
|
||||
|
||||
auto args = array_make<lbValue>(permanent_allocator(), 6);
|
||||
args[0] = file;
|
||||
args[1] = line;
|
||||
args[2] = column;
|
||||
lb_set_file_line_col(p, args, token.pos);
|
||||
args[3] = low;
|
||||
args[4] = high;
|
||||
args[5] = len;
|
||||
|
||||
@@ -771,9 +771,7 @@ gb_internal lbValue lb_emit_union_cast(lbProcedure *p, lbValue value, Type *type
|
||||
auto args = array_make<lbValue>(permanent_allocator(), arg_count);
|
||||
args[0] = ok;
|
||||
|
||||
args[1] = lb_const_string(m, get_file_path_string(pos.file_id));
|
||||
args[2] = lb_const_int(m, t_i32, pos.line);
|
||||
args[3] = lb_const_int(m, t_i32, pos.column);
|
||||
lb_set_file_line_col(p, array_slice(args, 1, args.count), pos);
|
||||
|
||||
if (!build_context.no_rtti) {
|
||||
args[4] = lb_typeid(m, src_type);
|
||||
@@ -847,9 +845,7 @@ gb_internal lbAddr lb_emit_any_cast_addr(lbProcedure *p, lbValue value, Type *ty
|
||||
auto args = array_make<lbValue>(permanent_allocator(), arg_count);
|
||||
args[0] = ok;
|
||||
|
||||
args[1] = lb_const_string(m, get_file_path_string(pos.file_id));
|
||||
args[2] = lb_const_int(m, t_i32, pos.line);
|
||||
args[3] = lb_const_int(m, t_i32, pos.column);
|
||||
lb_set_file_line_col(p, array_slice(args, 1, args.count), pos);
|
||||
|
||||
if (!build_context.no_rtti) {
|
||||
args[4] = any_typeid;
|
||||
|
||||
Reference in New Issue
Block a user