Add blackbox test for select construct (#363)

test/blackbox-tests/jbuild

@@ -128,3 +128,9 @@
    (chdir test-cases/odoc
     (setenv JBUILDER ${bin:jbuilder} (run ${exe:cram.exe} -ocamlv ${ocaml_version} -skip-versions 4.02.3 run.t))))))
 
+(alias
+ ((name runtest)
+  (deps ((files_recursively_in test-cases/select)))
+  (action
+   (chdir test-cases/select
+    (setenv JBUILDER ${bin:jbuilder} (run ${exe:cram.exe} run.t))))))

test/blackbox-tests/test-cases/select/bar_no_unix.ml

@@ -0,0 +1 @@
+let message = "bar has no unix"

test/blackbox-tests/test-cases/select/bar_unix.ml

@@ -0,0 +1 @@
+let message = "bar has unix"

test/blackbox-tests/test-cases/select/foo_fake.ml

@@ -0,0 +1 @@
+let message = "foo has fake"

test/blackbox-tests/test-cases/select/foo_no_fake.ml

@@ -0,0 +1 @@
+let message = "foo has no fake"

test/blackbox-tests/test-cases/select/jbuild

@@ -0,0 +1,16 @@
+(jbuild_version 1)
+
+(executable
+ ((name main)
+  (libraries
+   ((select bar.ml from
+     (unix -> bar_unix.ml)
+     (!unix -> bar_no_unix.ml))
+    (select foo.ml from
+     (fakefoobar -> foo_fake.ml)
+     (!fakefoobar -> foo_no_fake.ml))))))
+
+(alias
+ ((name runtest)
+  (deps (main.exe))
+  (action (run ${<}))))

test/blackbox-tests/test-cases/select/main.ml

@@ -0,0 +1,2 @@
+print_endline Bar.message;;
+print_endline Foo.message;;

test/blackbox-tests/test-cases/select/run.t

@@ -0,0 +1,12 @@
+  $ $JBUILDER runtest -j1 --root .
+      ocamldep main.depends.ocamldep-output
+        ocamlc bar.{cmi,cmo,cmt}
+        ocamlc foo.{cmi,cmo,cmt}
+      ocamlopt bar.{cmx,o}
+      ocamlopt foo.{cmx,o}
+        ocamlc main.{cmi,cmo,cmt}
+      ocamlopt main.{cmx,o}
+      ocamlopt main.exe
+          main alias runtest
+  bar has unix
+  foo has no fake