[Krobot-commits] [SCM] krobot branch, master, updated. eba0bca6e5256da9fb4defc48157e10ea1a7f517

[Jérémie D. <Ba...@us...>]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "krobot".

The branch, master has been updated
       via  eba0bca6e5256da9fb4defc48157e10ea1a7f517 (commit)
      from  8fe2c0254889142a8965c9132a825851b65b4d6d (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit eba0bca6e5256da9fb4defc48157e10ea1a7f517
Author: Jérémie Dimino <je...@di...>
Date:   Sun Feb 14 17:32:00 2010 +0100

    Add tests/double_move.ml

-----------------------------------------------------------------------

Changes:
diff --git a/PC_Mainboard/tests/double_move.ml b/PC_Mainboard/tests/double_move.ml
new file mode 100644
index 0000000..b0758b4
--- /dev/null
+++ b/PC_Mainboard/tests/double_move.ml
@@ -0,0 +1,25 @@
+(*
+ * double_move.ml
+ * --------------
+ * Copyright : (c) 2010, Jeremie Dimino <je...@di...>
+ * Licence   : BSD3
+ *
+ * This file is a part of [kro]bot.
+ *)
+
+open Lwt
+
+let print_result = function
+  | `OK -> print_endline "ok"
+  | `Stopped -> print_endline "stopped"
+
+lwt () =
+  lwt krobot = Krobot.create () in
+  print_endline "first move";
+  lwt result = Krobot.move krobot ~dist:(-500) ~speed:100 ~acc:200 in
+  print_result result;
+  print_endline "second move";
+  lwt result = Krobot.move krobot ~dist:200 ~speed:100 ~acc:200 in
+  print_result result;
+  print_endline "done";
+  return ()


hooks/post-receive
-- 
krobot