checkpoint

src/eval/eval_bundles.c

@@ -239,6 +239,7 @@ e_member_eval_from_eval_member_name(E_Eval eval, String8 member_name)
       {
         result.mode     = eval.mode;
         result.space    = eval.space;
+        
         result.type_key = member->type_key;
         result.code     = eval.code;
         result.msgs     = eval.msgs;
@@ -264,3 +265,23 @@ e_member_eval_from_eval_member_name(E_Eval eval, String8 member_name)
   }
   return result;
 }
+
+internal F32
+e_f32_from_eval(E_Eval eval)
+{
+  F32 result = 0;
+  E_TypeKind kind = e_type_kind_from_key(e_type_unwrap(eval.type_key));
+  if(e_type_kind_is_integer(kind))
+  {
+    result = (F32)eval.value.s64;
+  }
+  else if(kind == E_TypeKind_F64)
+  {
+    result = (F32)eval.value.f64;
+  }
+  else if(kind == E_TypeKind_F32)
+  {
+    result = eval.value.f32;
+  }
+  return result;
+}

src/eval/eval_bundles.h

@@ -29,5 +29,6 @@ internal E_Eval e_dynamically_typed_eval_from_eval(E_Eval eval);
 internal E_Eval e_value_eval_from_eval(E_Eval eval);
 internal E_Eval e_element_eval_from_array_eval_index(E_Eval eval, U64 index);
 internal E_Eval e_member_eval_from_eval_member_name(E_Eval eval, String8 member_name);
+internal F32 e_f32_from_eval(E_Eval eval);
 
 #endif // EVAL_BUNDLES_H