Add test for #657

ocaml · Mar 27, 2018 · daef49c · daef49c
1 parent 103af86
commit daef49c
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 2 deletions.
diff --git a/test/blackbox-tests/test-cases/merlin-tests/lib/jbuild b/test/blackbox-tests/test-cases/merlin-tests/lib/jbuild
@@ -1,4 +1,10 @@
 (library
  ((name foo)
   (libraries (bytes unix findlib))
+  (modules ())
+  (preprocess (pps (fooppx)))))
+
+(library
+ ((name bar)
+  (modules ())
   (preprocess (pps (fooppx)))))
diff --git a/test/blackbox-tests/test-cases/merlin-tests/run.t b/test/blackbox-tests/test-cases/merlin-tests/run.t
@@ -17,13 +17,18 @@
   S $LIB_PREFIX/lib/findlib
   S $LIB_PREFIX/lib/ocaml
   # Processing lib/.merlin
+  B ../_build/default/lib/.bar.objs
   B ../_build/default/lib/.foo.objs
   B $LIB_PREFIX/lib/bytes
   B $LIB_PREFIX/lib/findlib
   B $LIB_PREFIX/lib/ocaml
-  FLG -open Foo -w -40
-  FLG -ppx '$PPX/fooppx@/ppx.exe --as-ppx --cookie '\''library-name="foo"'\'''
+  FLG -open Foo -w -40 -open Bar -w -40
   S .
   S $LIB_PREFIX/lib/bytes
   S $LIB_PREFIX/lib/findlib
   S $LIB_PREFIX/lib/ocaml
+
+Make sure a ppx directive is generated
+
+  $ grep -q ppx lib/.merlin
+  [1]