Anonymous user
Window creation: Difference between revisions
m
→{{header|OCaml}}: minor updates
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: XUL is no longer supported by Mozilla, consolidate to just Gtk3) |
m (→{{header|OCaml}}: minor updates) |
||
Line 1,526:
{{libheader|ocaml-sfml}}
<lang
let app = SFRenderWindow.make (640, 480) "OCaml-SFML Windowing" in
let rec loop () =
let continue =
match SFRenderWindow.
| Some SFEvent.Closed -> false
| _ -> true
Line 1,537:
SFRenderWindow.clear app SFColor.black;
SFRenderWindow.display app;
if continue then loop ()
in
loop ()></lang>
execute with:
ocaml
{{libheader|OCaml-Xlib}}
Line 1,558:
execute with:
ocaml -I +Xlib Xlib.cma sample.ml
=={{header|OpenEdge ABL/Progress 4GL}}==
|