/*

:\odin-v0.0.1a\code\zak.odin(10:8) Syntax Error: Expected `;` after assign statement, got `=`

*/

#import "fmt.odin"
#import "win32.odin"

main :: proc()
{
    WindowClass: win32.WNDCLASSEXA
    WindowClass = WNDCLASSEXA
    {
        size = sizeof(WNDCLASSEXA),
	style = CS_HREDRAW|CS_VREDRAW,
	lpfnWndProc  = Win32MainWindowCallback,
	instance = GetModuleHandleA(0),
	class_name = "ThisIsAFuckingOdinWindowClass"
    };

    if RegisterClassExA(WindowClass) == 1
    {
        Window: win32.HWND
	Window = CreateWindowEx(0,
	                        WindowClass.class_name,
				"A Fucking Odin Window",
				WS_OVERLAPPEDWINDOW,
				CW_USEDEFAULT, CW_USEDEFAULT,
				1280, 720,
				0, 0, GetModuleHandle(0), 0)

        if Window != null
	{
	   running := true

           for running
	   {
	       message: MSG

	       for PeekMessageA(^Message, 0, 0, 0, PM_REMOVE) > 0
	       {
	           TranslateMessage(^Message)
		   DispatchMessagea(^Message)
               }
           }
        }
	else
	{
	     // TODO(zak): Logging
        }
    }
    else
    {
	// TODO(zak): Logging
    }
}