Window creation: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,620: / Line 1,620: @@
 execute with:
  ocaml -I +Xlib Xlib.cma sample.ml
+=={{header|Odin}}==
+<syntaxhighlight lang="odin">package main
+import "vendor:sdl2"
+main :: proc() {
+  using sdl2
+  window: ^Window = ---
+  renderer: ^Renderer = ---
+  event: Event = ---
+  Init(INIT_VIDEO)
+  CreateWindowAndRenderer(
+, 480,
+    WINDOW_SHOWN,
+    &window, &renderer
+  )
+  SetWindowTitle(window, "Empty window")
+  RenderPresent(renderer)
+  for event.type != .QUIT {
+    Delay(10)
+    PollEvent(&event)
+  }
+  DestroyRenderer(renderer)
+  DestroyWindow(window)
+  Quit()
+}</syntaxhighlight>
 =={{header|OpenEdge ABL/Progress 4GL}}==