Tests for new untyped conversions

programs/main.kl

@@ -94,6 +94,18 @@ little_untyped_test :: ()
   if true;; pass
   cast_value1 := 32->S64
   cast_value2 := true->Bool
+  value3 := !true
+  value4 := !325252
+  value5 := !42.42
+  some_constant :: 10
+  value6 := !some_constant
+  var_not_const := 0
+  value7 := some_constant + - -some_constant + +-32 + -var_not_const
+
+
+  value3 = value3 + value4 + value5 + cast_value2 + value6
+  cast_value1 += 1 + value7
+
 
   switch 4
     4;; OutputDebugStringA("4")
@@ -104,6 +116,7 @@ little_untyped_test :: ()
   val := 4232.23
   thing: Any = val
   print(val)
+  print(some_type)
   // print_array({125.23, 32})
 
   assert(char_info.kind == Type_Info_Kind.CHAR)
@@ -114,6 +127,7 @@ little_untyped_test :: ()
 
 app_is_running := true
 window_procedure :: (hwnd: HWND, msg: UINT, wparam: WPARAM, lparam: LPARAM): LRESULT
+  little_untyped_test()
   if msg == WM_DESTROY
     PostQuitMessage(0)
     app_is_running = false