Add a linking and type equality tests

.gitignore

@@ -1,3 +1,4 @@
 _build
 camlpstreams.opam
 *~
+dune-workspace

dune-workspace.dev

@@ -0,0 +1,16 @@
+(lang dune 1.0)
+(context default)
+; Test on all 4.x versions as well
+(context (opam (switch 4.02)))
+(context (opam (switch 4.03)))
+(context (opam (switch 4.04)))
+(context (opam (switch 4.05)))
+(context (opam (switch 4.06)))
+(context (opam (switch 4.07)))
+(context (opam (switch 4.08)))
+(context (opam (switch 4.09)))
+(context (opam (switch 4.10)))
+(context (opam (switch 4.11)))
+(context (opam (switch 4.12)))
+(context (opam (switch 4.13)))
+(context (opam (switch 4.14)))

test/dune

@@ -0,0 +1,41 @@
+(library
+  (name stream_stdlib)
+  (flags :standard -w -3)
+  (modules stream_stdlib)
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(library
+  (name stream_camlp_streams)
+  (libraries camlp-streams)
+  (modules stream_camlp_streams))
+
+(executable
+  (name equality)
+  (libraries stream_stdlib stream_camlp_streams)
+  (modules equality)
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(rule
+  (action (with-stdout-to equality.output (run ./equality.exe)))
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(rule
+  (alias runtest)
+  (action (diff equality.expected equality.output))
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(executable
+  (name linking)
+  (libraries camlp-streams stream_stdlib)
+  (modules linking)
+  (flags :standard -w -3)
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(rule
+  (action (with-stdout-to issue4.output (run ./linking.exe)))
+  (enabled_if (< %{ocaml_version} 5.0)))
+
+(rule
+  (alias runtest)
+  (action (diff issue4.expected issue4.output))
+  (enabled_if (< %{ocaml_version} 5.0)))

test/equality.ml

@@ -0,0 +1,6 @@
+(* Test type equality between a library using camlp-streams and one using
+   Stdlib.Stream *)
+
+let () =
+  Stream.empty Stream_stdlib.stream;
+  Stream.empty Stream_camlp_streams.stream

test/linking.ml

@@ -0,0 +1,6 @@
+(* Test that we can link programs using libraries which use Stream.t but don't
+   necessarily use camlp-streams. Test is most relevant on 4.02-4.06 before the
+   Stdlib module was introduced. *)
+
+let () =
+  Stream.(empty (Stream.of_list Stream_stdlib.list))

test/stream_camlp_streams.ml

@@ -0,0 +1 @@
+let stream = Stream.of_list ([] : unit list)

test/stream_stdlib.ml

@@ -0,0 +1,2 @@
+let list = ([] : unit list)
+let stream = Stream.of_list list