Make test illustrate quoting better

Signed-off-by: Ulysse Gérard <[email protected]>
ocaml · Feb 19, 2021 · 9230bcf · 9230bcf
1 parent 6c9125f
commit 9230bcf
Show file tree

Hide file tree

Showing 6 changed files with 8 additions and 8 deletions.
diff --git a/...st-cases/merlin/dump-dot-merlin.t/pp/dune → ...t-cases/merlin/dump-dot-merlin.t/p p/dune b/...st-cases/merlin/dump-dot-merlin.t/pp/dune → ...t-cases/merlin/dump-dot-merlin.t/p p/dune
diff --git a/...t-cases/merlin/dump-dot-merlin.t/pp/pp.ml → ...-cases/merlin/dump-dot-merlin.t/p p/pp.ml b/...t-cases/merlin/dump-dot-merlin.t/pp/pp.ml → ...-cases/merlin/dump-dot-merlin.t/p p/pp.ml
diff --git a/test/blackbox-tests/test-cases/merlin/dump-dot-merlin.t/run.t b/test/blackbox-tests/test-cases/merlin/dump-dot-merlin.t/run.t
@@ -1,18 +1,18 @@
   $ dune build
-  $ dune ocaml dump-dot-merlin |
+  $ dune ocaml dump-dot-merlin src\ with\ spaces |
   > sed 's#'$(opam config var prefix)'#OPAM_PREFIX#'
   EXCLUDE_QUERY_DIR
   STDLIB OPAM_PREFIX/lib/ocaml
-  B $TESTCASE_ROOT/_build/default/.foo.eobjs/byte
-  S $TESTCASE_ROOT
-  # FLG -pp $TESTCASE_ROOT/_build/default/pp/pp.exe
+  B $TESTCASE_ROOT/_build/default/src with spaces/.foo.eobjs/byte
+  S $TESTCASE_ROOT/src with spaces
+  # FLG -pp ''\''$TESTCASE_ROOT/_build/default/p p/pp.exe'\'''
   # FLG -open Dune__exe -w @[email protected]@30..39@[email protected]@[email protected] -strict-sequence -strict-formats -short-paths -keep-locs
   
-  $ dune ocaml dump-dot-merlin "pp" |
+  $ dune ocaml dump-dot-merlin "p p" |
   > sed 's#'$(opam config var prefix)'#OPAM_PREFIX#'
   EXCLUDE_QUERY_DIR
   STDLIB OPAM_PREFIX/lib/ocaml
-  B $TESTCASE_ROOT/_build/default/pp/.pp.eobjs/byte
-  S $TESTCASE_ROOT/pp
+  B $TESTCASE_ROOT/_build/default/p p/.pp.eobjs/byte
+  S $TESTCASE_ROOT/p p
   # FLG -w @[email protected]@30..39@[email protected]@[email protected] -strict-sequence -strict-formats -short-paths -keep-locs
   
diff --git a/...est-cases/merlin/dump-dot-merlin.t/bar.ml → .../dump-dot-merlin.t/src with spaces/bar.ml b/...est-cases/merlin/dump-dot-merlin.t/bar.ml → .../dump-dot-merlin.t/src with spaces/bar.ml
diff --git a/.../test-cases/merlin/dump-dot-merlin.t/dune → ...in/dump-dot-merlin.t/src with spaces/dune b/.../test-cases/merlin/dump-dot-merlin.t/dune → ...in/dump-dot-merlin.t/src with spaces/dune
@@ -1,3 +1,3 @@
 (executables (names foo bar)
  (preprocess (per_module
-  ((action (run pp/pp.exe %{input-file})) bar))))
+  ((action (run "p p/pp.exe"%{input-file})) bar))))
diff --git a/...est-cases/merlin/dump-dot-merlin.t/foo.ml → .../dump-dot-merlin.t/src with spaces/foo.ml b/...est-cases/merlin/dump-dot-merlin.t/foo.ml → .../dump-dot-merlin.t/src with spaces/foo.ml