Compiling with MSVC, Using raylib! Cleanup

build/examples/game2d.core

@@ -0,0 +1,93 @@
+#import "LibC.core"
+#import "raylib.core"
+
+/*@feature_idea: labeled block
+
+It acts just like a scope in C.
+BUT it can be turned into a goto label by adding another semicolon
+at the end.
+
+:block
+  thing := 1
+  thing2 := thing
+
+:label_without_block
+thing := 1
+
+
+:goto_block:
+  thing := 1
+  thing2 := thing
+
+:goto_block: for
+
+
+*/
+
+/*
+@reproduction:
+This kills the compiler due to referencing slice data
+
+Array :: struct($T: Type)
+  slice: []T
+  cap: S64
+
+Guy :: struct
+  pos: Vector2
+
+Add :: (a: *Array($T), item: T)
+  if a.cap == 0
+    a.cap = 16
+    a.slice.data = malloc(SizeOf(T) * a.cap)
+  a.slice.data[a.slice.len++] = item
+
+guys: Array(Guy)
+Add(&guys, {100, 100})
+*/
+Array :: struct($T: Type)
+  data: *T
+  len: S64
+  cap: S64
+
+Guy :: struct
+  pos: Vector2
+
+Add :: (a: *Array($T), item: T)
+  if a.cap == 0
+    a.cap = 16
+    a.data = malloc(SizeOf(T) * a.cap->U64)
+  if a.len + 1 > a.cap
+    a.cap *= 2
+    a.data = realloc(a.data, SizeOf(T) * a.cap->U64)
+  a.data[a.len++] = item
+
+main :: (): int
+  guys: Array(Guy)
+  Add(&guys, {pos = {100, 100}})
+
+  InitWindow(1280, 720, "Testing")
+  SetTargetFPS(60)
+  for !WindowShouldClose()
+
+    g := guys.data
+    if IsKeyDown(KEY_W);; g.pos.y -= 2
+    if IsKeyDown(KEY_S);; g.pos.y += 2
+    if IsKeyDown(KEY_A);; g.pos.x -= 2
+    if IsKeyDown(KEY_D);; g.pos.x += 2
+
+
+    BeginDrawing()
+    ClearBackground({100})
+    DrawText("Testing and stuff", 100, 100, 20, RAYWHITE)
+    for i := 0, i < guys.len, i += 1
+      it := guys.data + i
+      DrawCircleV(it.pos, 16, MAROON)
+    EndDrawing()
+
+  return 0
+
+
+
+
+
+

build/examples/polymorphism.core

@@ -1,16 +1,5 @@
 
-/*
-PushStruct :: (a: *MA.Arena, $T: Type): *$T
-	size := size_of(Type)
-	result := PushSize(a, size)
-	return result
-
-Array(int)
-
-QueueAddSLL(list: $List, node: $Node, first: #Identifier = first, last: #Identifier = last, next: #Identifier = next)
-
-ArrayAdd(array: $Array, item: $Item, data: #Identifier = data, len: #Identifier = len, len: #Identifier = cap)
-
+/* @todo
 QueueAddSLL(list: $List, node: $Node, $first = first, $last = last, $next = next)
 	if list.first == 0
 		list.first = list.last = node
@@ -100,8 +89,7 @@ main :: (argc: int, argv: **char): int
 	Add(&third_array, 32)
 	Add(&fourth, 32)
 	Add(&fifth, 32)
-	Add(&sixth, {32})
-	// Add(&seventh, {32, 32, 32})
+	// Add(&sixth, {32}) // @todo this is possible !
 
 	// value := PolyLambda(**int)
 	// PolyType_r1 := PolyType(10)

build/modules/raylib.core

@@ -0,0 +1,230 @@
+
+InitWindow :: #foreign (width: int, height: int, title: *char)
+WindowShouldClose :: #foreign (): Bool
+
+SetTargetFPS :: #foreign (fps: int)
+GetFPS :: #foreign (): int
+GetFrameTime :: #foreign (): F32
+GetTime :: #foreign (): F64
+
+BeginDrawing :: #foreign ()
+EndDrawing :: #foreign ()
+ClearBackground :: #foreign (color: Color)
+
+DrawCircle  :: #foreign (centerX: int, centerY: int, radius: F32, color: Color)
+DrawCircleV :: #foreign (center: Vector2, radius: F32, color: Color)
+
+DrawFPS :: #foreign (posX: int, posY: int)
+DrawText :: #foreign (text: *char, posX: int, posY: int, fontSize: int, color: Color)
+
+
+
+IsKeyDown :: #foreign (key: int): Bool
+IsKeyPressed :: #foreign (key: int): Bool
+IsKeyReleased :: #foreign (key: int): Bool
+IsKeyUp :: #foreign (key: int): Bool
+
+IsMouseButtonPressed :: #foreign (button: int): Bool
+IsMouseButtonDown :: #foreign (button: int): Bool
+IsMouseButtonReleased :: #foreign (button: int): Bool
+IsMouseButtonUp :: #foreign (button: int): Bool
+
+CloseWindow :: #foreign ()
+IsWindowReady :: #foreign ()
+
+Vector2 :: struct
+	x: F32
+	y: F32
+
+Vector3 :: struct
+	x: F32
+	y: F32
+	z: F32
+
+Vector4 :: struct
+	x: F32
+	y: F32
+	z: F32
+	w: F32
+
+Color :: struct
+	r: U8 // @todo: Add C types
+	g: U8
+	b: U8
+	a: U8
+
+Rectangle :: struct
+	x: F32
+	y: F32
+	width: F32
+	height: F32
+
+Image :: struct
+	data: *void
+	width: int
+	height: int
+	mipmaps: int
+	format: int
+
+Texture :: struct
+	id: U32 // @todo: Add C types
+	width: int
+	height: int
+	mipmaps: int
+	format: int
+Texture2D :: Texture
+
+
+// Some Basic Colors
+// NOTE: Custom raylib color palette for amazing visuals on WHITE background
+LIGHTGRAY  := Color{ 200, 200, 200, 255 }   // Light Gray
+GRAY       := Color{ 130, 130, 130, 255 }   // Gray
+DARKGRAY   := Color{ 80, 80, 80, 255 }      // Dark Gray
+YELLOW     := Color{ 253, 249, 0, 255 }     // Yellow
+GOLD       := Color{ 255, 203, 0, 255 }     // Gold
+ORANGE     := Color{ 255, 161, 0, 255 }     // Orange
+PINK       := Color{ 255, 109, 194, 255 }   // Pink
+RED        := Color{ 230, 41, 55, 255 }     // Red
+MAROON     := Color{ 190, 33, 55, 255 }     // Maroon
+GREEN      := Color{ 0, 228, 48, 255 }      // Green
+LIME       := Color{ 0, 158, 47, 255 }      // Lime
+DARKGREEN  := Color{ 0, 117, 44, 255 }      // Dark Green
+SKYBLUE    := Color{ 102, 191, 255, 255 }   // Sky Blue
+BLUE       := Color{ 0, 121, 241, 255 }     // Blue
+DARKBLUE   := Color{ 0, 82, 172, 255 }      // Dark Blue
+PURPLE     := Color{ 200, 122, 255, 255 }   // Purple
+VIOLET     := Color{ 135, 60, 190, 255 }    // Violet
+DARKPURPLE := Color{ 112, 31, 126, 255 }    // Dark Purple
+BEIGE      := Color{ 211, 176, 131, 255 }   // Beige
+BROWN      := Color{ 127, 106, 79, 255 }    // Brown
+DARKBROWN  := Color{ 76, 63, 47, 255 }      // Dark Brown
+WHITE      := Color{ 255, 255, 255, 255 }   // White
+BLACK      := Color{ 0, 0, 0, 255 }         // Black
+BLANK      := Color{ 0, 0, 0, 0 }           // Blank (Transparent)
+MAGENTA    := Color{ 255, 0, 255, 255 }     // Magenta
+RAYWHITE   := Color{ 245, 245, 245, 255 }   // My own White (raylib logo)
+
+
+KEY_NULL            :: 0        // Key: NULL, used for no key pressed
+// Alphanumeric keys
+KEY_APOSTROPHE      :: 39       // Key: '
+KEY_COMMA           :: 44       // Key: ,
+KEY_MINUS           :: 45       // Key: -
+KEY_PERIOD          :: 46       // Key: .
+KEY_SLASH           :: 47       // Key: /
+KEY_ZERO            :: 48       // Key: 0
+KEY_ONE             :: 49       // Key: 1
+KEY_TWO             :: 50       // Key: 2
+KEY_THREE           :: 51       // Key: 3
+KEY_FOUR            :: 52       // Key: 4
+KEY_FIVE            :: 53       // Key: 5
+KEY_SIX             :: 54       // Key: 6
+KEY_SEVEN           :: 55       // Key: 7
+KEY_EIGHT           :: 56       // Key: 8
+KEY_NINE            :: 57       // Key: 9
+KEY_SEMICOLON       :: 59       // Key: ;
+KEY_EQUAL           :: 61       // Key: ::
+KEY_A               :: 65       // Key: A | a
+KEY_B               :: 66       // Key: B | b
+KEY_C               :: 67       // Key: C | c
+KEY_D               :: 68       // Key: D | d
+KEY_E               :: 69       // Key: E | e
+KEY_F               :: 70       // Key: F | f
+KEY_G               :: 71       // Key: G | g
+KEY_H               :: 72       // Key: H | h
+KEY_I               :: 73       // Key: I | i
+KEY_J               :: 74       // Key: J | j
+KEY_K               :: 75       // Key: K | k
+KEY_L               :: 76       // Key: L | l
+KEY_M               :: 77       // Key: M | m
+KEY_N               :: 78       // Key: N | n
+KEY_O               :: 79       // Key: O | o
+KEY_P               :: 80       // Key: P | p
+KEY_Q               :: 81       // Key: Q | q
+KEY_R               :: 82       // Key: R | r
+KEY_S               :: 83       // Key: S | s
+KEY_T               :: 84       // Key: T | t
+KEY_U               :: 85       // Key: U | u
+KEY_V               :: 86       // Key: V | v
+KEY_W               :: 87       // Key: W | w
+KEY_X               :: 88       // Key: X | x
+KEY_Y               :: 89       // Key: Y | y
+KEY_Z               :: 90       // Key: Z | z
+KEY_LEFT_BRACKET    :: 91       // Key: [
+KEY_BACKSLASH       :: 92       // Key: '\'
+KEY_RIGHT_BRACKET   :: 93       // Key: ]
+KEY_GRAVE           :: 96       // Key: `
+// Function keys
+KEY_SPACE           :: 32       // Key: Space
+KEY_ESCAPE          :: 256      // Key: Esc
+KEY_ENTER           :: 257      // Key: Enter
+KEY_TAB             :: 258      // Key: Tab
+KEY_BACKSPACE       :: 259      // Key: Backspace
+KEY_INSERT          :: 260      // Key: Ins
+KEY_DELETE          :: 261      // Key: Del
+KEY_RIGHT           :: 262      // Key: Cursor right
+KEY_LEFT            :: 263      // Key: Cursor left
+KEY_DOWN            :: 264      // Key: Cursor down
+KEY_UP              :: 265      // Key: Cursor up
+KEY_PAGE_UP         :: 266      // Key: Page up
+KEY_PAGE_DOWN       :: 267      // Key: Page down
+KEY_HOME            :: 268      // Key: Home
+KEY_END             :: 269      // Key: End
+KEY_CAPS_LOCK       :: 280      // Key: Caps lock
+KEY_SCROLL_LOCK     :: 281      // Key: Scroll down
+KEY_NUM_LOCK        :: 282      // Key: Num lock
+KEY_PRINT_SCREEN    :: 283      // Key: Print screen
+KEY_PAUSE           :: 284      // Key: Pause
+KEY_F1              :: 290      // Key: F1
+KEY_F2              :: 291      // Key: F2
+KEY_F3              :: 292      // Key: F3
+KEY_F4              :: 293      // Key: F4
+KEY_F5              :: 294      // Key: F5
+KEY_F6              :: 295      // Key: F6
+KEY_F7              :: 296      // Key: F7
+KEY_F8              :: 297      // Key: F8
+KEY_F9              :: 298      // Key: F9
+KEY_F10             :: 299      // Key: F10
+KEY_F11             :: 300      // Key: F11
+KEY_F12             :: 301      // Key: F12
+KEY_LEFT_SHIFT      :: 340      // Key: Shift left
+KEY_LEFT_CONTROL    :: 341      // Key: Control left
+KEY_LEFT_ALT        :: 342      // Key: Alt left
+KEY_LEFT_SUPER      :: 343      // Key: Super left
+KEY_RIGHT_SHIFT     :: 344      // Key: Shift right
+KEY_RIGHT_CONTROL   :: 345      // Key: Control right
+KEY_RIGHT_ALT       :: 346      // Key: Alt right
+KEY_RIGHT_SUPER     :: 347      // Key: Super right
+KEY_KB_MENU         :: 348      // Key: KB menu
+// Keypad keys
+KEY_KP_0            :: 320      // Key: Keypad 0
+KEY_KP_1            :: 321      // Key: Keypad 1
+KEY_KP_2            :: 322      // Key: Keypad 2
+KEY_KP_3            :: 323      // Key: Keypad 3
+KEY_KP_4            :: 324      // Key: Keypad 4
+KEY_KP_5            :: 325      // Key: Keypad 5
+KEY_KP_6            :: 326      // Key: Keypad 6
+KEY_KP_7            :: 327      // Key: Keypad 7
+KEY_KP_8            :: 328      // Key: Keypad 8
+KEY_KP_9            :: 329      // Key: Keypad 9
+KEY_KP_DECIMAL      :: 330      // Key: Keypad .
+KEY_KP_DIVIDE       :: 331      // Key: Keypad /
+KEY_KP_MULTIPLY     :: 332      // Key: Keypad *
+KEY_KP_SUBTRACT     :: 333      // Key: Keypad -
+KEY_KP_ADD          :: 334      // Key: Keypad +
+KEY_KP_ENTER        :: 335      // Key: Keypad Enter
+KEY_KP_EQUAL        :: 336      // Key: Keypad ::
+// Android key buttons
+KEY_BACK            :: 4        // Key: Android back button
+KEY_MENU            :: 82       // Key: Android menu button
+KEY_VOLUME_UP       :: 24       // Key: Android volume up button
+KEY_VOLUME_DOWN     :: 25       // Key: Android volume down button
+
+
+MOUSE_BUTTON_LEFT    :: 0       // Mouse button left
+MOUSE_BUTTON_RIGHT   :: 1       // Mouse button right
+MOUSE_BUTTON_MIDDLE  :: 2       // Mouse button middle (pressed wheel)
+MOUSE_BUTTON_SIDE    :: 3       // Mouse button side (advanced mouse device)
+MOUSE_BUTTON_EXTRA   :: 4       // Mouse button extra (advanced mouse device)
+MOUSE_BUTTON_FORWARD :: 5       // Mouse button forward (advanced mouse device)
+MOUSE_BUTTON_BACK    :: 6       // Mouse button back (advanced mouse device)