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

5
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/dune Normal file
View file

@ -0,0 +1,5 @@
(melange.emit
(target private-module)
(modules foo)
(emit_stdlib false)
(libraries lib))

3
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/dune-project Normal file
View file

@ -0,0 +1,3 @@
(lang dune 3.8)
(using melange 0.1)

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/foo.ml Normal file
View file

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

7
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/run.t Normal file
View file

@ -0,0 +1,7 @@
X is not accessible as it is private
$ dune build private-module/foo.js
File "foo.ml", line 1, characters 0-9:
1 | Lib.X.run ();;
^^^^^^^^^
Error: The module Lib.X is an alias for module Lib__X, which is missing
[1]

4
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/with-private/dune Normal file
View file

@ -0,0 +1,4 @@
(library
(name lib)
(modes melange)
(private_modules x))

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/with-private/x.ml Normal file
View file

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

1
unikernel/duniverse/dune_/test/blackbox-tests/test-cases/melange/private-module.t/with-private/y.ml Normal file
View file

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