Functions have unique names now unless they are foreign, probably will

need a keyword to not mangle the names.

examples/arrays_and_slices.kl

@@ -11,6 +11,7 @@ be nice if handling of that was simplified.
 */
 
 
+
 main :: (): int
   static_array: [8]int
 
@@ -50,4 +51,5 @@ main :: (): int
   // example in a single line
   for slice;; *it = 2
 
-  Assert(static_array[2] == 2)
+  Assert(static_array[2] == 2)
+  return 0

examples/drawing_to_screen_using_windows_api.kl

@@ -82,10 +82,6 @@ WinMain :: (hInstance: HINSTANCE, hPrevInstance: HINSTANCE, lpCmdLine: LPSTR, nS
   window_dc := GetDC(window)
   bitmap := CreateBitmap(screen_size)
 
-  requested_time_per_frame := 1.0 / 60.0
-  frame_start_time := Time()
-  frame_number: S64
-  total_time: F64
   for AppIsRunning
     msg: MSG
     for PeekMessageW(&msg, window, 0, 0, PM_REMOVE) > 0
@@ -101,4 +97,5 @@ WinMain :: (hInstance: HINSTANCE, hPrevInstance: HINSTANCE, lpCmdLine: LPSTR, nS
     Sleep(100)
 
     if CStringCompare(lpCmdLine, "testing")
-      ExitProcess(0)
+      return 0
+  return 0

examples/language_basics.kl

@@ -80,6 +80,8 @@ main :: (): int
   Assert(data2.c == 0)
   Assert(data2.d == 0)
 
+  return 0
+
 Data :: struct
   a: S64
   b: S32

examples/order_independent_declarations.kl

@@ -37,6 +37,7 @@ main :: (): int
   asset1 := make_sound()
   asset2 := make_sound()
   asset1.next_asset = &asset2
+  return 0
 
   // @todo: This does not work
   // asset := []Asset{make_sound(), make_sound()}

examples/raymarcher.kl

@@ -203,4 +203,5 @@ WinMain :: (hInstance: HINSTANCE, hPrevInstance: HINSTANCE, lpCmdLine: LPSTR, nS
         frame_time = new_frame_time
 
     if CStringCompare(lpCmdLine, "testing")
-      ExitProcess(0)
+      return 0
+  return 0

examples/runtime_type_information.kl

@@ -47,6 +47,7 @@ main :: (): int
 
   letter := GetFirstLetterOfType(value_to_be_wrapped)
   Assert(letter == 'I')
+  return 0
 
 GetFirstLetterOfType :: (a: Any): U8
   type_info := GetTypeInfo(a.type)

examples/types_as_first_class_values.kl

@@ -41,6 +41,8 @@ main :: (): int
 
   elif some_type_implicit == char
     pass
+    
+  return 0