unikernel/duniverse/dune_/test/blackbox-tests/test-cases/coq/coqpp.t/dune-project

@@ -0,0 +1,2 @@
+(lang dune 3.7)
+(using coq 0.7)

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/coq/coqpp.t/gram.mlg

@@ -0,0 +1,9 @@
+DECLARE PLUGIN "cplugin.ml_plugin_a"
+
+{
+
+(* We don't use any coqpp specific macros as to make the test more
+   resilient on different Coq versions *)
+let foo = 3
+
+}

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/coq/coqpp.t/marg.mlg

@@ -0,0 +1,4 @@
+DECLARE PLUGIN "cplugin.ml_plugin_b"
+{
+  let bar = Gram.foo + 4
+}

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/coq/coqpp.t/run.t

@@ -0,0 +1,82 @@
+Testing the coqpp stanza
+
+  $ cat > dune << EOF
+  > (coq.pp
+  >  (modules gram))
+  > (library
+  >  (name foo)
+  >  (flags -rectypes)
+  >  (libraries coq-core.vernac))
+  > EOF
+
+  $ ls
+  dune
+  dune-project
+  gram.mlg
+  marg.mlg
+
+  $ dune build
+
+  $ ls _build/default/
+  foo.a
+  foo.cma
+  foo.cmxa
+  foo.cmxs
+  foo.ml-gen
+  gram.ml
+  gram.mlg
+
+Testing the :standard field with a .mlg file depending on another .mlg file
+  $ cat > dune << EOF
+  > (coq.pp
+  >  (modules :standard))
+  > (library
+  >  (name foo)
+  >  (flags -rectypes)
+  >  (libraries coq-core.vernac))
+  > EOF
+
+  $ ls
+  _build
+  dune
+  dune-project
+  gram.mlg
+  marg.mlg
+
+  $ dune build
+
+  $ ls _build/default/
+  foo.a
+  foo.cma
+  foo.cmxa
+  foo.cmxs
+  foo.ml-gen
+  gram.ml
+  gram.mlg
+  marg.ml
+  marg.mlg
+
+Same again but with one .mlg file removed
+  $ cat > dune << EOF
+  > (coq.pp
+  >  (modules :standard \ gram))
+  > (library
+  >  (name foo)
+  >  (flags -rectypes)
+  >  (libraries coq-core.vernac))
+  > EOF
+
+  $ dune build
+  File "marg.mlg", line 3, characters 12-20:
+  Error: Unbound module Gram
+  [1]
+
+  $ ls _build/default/
+  foo.a
+  foo.cma
+  foo.cmxa
+  foo.cmxs
+  foo.ml-gen
+  gram.mlg
+  marg.ml
+  marg.mlg