Add a test that staging area isn't used for normal [diff]

Signed-off-by: Arseniy Alekseyev <aalekseyev@janestreet.com>
ocaml · Aug 2, 2019 · efa9868 · efa9868
1 parent 19a3f21
commit efa9868
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 0 deletions.
diff --git a/test/blackbox-tests/test-cases/promote/dune b/test/blackbox-tests/test-cases/promote/dune
@@ -4,6 +4,8 @@
  (name blah)
  (action (diff x x.gen)))
 
+(rule (with-stdout-to x.gen.copy (cat x.gen)))
+
 (rule (with-stdout-to y.gen (echo "titi")))
 
 (alias

diff --git a/test/blackbox-tests/test-cases/promote/run.t b/test/blackbox-tests/test-cases/promote/run.t
@@ -19,6 +19,20 @@ General tests
   $ cat x
   toto
 
+The correction file stays on the filesystem even after promotion and
+can be depended on by other actions.
+
+  $ cat _build/default/x.gen
+  toto
+
+  $ printf titi > x
+  $ dune build --display short @blah x.gen.copy
+  File "x", line 1, characters 0-0:
+  Error: Files _build/default/x and _build/default/x.gen differ.
+  [1]
+  $ cat _build/default/x.gen.copy
+  toto
+
 Otherwise this test fails on OSX
   $ dune clean --display short