mirrors/Odin
1
0
Fork 0
mirror of https://github.com/odin-lang/Odin.git synced 2026-02-14 07:13:14 +00:00
Code Issues Packages Projects Releases Wiki Activity

Implement dumb PtrMap

Browse Source
This commit is contained in:
gingerBill
2024-04-26 15:04:46 +01:00
parent c685b404ea
commit 2b26384b89
4 changed files with 245 additions and 262 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
src/exact_value.cpp
View File

@@ -54,37 +54,50 @@ gb_global ExactValue const empty_exact_value = {};
gb_internal uintptr hash_exact_value(ExactValue v) {
mutex_lock(&hash_exact_value_mutex);
defer (mutex_unlock(&hash_exact_value_mutex));
uintptr res = 0;
switch (v.kind) {
case ExactValue_Invalid:
return 0;
case ExactValue_Bool:
return gb_fnv32a(&v.value_bool, gb_size_of(v.value_bool));
res = gb_fnv32a(&v.value_bool, gb_size_of(v.value_bool));
break;
case ExactValue_String:
return gb_fnv32a(v.value_string.text, v.value_string.len);
res = gb_fnv32a(v.value_string.text, v.value_string.len);
break;
case ExactValue_Integer:
{
u32 key = gb_fnv32a(v.value_integer.dp, gb_size_of(*v.value_integer.dp) * v.value_integer.used);
u8 last = (u8)v.value_integer.sign;
return (key ^ last) * 0x01000193;
res = (key ^ last) * 0x01000193;
break;
}
case ExactValue_Float:
return gb_fnv32a(&v.value_float, gb_size_of(v.value_float));
res = gb_fnv32a(&v.value_float, gb_size_of(v.value_float));
break;
case ExactValue_Pointer:
return ptr_map_hash_key(v.value_pointer);
res = ptr_map_hash_key(v.value_pointer);
break;
case ExactValue_Complex:
return gb_fnv32a(v.value_complex, gb_size_of(Complex128));
res = gb_fnv32a(v.value_complex, gb_size_of(Complex128));
break;
case ExactValue_Quaternion:
return gb_fnv32a(v.value_quaternion, gb_size_of(Quaternion256));
res = gb_fnv32a(v.value_quaternion, gb_size_of(Quaternion256));
break;
case ExactValue_Compound:
return ptr_map_hash_key(v.value_compound);
res = ptr_map_hash_key(v.value_compound);
break;
case ExactValue_Procedure:
return ptr_map_hash_key(v.value_procedure);
res = ptr_map_hash_key(v.value_procedure);
break;
case ExactValue_Typeid:
return ptr_map_hash_key(v.value_typeid);
res = ptr_map_hash_key(v.value_typeid);
break;
default:
res = gb_fnv32a(&v, gb_size_of(ExactValue));
}
return gb_fnv32a(&v, gb_size_of(ExactValue));
return res & 0x7fffffff;
}