Add initial test

ocaml/test/gilded_rose.ml

@@ -0,0 +1,11 @@
+open Gilded_rose
+
+let test () =
+  let items = Items.v ~items:[ Item.v "Foo" 10 20 ] () in
+  Alcotest.(check string)
+    "Broken test" "Fixme"
+    (List.hd items |> fun item -> item.name)
+
+let () =
+  let open Alcotest in
+  run "Gilded Rose" [ ("Our first test", [ test_case "fixme" `Quick test ]) ]