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

View file

@ -0,0 +1,3 @@
(executables
(names foo)
(libraries dune-action-plugin dune-glob))

View file

@ -0,0 +1,12 @@
open Dune_action_plugin.V1
module Glob = Dune_glob.V1
let action =
let open Dune_action_plugin.V1.O in
let+ listing =
read_directory_with_glob ~glob:Glob.universal ~path:(Path.of_string "some_dir")
in
String.concat "\n" listing |> print_endline
;;
let () = run action

View file

@ -0,0 +1,3 @@
(cram
(deps
(glob_files bin/*.exe)))

View file

@ -0,0 +1,38 @@
This test checks that executable that uses 'dynamic-run'
and depends on directory listing forces all targets in that
directory to be build.
$ cat > dune-project << EOF
> (lang dune 2.0)
> (using action-plugin 0.1)
> EOF
$ cat > dune << EOF
> (rule
> (alias runtest)
> (action (dynamic-run ./foo.exe)))
> EOF
$ mkdir some_dir
$ cat > some_dir/dune << EOF
> (rule
> (target some_file1)
> (action (with-stdout-to %{target} (echo ""))))
> \
> (rule
> (target some_file2)
> (action (with-stdout-to %{target} (echo ""))))
> \
> (rule
> (target some_file3)
> (action (with-stdout-to %{target} (echo ""))))
> EOF
$ cp ./bin/foo.exe ./
$ dune runtest
dune
some_file1
some_file2
some_file3