Skip to content

Commit

Permalink
test: demonstrate cinaps rules bug (#7898)
Browse files Browse the repository at this point in the history
The cinaps rules will run the promotions sequentially, and will stop
once they find one that fails.

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
  • Loading branch information
rgrinberg authored Jun 6, 2023
1 parent bbe3d1f commit b7413e5
Showing 1 changed file with 30 additions and 0 deletions.
30 changes: 30 additions & 0 deletions test/blackbox-tests/test-cases/cinaps/concurrent-promotions.t
Original file line number Diff line number Diff line change
@@ -0,0 +1,30 @@
Cinaps should offer all promotions at once

$ cat > dune-project <<EOF
> (lang dune 3.8)
> (using cinaps 1.3)
> EOF

$ cat > t1.ml <<"EOF"
> (*$ print_endline "\nhello" *)
> (*$*)
> let x = 1
> EOF

$ cat > t2.ml <<"EOF"
> (*$ print_endline "\nhello" *)
> (*$*)
> let x = 1
> EOF

$ cat >dune <<EOF
> (cinaps
> (files *.ml)
> (alias cinaps))
> EOF

$ dune build @cinaps
File "t1.ml", line 1, characters 0-0:
Error: Files _build/default/t1.ml and _build/default/t1.ml.cinaps-corrected
differ.
[1]

0 comments on commit b7413e5

Please sign in to comment.