unikernel/duniverse/dune_/test/blackbox-tests/test-cases/exec-watch/exec-pwd.t/bin/dune

@@ -0,0 +1,2 @@
+(executable
+ (name main))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/exec-watch/exec-pwd.t/dune-project

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

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/exec-watch/exec-pwd.t/run.t

@@ -0,0 +1,27 @@
+  $ export OUTPUT=output.txt
+
+In normal (non-watching) mode, pwd is the folder from which dune is launched
+  $ cd bin
+  $ dune exec --root .. -- pwd > $OUTPUT
+  Entering directory '..'
+  Leaving directory '..'
+  $ cat $OUTPUT
+  $TESTCASE_ROOT/bin
+  $ rm -rf $OUTPUT
+  $ cd ..
+
+In watch mode, pwd is also the folder from which dune is launched.
+  $ cd bin
+  $ dune exec --root .. -w -- pwd > $OUTPUT &
+  Entering directory '..'
+  Success, waiting for filesystem changes...
+  Leaving directory '..'
+  $ PID=$!
+  $ until test -s $OUTPUT; do sleep 0.1; done;
+  $ kill $PID
+  $ wait $PID
+  [130]
+  $ cat $OUTPUT
+  $TESTCASE_ROOT/bin
+  $ rm -rf $OUTPUT
+  $ cd ..