swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

7
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/dune Normal file
View file

@ -0,0 +1,7 @@
(executable
(name foo)
(libraries lib))
(alias
(name default)
(action (run ./foo.exe)))

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/dune-project Normal file
View file

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

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/foo.ml Normal file
View file

@ -0,0 +1 @@
X.run ();;

6
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/run.t Normal file
View file

@ -0,0 +1,6 @@
$ dune build
File "foo.ml", line 1, characters 0-5:
1 | X.run ();;
^^^^^
Error: Unbound module X
[1]

4
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/with-private/dune Normal file
View file

@ -0,0 +1,4 @@
(library
(name lib)
(wrapped false)
(private_modules x))

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/private-modules/inaccessible-in-deps.t/with-private/x.ml Normal file
View file

@ -0,0 +1 @@
let run () = print_endline "private"