Permalink
Browse files

sleep -> hello

  • Loading branch information...
1 parent 146f3bf commit da8169b830ad4103e39de30ec198e40293e3ed8a @avsm committed Sep 21, 2011
Showing with 9 additions and 0 deletions.
  1. +9 −0 examples/hello/hello.ml
View
@@ -0,0 +1,9 @@
+open Lwt
+open Printf
+
+let main () =
+ OS.Console.log "Hello Mirage World!";
+ for_lwt i = 1 to 10 do
+ OS.Console.log (sprintf "Nap time %d" i);
+ OS.Time.sleep 1.0
+ done

0 comments on commit da8169b

Please sign in to comment.