73 lines
1.9 KiB
Perl
73 lines
1.9 KiB
Perl
|
Pform expansion should work in `exec` but also in `build`:
|
||
|
|
|
||
|
|
$ cat > dune-project << EOF
|
||
|
|
> (lang dune 3.10)
|
||
|
|
> (package (name public))
|
||
|
|
> EOF
|
||
|
|
$ cat > dune << EOF
|
||
|
|
> (executable (public_name public) (modules Public))
|
||
|
|
> (executable (name private) (modules Private))
|
||
|
|
> (env
|
||
|
|
> (_ (binaries (private.exe as priv))))
|
||
|
|
> EOF
|
||
|
|
|
||
|
|
The executables in question just display what they are:
|
||
|
|
|
||
|
|
$ cat > public.ml << EOF
|
||
|
|
> let () = print_endline "Public"
|
||
|
|
> EOF
|
||
|
|
$ cat > private.ml << EOF
|
||
|
|
> let () = print_endline "Private"
|
||
|
|
> EOF
|
||
|
|
|
||
|
|
We also have a subfolder `foo`
|
||
|
|
|
||
|
|
$ mkdir foo
|
||
|
|
$ cat > foo/dune << EOF
|
||
|
|
> (executable (public_name blah))
|
||
|
|
> (env
|
||
|
|
> (_ (binaries (blah.exe as foo))))
|
||
|
|
> EOF
|
||
|
|
$ cat > foo/blah.ml << EOF
|
||
|
|
> let () = print_endline "Blah"
|
||
|
|
> EOF
|
||
|
|
|
||
|
|
Making Dune build the executables should work without error messages:
|
||
|
|
|
||
|
|
$ dune build %{bin:public}
|
||
|
|
Error: File unavailable:
|
||
|
|
$TESTCASE_ROOT/../install/default/bin/public
|
||
|
|
[1]
|
||
|
|
$ ls _build/default/public.exe
|
||
|
|
_build/default/public.exe
|
||
|
|
|
||
|
|
Building the private executable should also work.
|
||
|
|
|
||
|
|
$ dune build %{bin:private}
|
||
|
|
File "command line", line 1, characters 0-14:
|
||
|
|
Error: Program private not found in the tree or in PATH
|
||
|
|
(context: default)
|
||
|
|
[1]
|
||
|
|
$ ls _build/default/private.exe > /dev/null 2>&1 || return 1
|
||
|
|
[1]
|
||
|
|
|
||
|
|
Building the private executable via the env alias should work too:
|
||
|
|
|
||
|
|
$ dune build %{bin:priv}
|
||
|
|
|
||
|
|
$ (cd foo && dune build --root .. %{bin:priv}) # should work
|
||
|
|
Entering directory '..'
|
||
|
|
Leaving directory '..'
|
||
|
|
$ dune build %{bin:foo} # doesn't work because foo is underneath us
|
||
|
|
File "command line", line 1, characters 0-10:
|
||
|
|
Error: Program foo not found in the tree or in PATH
|
||
|
|
(context: default)
|
||
|
|
[1]
|
||
|
|
$ (cd foo && dune build --root .. %{bin:foo}) # should work
|
||
|
|
Entering directory '..'
|
||
|
|
File "command line", line 1, characters 0-10:
|
||
|
|
Error: Program foo not found in the tree or in PATH
|
||
|
|
(context: default)
|
||
|
|
Leaving directory '..'
|
||
|
|
[1]
|