swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Browse source
This commit is contained in:
swrup 2025-11-11 02:07:51 +01:00
parent aa2ff7b2f0
commit 2f3113f55d
11742 changed files with 1223940 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

13
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/merlin/github1946.t/dune Normal file
View file

@ -0,0 +1,13 @@
(library
(name usesppx1)
(modules ())
(preprocess (pps ppx1)))
(library
(name usesppx2)
(modules ())
(preprocess (pps ppx2)))
(alias
(name default)
(action (echo %{read:.merlin-conf})))

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/merlin/github1946.t/dune-project Normal file
View file

@ -0,0 +1 @@
(lang dune 1.8)

3
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/merlin/github1946.t/ppx1/dune Normal file
View file

@ -0,0 +1,3 @@
(library
(name ppx1)
(kind ppx_rewriter))

3
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/merlin/github1946.t/ppx2/dune Normal file
View file

@ -0,0 +1,3 @@
(library
(name ppx2)
(kind ppx_rewriter))

60
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/merlin/github1946.t/run.t Normal file
View file

@ -0,0 +1,60 @@
This test demonstrates that -ppx is no more missing when two stanzas are
in the same dune file, but require different ppx specifications
$ ocamlc_where="$(ocamlc -where)"
$ export BUILD_PATH_PREFIX_MAP="/OCAMLC_WHERE=$ocamlc_where:$BUILD_PATH_PREFIX_MAP"
$ dune build @all --profile release
$ dune ocaml merlin dump-config $PWD
Usesppx1: _build/default/usesppx1
((INDEX $TESTCASE_ROOT/_build/default/.usesppx2.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/.usesppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx1/.ppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx2/.ppx2.objs/cctx.ocaml-index)
(STDLIB /OCAMLC_WHERE)
(SOURCE_ROOT $TESTCASE_ROOT)
(EXCLUDE_QUERY_DIR)
(B $TESTCASE_ROOT/_build/default/.usesppx1.objs/byte)
(S $TESTCASE_ROOT)
(FLG (-w -40 -g))
(FLG (-ppx "$TESTCASE_ROOT/_build/default/.ppx/e5a600482cb65dfcb14104c728a9df4a/ppx.exe --as-ppx --cookie 'library-name="usesppx1"'"))
(UNIT_NAME usesppx1))
Usesppx1: _build/default/usesppx1.ml-gen
((INDEX $TESTCASE_ROOT/_build/default/.usesppx2.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/.usesppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx1/.ppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx2/.ppx2.objs/cctx.ocaml-index)
(STDLIB /OCAMLC_WHERE)
(SOURCE_ROOT $TESTCASE_ROOT)
(EXCLUDE_QUERY_DIR)
(B $TESTCASE_ROOT/_build/default/.usesppx1.objs/byte)
(S $TESTCASE_ROOT)
(FLG (-w -40 -g))
(FLG (-ppx "$TESTCASE_ROOT/_build/default/.ppx/e5a600482cb65dfcb14104c728a9df4a/ppx.exe --as-ppx --cookie 'library-name="usesppx1"'"))
(UNIT_NAME usesppx1))
Usesppx2: _build/default/usesppx2
((INDEX $TESTCASE_ROOT/_build/default/.usesppx2.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/.usesppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx1/.ppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx2/.ppx2.objs/cctx.ocaml-index)
(STDLIB /OCAMLC_WHERE)
(SOURCE_ROOT $TESTCASE_ROOT)
(EXCLUDE_QUERY_DIR)
(B $TESTCASE_ROOT/_build/default/.usesppx2.objs/byte)
(S $TESTCASE_ROOT)
(FLG (-w -40 -g))
(FLG (-ppx "$TESTCASE_ROOT/_build/default/.ppx/f455412d08561f269148a48a55f3aef7/ppx.exe --as-ppx --cookie 'library-name="usesppx2"'"))
(UNIT_NAME usesppx2))
Usesppx2: _build/default/usesppx2.ml-gen
((INDEX $TESTCASE_ROOT/_build/default/.usesppx2.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/.usesppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx1/.ppx1.objs/cctx.ocaml-index)
(INDEX $TESTCASE_ROOT/_build/default/ppx2/.ppx2.objs/cctx.ocaml-index)
(STDLIB /OCAMLC_WHERE)
(SOURCE_ROOT $TESTCASE_ROOT)
(EXCLUDE_QUERY_DIR)
(B $TESTCASE_ROOT/_build/default/.usesppx2.objs/byte)
(S $TESTCASE_ROOT)
(FLG (-w -40 -g))
(FLG (-ppx "$TESTCASE_ROOT/_build/default/.ppx/f455412d08561f269148a48a55f3aef7/ppx.exe --as-ppx --cookie 'library-name="usesppx2"'"))
(UNIT_NAME usesppx2))