mte/unikernel/duniverse/dune_/test/blackbox-tests/test-cases/top-module/load-from-lib.t

69 lines
1.9 KiB
Perl
Raw Normal View History

2025-11-11 02:07:51 +01:00
We try to load a module defined in a library with a dependency
$ cat >dune-project <<EOF
> (lang dune 3.3)
> EOF
$ mkdir foo
$ cd foo
$ cat >bar.ml <<EOF
> let v = 42
> EOF
$ cat >foo.ml <<EOF
> let foo = Bar.v + 42
> EOF
$ cat >dune <<EOF
> (library
> (libraries mydummylib)
> (name foo))
> EOF
$ cd ..
$ mkdir mydummylib
$ cd mydummylib
$ cat >dune <<EOF
> (library (name mydummylib))
> EOF
$ touch mydummylib.ml
$ touch blabla.ml
$ cd ..
$ dune ocaml top-module foo/foo.ml
#directory "$TESTCASE_ROOT/_build/default/.topmod/foo/foo.ml";;
#directory "$TESTCASE_ROOT/_build/default/mydummylib/.mydummylib.objs/byte";;
#load "$TESTCASE_ROOT/_build/default/mydummylib/mydummylib.cma";;
#load "$TESTCASE_ROOT/_build/default/foo/.foo.objs/byte/foo__.cmo";;
#load "$TESTCASE_ROOT/_build/default/foo/.foo.objs/byte/foo__Bar.cmo";;
#load "$TESTCASE_ROOT/_build/default/.topmod/foo/foo.ml/foo.cmo";;
open Foo__
;;
$ ls _build/default/.topmod/foo/foo.ml
foo.cmi
foo.cmo
foo__.cmi
foo__Bar.cmi
$ ls _build/default/mydummylib/.mydummylib.objs/byte/*.cmi
_build/default/mydummylib/.mydummylib.objs/byte/mydummylib.cmi
_build/default/mydummylib/.mydummylib.objs/byte/mydummylib__.cmi
_build/default/mydummylib/.mydummylib.objs/byte/mydummylib__Blabla.cmi
$ ls _build/default/mydummylib/*.cma
_build/default/mydummylib/mydummylib.cma
$ dune ocaml top-module $PWD/foo/foo.ml
#directory "$TESTCASE_ROOT/_build/default/.topmod/foo/foo.ml";;
#directory "$TESTCASE_ROOT/_build/default/mydummylib/.mydummylib.objs/byte";;
#load "$TESTCASE_ROOT/_build/default/mydummylib/mydummylib.cma";;
#load "$TESTCASE_ROOT/_build/default/foo/.foo.objs/byte/foo__.cmo";;
#load "$TESTCASE_ROOT/_build/default/foo/.foo.objs/byte/foo__Bar.cmo";;
#load "$TESTCASE_ROOT/_build/default/.topmod/foo/foo.ml/foo.cmo";;
open Foo__
;;