OCamllabs icon Home|Differences with the last checks|Previous runs


Building on asteria.caelum.ci.dev

(from ocaml/opam:debian-unstable)
Unable to find image 'ocaml/opam:debian-unstable' locally
debian-unstable: Pulling from ocaml/opam
Digest: sha256:35955c73858a160861a4c163059ac175d08b4130fa60e218e4e334edc9aaf57e
Status: Downloaded newer image for ocaml/opam:debian-unstable
2024-03-16 21:28.35 ---> using "0acd5aeaa8f7bc314514d9795d14a7f12ec72a6a5b11c5904350189734c6859b" from cache

/: (user (uid 1000) (gid 1000))

/: (env OPAMPRECISETRACKING 1)

/: (env OPAMUTF8 never)

/: (env OPAMEXTERNALSOLVER builtin-0install)

/: (env OPAMCRITERIA +removed)

/: (run (shell "sudo ln -f /usr/bin/opam-dev /usr/bin/opam"))
2024-03-16 21:28.35 ---> using "65c3237f501f7c75f3828458ecf2342bc41c98aaef8c6a7fd82bf46a58cb258c" from cache

/: (run (network host)
        (shell "rm -rf ~/opam-repository && git clone -q 'https://github.com/ocaml/opam-repository' ~/opam-repository && git -C ~/opam-repository checkout -q ac9a846c007d1cde3764459aeae5b75c2f8b7aa8"))
2024-03-16 21:28.35 ---> using "f6daa5a185e151575958bea1bc7ebf168b134457b47fd2bceccea664c8ac3953" from cache

/: (run (shell "rm -rf ~/.opam && opam init -ya --bare --config ~/.opamrc-sandbox ~/opam-repository"))
Configuring from /home/opam/.opamrc-sandbox, then /home/opam/.opamrc, and finally from built-in defaults.
Checking for available remotes: rsync and local, git.
  - you won't be able to use mercurial repositories unless you install the hg command on your system.
  - you won't be able to use darcs repositories unless you install the darcs command on your system.


<><> Fetching repository information ><><><><><><><><><><><><><><><><><><><><><>
[default] Initialised

User configuration:
  ~/.profile is already up-to-date.
[NOTE] Make sure that ~/.profile is well sourced in your ~/.bashrc.

2024-03-16 21:28.35 ---> using "18a4f9bae2d8e0b81b324227a340acbc6fb6adc121711142b1a69c92072eb64b" from cache

/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell "opam switch create --repositories=default '5.0' '5.0.0'"))

<><> Installing new switch packages <><><><><><><><><><><><><><><><><><><><><><>
Switch invariant: ["ocaml-base-compiler" {= "5.0.0"} | "ocaml-system" {= "5.0.0"}]

<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed base-bigarray.base
-> installed base-threads.base
-> installed base-unix.base
-> installed ocaml-options-vanilla.1
-> retrieved ocaml-base-compiler.5.0.0  (cached)
-> installed ocaml-base-compiler.5.0.0
-> installed ocaml-config.3
-> installed ocaml.5.0.0
-> installed base-domains.base
-> installed base-nnp.base
Done.
# Run eval $(opam env --switch=5.0) to update the current shell environment
2024-03-16 21:28.35 ---> using "5d11e26b54cd8d53a366092f138bac1d66998e7c9c071436c2e49483e197a936" from cache

/: (run (network host)
        (shell "opam update --depexts"))
+ /usr/bin/sudo "apt-get" "update"
- Get:1 http://deb.debian.org/debian unstable InRelease [198 kB]
- Get:2 http://deb.debian.org/debian unstable/main amd64 Packages.diff/Index [63.6 kB]
- Get:3 http://deb.debian.org/debian unstable/main amd64 Packages T-2024-03-15-1419.03-F-2024-03-15-1419.03.pdiff [14.0 kB]
- Get:3 http://deb.debian.org/debian unstable/main amd64 Packages T-2024-03-15-1419.03-F-2024-03-15-1419.03.pdiff [14.0 kB]
- Fetched 275 kB in 1s (254 kB/s)
- Reading package lists...
2024-03-16 21:28.35 ---> using "6b85e139d472f2a5d3bc623d507cd520c18ded34e93922816e31990890666680" from cache

/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell  "\
               \nopam remove -y \"linksem.0.8\"\
               \nopam install -vy \"linksem.0.8\"\
               \nres=$?\
               \nif [ $res = 31 ]; then\
               \n    if opam show -f x-ci-accept-failures: \"linksem.0.8\" | grep -q '\"debian-unstable\"'; then\
               \n        echo \"This package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\"\
               \n        exit 69\
               \n    fi\
               \nfi\
               \n\
               \n\
               \nexit $res\
               \n"))
Nothing to do.
[NOTE] linksem.0.8 is not installed.

The following actions will be performed:
=== install 8 packages
  - install conf-findutils 1          [required by lem]
  - install conf-gmp       4          [required by zarith]
  - install lem            2022-12-10 [required by linksem]
  - install linksem        0.8
  - install num            1.5        [required by lem]
  - install ocamlbuild     0.14.3     [required by linksem]
  - install ocamlfind      1.9.6      [required by linksem]
  - install zarith         1.13       [required by lem]

The following system packages will first need to be installed:
    libgmp-dev

<><> Handling external dependencies <><><><><><><><><><><><><><><><><><><><><><>

opam believes some required external dependencies are missing. opam can:
> 1. Run apt-get to install them (may need root/sudo access)
  2. Display the recommended apt-get command and wait while you run it manually (e.g. in another terminal)
  3. Continue anyway, and, upon success, permanently register that this external dependency is present, but not detectable
  4. Abort the installation

[1/2/3/4] 1

+ /usr/bin/sudo "apt-get" "install" "-qq" "-yy" "libgmp-dev"
- debconf: delaying package configuration, since apt-utils is not installed
- Selecting previously unselected package libgmpxx4ldbl:amd64.
- (Reading database ... 
(Reading database ... 5%
(Reading database ... 10%
(Reading database ... 15%
(Reading database ... 20%
(Reading database ... 25%
(Reading database ... 30%
(Reading database ... 35%
(Reading database ... 40%
(Reading database ... 45%
(Reading database ... 50%
(Reading database ... 55%
(Reading database ... 60%
(Reading database ... 65%
(Reading database ... 70%
(Reading database ... 75%
(Reading database ... 80%
(Reading database ... 85%
(Reading database ... 90%
(Reading database ... 95%
(Reading database ... 100%
(Reading database ... 19678 files and directories currently installed.)
- Preparing to unpack .../libgmpxx4ldbl_2%3a6.3.0+dfsg-2+b1_amd64.deb ...
- Unpacking libgmpxx4ldbl:amd64 (2:6.3.0+dfsg-2+b1) ...
- Selecting previously unselected package libgmp-dev:amd64.
- Preparing to unpack .../libgmp-dev_2%3a6.3.0+dfsg-2+b1_amd64.deb ...
- Unpacking libgmp-dev:amd64 (2:6.3.0+dfsg-2+b1) ...
- Setting up libgmpxx4ldbl:amd64 (2:6.3.0+dfsg-2+b1) ...
- Setting up libgmp-dev:amd64 (2:6.3.0+dfsg-2+b1) ...
- Processing triggers for libc-bin (2.37-15.1) ...

<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
Processing  3/24:
Processing  4/24:
Processing  5/24:
Processing  6/24: [conf-findutils: sh find . -name .]
Processing  7/24: [conf-findutils: sh find . -name .] [conf-gmp: sh]
-> retrieved lem.2022-12-10  (cached)
Processing  8/24: [conf-findutils: sh find . -name .] [conf-gmp: sh]
-> retrieved num.1.5  (cached)
Processing  9/24: [conf-findutils: sh find . -name .] [conf-gmp: sh]
Processing 10/24: [conf-findutils: sh find . -name .] [conf-gmp: sh] [num: make opam-modern]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "sh" "-exc" "find . -name ." (CWD=/home/opam/.opam/5.0/.opam-switch/build/conf-findutils.1)
- + find . -name .
- .
-> compiled  conf-findutils.1
Processing 10/24: [conf-gmp: sh] [num: make opam-modern]
-> installed conf-findutils.1
Processing 11/24: [conf-gmp: sh] [num: make opam-modern]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "sh" "-exc" "cc -c $CFLAGS -I/usr/local/include test.c" (CWD=/home/opam/.opam/5.0/.opam-switch/build/conf-gmp.4)
- + cc -c -I/usr/local/include test.c
-> compiled  conf-gmp.4
Processing 11/24: [num: make opam-modern]
-> installed conf-gmp.4
Processing 12/24: [num: make opam-modern]
-> retrieved ocamlbuild.0.14.3  (cached)
Processing 13/24: [num: make opam-modern]
Processing 14/24: [num: make opam-modern] [ocamlbuild: make configure.make]
-> retrieved ocamlfind.1.9.6  (cached)
[ocamlfind: patch] applying 0001-Harden-test-for-OCaml-5.patch
Processing 15/24: [num: make opam-modern] [ocamlbuild: make configure.make] [ocamlfind: patch]
-> retrieved zarith.1.13  (cached)
Processing 15/24: [num: make opam-modern] [ocamlbuild: make configure.make] [ocamlfind: ./configure]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "-f" "configure.make" "all" "OCAMLBUILD_PREFIX=/home/opam/.opam/5.0" "OCAMLBUILD_BINDIR=/home/opam/.opam/5.0/bin" "OCAMLBUILD_LIBDIR=/home/opam/.opam/5.0/lib" "OCAMLBUILD_MANDIR=/home/opam/.opam/5.0/man" "OCAML_NATIVE=true" "OCAML_NATIVE_TOOLS=true" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3)
- (echo "# This file was generated from configure.make"; \
- echo ;\
- echo "OCAML_PREFIX="; \
- echo "OCAML_BINDIR=/home/opam/.opam/5.0/bin"; \
- echo "OCAML_LIBDIR=/home/opam/.opam/5.0/lib/ocaml"; \
- echo "OCAML_MANDIR=/home/opam/.opam/5.0/man"; \
- echo ;\
- echo "EXT_OBJ=.o"; \
- echo "EXT_ASM=.s"; \
- echo "EXT_LIB=.a"; \
- echo "EXT_DLL=.so"; \
- echo "EXE="; \
- echo ;\
- echo "OCAML_NATIVE=true"; \
- echo "OCAML_NATIVE_TOOLS=true"; \
- echo "NATDYNLINK=true"; \
- echo "SUPPORT_SHARED_LIBRARIES=true"; \
- echo ;\
- echo "PREFIX=/home/opam/.opam/5.0"; \
- echo "BINDIR=/home/opam/.opam/5.0/bin"; \
- echo "LIBDIR=/home/opam/.opam/5.0/lib"; \
- echo "MANDIR=/home/opam/.opam/5.0/man"; \
- ) > Makefile.config
- (echo "(* This file was generated from ../configure.make *)"; \
- echo ;\
- echo 'let bindir = "/home/opam/.opam/5.0/bin"'; \
- echo 'let libdir = "/home/opam/.opam/5.0/lib"'; \
- echo 'let ocaml_libdir = "/home/opam/.opam/5.0/lib/ocaml"'; \
- echo 'let libdir_abs = "/home/opam/.opam/5.0/lib"'; \
- echo 'let ocaml_native = true'; \
- echo 'let ocaml_native_tools = true'; \
- echo 'let supports_shared_libraries = true';\
- echo 'let a = "a"'; \
- echo 'let o = "o"'; \
- echo 'let so = "so"'; \
- echo 'let ext_dll = ".so"'; \
- echo 'let exe = ""'; \
- echo 'let version = "0.14.3"'; \
- ) > src/ocamlbuild_config.ml
Processing 15/24: [num: make opam-modern] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure]
-> retrieved linksem.0.8  (cached)
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "./configure" "-bindir" "/home/opam/.opam/5.0/bin" "-sitelib" "/home/opam/.opam/5.0/lib" "-mandir" "/home/opam/.opam/5.0/man" "-config" "/home/opam/.opam/5.0/lib/findlib.conf" "-no-custom" "-no-camlp4" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6)
- Welcome to findlib version 1.9.6
- Configuring core...
- Checking for #remove_directory...
- Testing threading model...
- systhread_supported: true
- Testing DLLs...
- Testing whether ppxopt can be supported...
- Checking for ocamlc -opaque...
- Checking for ocamlopt -g...
- Configuring libraries...
- unix: found (in +unix)
- dynlink: found (in +dynlink)
- bigarray: not present (possible since 4.08)
- compiler-libs: found
- dbm: not present (normal since 4.00)
- graphics: not present (normal since 4.09)
- num: not present (normal since 4.06)
- ocamlbuild: not present (normal since 4.03)
- ocamldoc: found (in +ocamldoc)
- raw_spacetime: not present (normal since 4.12)
- threads: found (in +threads)
- str: found (in +str)
- labltk: not present (normal since 4.02)
- native dynlink: found
- camlp4: disabled
- bytes: found, installing fake library
- Configuration for bytes written to site-lib-src/bytes/META
- Detecting compiler arguments: (extractor built) ok
- 
- About the OCAML core installation:
-     Standard library:      /home/opam/.opam/5.0/lib/ocaml
-     Binaries:              /home/opam/.opam/5.0/bin
-     Manual pages:          /home/opam/.opam/5.0/man
-     Multi-threading type:  posix
- The directory of site-specific packages will be
-     site-lib:              /home/opam/.opam/5.0/lib
- The configuration file is written to:
-     findlib config file:   /home/opam/.opam/5.0/lib/findlib.conf
- Software will be installed:
-     Libraries:             in <site-lib>/findlib
-     Binaries:              /home/opam/.opam/5.0/bin
-     Manual pages:          /home/opam/.opam/5.0/man
-     topfind script:        /home/opam/.opam/5.0/lib/ocaml
- Topfind ppxopt support:    yes
- Toolbox:                   no
- Link custom runtime:       no
- Need bytes compatibility:  no
- 
- Configuration has been written to Makefile.config
- 
- You can now do 'make all', and optionally 'make opt', to build ocamlfind.
Processing 15/24: [num: make opam-modern] [ocamlbuild: make check-if-preinstalled] [ocamlfind: make all]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "PROFILE=release" "opam-modern" (CWD=/home/opam/.opam/5.0/.opam-switch/build/num.1.5)
- make -C src all
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/num.1.5/src'
- ocamlc -ccopt -DBNG_ARCH_amd64 -c bng.c
- ocamlc -ccopt -DBNG_ARCH_amd64 -c nat_stubs.c
- ocamlmklib -oc nums bng.o nat_stubs.o
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c int_misc.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c int_misc.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c nat.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c nat.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c big_int.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c big_int.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_flags.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_flags.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c ratio.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c ratio.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_status.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_status.ml
- ocamlmklib -o nums -oc nums -linkall int_misc.cmo nat.cmo big_int.cmo arith_flags.cmo ratio.cmo num.cmo arith_status.cmo
- cp ../toplevel/num_top_printers.mli ../toplevel/num_top.mli ../toplevel/num_top_printers.ml ../toplevel/num_top.ml .
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num_top_printers.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num_top_printers.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num_top.mli
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num_top.ml
- ocamlc -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -a -o num_top.cma num_top_printers.cmo num_top.cmo
- echo 'version = "1.6~dev"' > META.top
- cat META.num-top.in >> META.top
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c int_misc.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c nat.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c big_int.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_flags.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c ratio.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c num.ml
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -c arith_status.ml
- ocamlmklib -o nums -oc nums -linkall int_misc.cmx nat.cmx big_int.cmx arith_flags.cmx ratio.cmx num.cmx arith_status.cmx
- ocamlopt -w +a-4-9-41-42-44-45-48  -bin-annot -g -safe-string -strict-sequence -strict-formats -I +compiler-libs -I . -shared -o nums.cmxs nums.cmxa
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/num.1.5/src'
- cp src/num-modern.install num.install
-> compiled  num.1.5
Processing 15/24: [ocamlbuild: make check-if-preinstalled] [ocamlfind: make all]
-> installed num.1.5
Processing 16/24: [ocamlbuild: make check-if-preinstalled] [ocamlfind: make all]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "all" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6)
- for p in findlib; do ( cd src/$p; make all ) || exit; done
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- ocamllex fl_meta.mll
- 22 states, 392 transitions, table size 1700 bytes
- USE_CYGPATH="0"; \
- export USE_CYGPATH; \
- cat findlib_config.mlp | \
-          ../../tools/patch '@CONFIGFILE@' '/home/opam/.opam/5.0/lib/findlib.conf' | \
-          ../../tools/patch '@STDLIB@' '/home/opam/.opam/5.0/lib/ocaml' | \
- 	sed -e 's;@AUTOLINK@;true;g' \
- 	    -e 's;@SYSTEM@;linux;g' \
- 	     >findlib_config.ml
- if [ "true" = "true" ]; then                 \
- 	cp topfind.ml.in topfind.ml;                             \
- else                                                             \
- 	sed -e '/PPXOPT_BEGIN/,/PPXOPT_END/ d' topfind.ml.in     \
- 		> topfind.ml ;                                   \
- fi
- ocamldep *.ml *.mli >depend
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c findlib_config.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_split.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_metatoken.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_meta.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c fl_metascanner.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_metascanner.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c fl_topo.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_topo.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c fl_package_base.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_package_base.ml
- File "fl_package_base.ml", line 304, characters 22-40:
- 304 | 	 let pkg_ancestors = query_requirements predlist pkg in
-       	                     ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 350, characters 18-36:
- 350 |   let ancestors = query_requirements predlist package_name in
-                         ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 375, characters 23-41:
- 375 | 	  let pkg_ancestors = query_requirements predlist pkg in
-       	                      ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 510, characters 16-35:
- 510 | 	     ( let c = package_definitions search_path pkg.package_name in
-       	               ^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label search_path was omitted in the application of this function.
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c findlib.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c findlib.ml
- File "findlib.ml", line 390, characters 2-26:
- 390 |   Fl_package_base.requires predlist pkg
-         ^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "findlib.ml", line 396, characters 2-33:
- 396 |   Fl_package_base.requires_deeply predlist pkglist
-         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_args.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_lint.ml
- ocamlc -I +compiler-libs -a -o findlib.cma findlib_config.cmo fl_split.cmo fl_metatoken.cmo fl_meta.cmo fl_metascanner.cmo fl_topo.cmo fl_package_base.cmo findlib.cmo fl_args.cmo fl_lint.cmo
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c ocaml_args.ml
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c frontend.ml
- File "frontend.ml", line 859, characters 10-39:
- 859 |           Fl_package_base.package_users predicates1 packages1
-                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- ocamlc -I +compiler-libs  -o ocamlfind -g findlib.cma unix.cma \
-            -I +unix -I +dynlink ocaml_args.cmo frontend.cmo
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c topfind.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c topfind.ml
- File "topfind.ml", line 128, characters 40-63:
- 128 |                      match Hashtbl.find Toploop.directive_table "ppx" with
-                                               ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 258, characters 4-27:
- 258 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 268, characters 4-27:
- 268 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 280, characters 4-27:
- 280 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 293, characters 4-27:
- 293 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 307, characters 4-27:
- 307 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 319, characters 4-27:
- 319 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- ocamlc -I +compiler-libs -a -o findlib_top.cma topfind.cmo
- USE_CYGPATH="0"; \
- export USE_CYGPATH; \
- cat topfind_rd1.p | \
-          ../../tools/patch '@SITELIB@' '/home/opam/.opam/5.0/lib' \
-     	    >topfind
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -c fl_dynload.mli
- ocamlc -I +compiler-libs -opaque   -I +unix -I +dynlink -g -c fl_dynload.ml
- ocamlc -I +compiler-libs -a -o findlib_dynload.cma fl_dynload.cmo
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- make all-config
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- USE_CYGPATH="0"; \
- export USE_CYGPATH; \
- cat findlib.conf.in | \
-      tools/patch '@SITELIB@' '/home/opam/.opam/5.0/lib' | \
- 		 tools/patch '@FINDLIB_PATH@' '/home/opam/.opam/5.0/lib/ocaml:/home/opam/.opam/5.0/lib' -p >findlib.conf
- if ./tools/cmd_from_same_dir ocamlc; then \
- 	echo 'ocamlc="ocamlc.opt"' >>findlib.conf; \
- fi
- if ./tools/cmd_from_same_dir ocamlopt; then \
- 	echo 'ocamlopt="ocamlopt.opt"' >>findlib.conf; \
- fi
- if ./tools/cmd_from_same_dir ocamldep; then \
- 	echo 'ocamldep="ocamldep.opt"' >>findlib.conf; \
- fi
- if ./tools/cmd_from_same_dir ocamldoc; then \
- 	echo 'ocamldoc="ocamldoc.opt"' >>findlib.conf; \
- fi
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
Processing 16/24: [ocamlbuild: make check-if-preinstalled] [ocamlfind: make opt]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "opt" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6)
- for p in findlib; do ( cd src/$p; make opt ) || exit; done
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c findlib_config.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_split.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_metatoken.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_meta.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_metascanner.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_topo.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_package_base.ml
- File "fl_package_base.ml", line 304, characters 22-40:
- 304 | 	 let pkg_ancestors = query_requirements predlist pkg in
-       	                     ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 350, characters 18-36:
- 350 |   let ancestors = query_requirements predlist package_name in
-                         ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 375, characters 23-41:
- 375 | 	  let pkg_ancestors = query_requirements predlist pkg in
-       	                      ^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "fl_package_base.ml", line 510, characters 16-35:
- 510 | 	     ( let c = package_definitions search_path pkg.package_name in
-       	               ^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label search_path was omitted in the application of this function.
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c findlib.ml
- File "findlib.ml", line 390, characters 2-26:
- 390 |   Fl_package_base.requires predlist pkg
-         ^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- File "findlib.ml", line 396, characters 2-33:
- 396 |   Fl_package_base.requires_deeply predlist pkglist
-         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_args.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_lint.ml
- ocamlopt -I +compiler-libs -g -a -o findlib.cmxa findlib_config.cmx fl_split.cmx fl_metatoken.cmx fl_meta.cmx fl_metascanner.cmx fl_topo.cmx fl_package_base.cmx findlib.cmx fl_args.cmx fl_lint.cmx
- if [ 1 -gt 0 ]; then \
-     ocamlopt -I +compiler-libs -g -shared -o findlib.cmxs findlib_config.cmx fl_split.cmx fl_metatoken.cmx fl_meta.cmx fl_metascanner.cmx fl_topo.cmx fl_package_base.cmx findlib.cmx fl_args.cmx fl_lint.cmx; \
- fi
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c ocaml_args.ml
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c frontend.ml
- File "frontend.ml", line 859, characters 10-39:
- 859 |           Fl_package_base.package_users predicates1 packages1
-                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 6 [labels-omitted]: label preds was omitted in the application of this function.
- ocamlopt -I +compiler-libs -g -o ocamlfind_opt findlib.cmxa unix.cmxa \
- 	   -I +unix -I +dynlink ocaml_args.cmx frontend.cmx
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c topfind.ml
- File "topfind.ml", line 128, characters 40-63:
- 128 |                      match Hashtbl.find Toploop.directive_table "ppx" with
-                                               ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 258, characters 4-27:
- 258 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 268, characters 4-27:
- 268 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 280, characters 4-27:
- 280 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 293, characters 4-27:
- 293 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 307, characters 4-27:
- 307 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- File "topfind.ml", line 319, characters 4-27:
- 319 |     Toploop.directive_table
-           ^^^^^^^^^^^^^^^^^^^^^^^
- Alert deprecated: Toploop.directive_table
- ocamlopt -I +compiler-libs -g -a -o findlib_top.cmxa topfind.cmx
- if [ 1 -gt 0 ]; then \
-     ocamlopt -I +compiler-libs -g -shared -o findlib_top.cmxs topfind.cmx; \
- fi
- ocamlopt -I +compiler-libs -g -opaque  -I +unix -I +dynlink -c fl_dynload.ml
- ocamlopt -I +compiler-libs -g -a -o findlib_dynload.cmxa fl_dynload.cmx
- if [ 1 -gt 0 ]; then \
-     ocamlopt -I +compiler-libs -g -shared -o findlib_dynload.cmxs fl_dynload.cmx; \
- fi
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
-> compiled  ocamlfind.1.9.6
Processing 16/24: [ocamlbuild: make check-if-preinstalled]
Processing 17/24: [ocamlbuild: make check-if-preinstalled] [ocamlfind: make install]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6)
- if [ "0" -eq 1 ]; then \
-     for x in camlp4 dbm graphics labltk num ocamlbuild; do \
-       if [ -f "/home/opam/.opam/5.0/lib/$x/META" ]; then \
-         if ! grep -Fq '[distributed with Ocaml]' "//home/opam/.opam/5.0/lib/$x/META"; then \
-           rm -f site-lib-src/$x/META; \
-         fi; \
-       fi; \
-     done; \
-     test -f "site-lib-src/num/META" || rm -f "site-lib-src/num-top/META"; \
-   fi
- echo 'SITELIB_META =' > Makefile.packages.in
- for x in `ls site-lib-src`; do test ! -f "site-lib-src/$x/META" || echo $x >> Makefile.packages.in; done
- tr '\n' ' ' < Makefile.packages.in > Makefile.packages
- rm Makefile.packages.in
- install -d "/home/opam/.opam/5.0/bin"
- install -d "/home/opam/.opam/5.0/man"
- make install-config
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- install -d "`dirname \"/home/opam/.opam/5.0/lib/findlib.conf\"`"
- test -f "/home/opam/.opam/5.0/lib/findlib.conf" || install -c findlib.conf "/home/opam/.opam/5.0/lib/findlib.conf"
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- for p in findlib; do ( cd src/$p; make install ); done
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- install -d "/home/opam/.opam/5.0/lib/findlib"
- install -d "/home/opam/.opam/5.0/bin"
- test 1 -eq 0 || install -d "/home/opam/.opam/5.0/lib/ocaml"
- test 1 -eq 0 || install -c topfind "/home/opam/.opam/5.0/lib/ocaml/"
- files=` ../../tools/collect_files ../../Makefile.config \
- findlib.cmi findlib.mli findlib.cma findlib.cmxa findlib.a findlib.cmxs \
- findlib_config.cmi findlib_config.ml topfind.cmi topfind.mli \
- fl_args.cmi fl_lint.cmi fl_meta.cmi fl_split.cmi fl_topo.cmi ocaml_args.cmi \
- fl_package_base.mli fl_package_base.cmi fl_metascanner.mli fl_metascanner.cmi \
- fl_metatoken.cmi findlib_top.cma findlib_top.cmxa findlib_top.a findlib_top.cmxs \
- findlib_dynload.cma findlib_dynload.cmxa findlib_dynload.a findlib_dynload.cmxs fl_dynload.mli fl_dynload.cmi \
- META` && \
- install -c $files "/home/opam/.opam/5.0/lib/findlib/"
- f="ocamlfind"; { test -f ocamlfind_opt && f="ocamlfind_opt"; }; \
- install -c $f "/home/opam/.opam/5.0/bin/ocamlfind"
- # the following "if" block is only needed for 4.00beta2
- if [ 1 -eq 0 -a -f "/home/opam/.opam/5.0/lib/ocaml/compiler-libs/topdirs.cmi" ]; then \
-     cd "/home/opam/.opam/5.0/lib/ocaml/compiler-libs/"; \
-     install -c topdirs.cmi toploop.cmi "/home/opam/.opam/5.0/lib/findlib/"; \
- fi
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- make install-meta
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- for x in bytes ; do install -d "/home/opam/.opam/5.0/lib/$x"; install -c site-lib-src/$x/META "/home/opam/.opam/5.0/lib/$x/META.tmp" && mv "/home/opam/.opam/5.0/lib/$x/META.tmp" "/home/opam/.opam/5.0/lib/$x/META"; done
- install -d "/home/opam/.opam/5.0/lib/findlib"; install -c Makefile.packages "/home/opam/.opam/5.0/lib/findlib/Makefile.packages"
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- test ! -f 'site-lib-src/num-top/META' || { cd src/findlib; make install-num-top; }
- test ! -f 'site-lib-src/camlp4/META' ||	install -c tools/safe_camlp4 "/home/opam/.opam/5.0/bin"
- make install-doc
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
- install -d "/home/opam/.opam/5.0/man/man1" "/home/opam/.opam/5.0/man/man3" "/home/opam/.opam/5.0/man/man5"
- install -c doc/ref-man/ocamlfind.1 "/home/opam/.opam/5.0/man/man1"
- install -c doc/ref-man/META.5 doc/ref-man/site-lib.5 doc/ref-man/findlib.conf.5 "/home/opam/.opam/5.0/man/man5"
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlfind.1.9.6'
-> installed ocamlfind.1.9.6
Processing 17/24: [ocamlbuild: make check-if-preinstalled]
Processing 18/24: [ocamlbuild: make check-if-preinstalled] [zarith: ./configure]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "./configure" (CWD=/home/opam/.opam/5.0/.opam-switch/build/zarith.1.13)
- binary ocaml: found in /home/opam/.opam/5.0/bin
- binary ocamlc: found in /home/opam/.opam/5.0/bin
- binary ocamldep: found in /home/opam/.opam/5.0/bin
- binary ocamlmklib: found in /home/opam/.opam/5.0/bin
- binary ocamldoc: found in /home/opam/.opam/5.0/bin
- binary ocamlopt: found in /home/opam/.opam/5.0/bin
- checking compilation with ocamlc -O3 -Wall -Wextra : working
- include caml/mlvalues.h: found
- library dynlink.cmxa: found
- binary ocamlfind: found in /home/opam/.opam/5.0/bin
- OCaml's word size is 64
- include gmp.h: found
- library gmp: found
- OCaml supports -bin-annot to produce documentation
- 
- detected configuration:
- 
-   native-code:          yes
-   dynamic linking:      yes
-   defines:              -DHAS_GMP 
-   includes:             -I/home/opam/.opam/5.0/lib/ocaml 
-   libraries:             -lgmp
-   linker options:       
-   C options:            -O3 -Wall -Wextra 
-   installation path:    /home/opam/.opam/5.0/lib
-   installation method   findlib
- 
- configuration successful!
- now type "make" to build
- then type "make install" or "sudo make install" to install
Processing 18/24: [ocamlbuild: make check-if-preinstalled] [zarith: make]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "check-if-preinstalled" "all" "opam-install" (CWD=/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3)
- if test -d /home/opam/.opam/5.0/lib/ocaml/ocamlbuild; then\
-   >&2 echo "ERROR: Preinstalled ocamlbuild detected at"\
-        "/home/opam/.opam/5.0/lib/ocaml/ocamlbuild";\
-   >&2 echo "Installation aborted; if you want to bypass this"\
-         "safety check, pass CHECK_IF_PREINSTALLED=false to make";\
-   exit 2;\
- fi
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/const.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/signatures.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/display.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/display.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/log.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/log.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_ast.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_ast.ml
- ocamllex.opt src/glob_lexer.mll
- 55 states, 419 transitions, table size 2006 bytes
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob.ml
- ocamllex.opt src/lexers.mll
- 251 states, 1051 transitions, table size 5710 bytes
- 4334 additional bytes used for bindings
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/lexers.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/lexers.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/command.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/command.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_config.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/options.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/options.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/report.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/report.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/main.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/main.ml
- mkdir -p tmp
- ocamlc.opt -pack src/const.cmo src/loc.cmo src/discard_printf.cmo src/signatures.cmi src/my_std.cmo src/my_unix.cmo src/tags.cmo src/display.cmo src/log.cmo src/shell.cmo src/bool.cmo src/glob_ast.cmo src/glob_lexer.cmo src/glob.cmo src/lexers.cmo src/param_tags.cmo src/command.cmo src/ocamlbuild_config.cmo src/ocamlbuild_where.cmo src/slurp.cmo src/options.cmo src/pathname.cmo src/configuration.cmo src/flags.cmo src/hygiene.cmo src/digest_cache.cmo src/resource.cmo src/rule.cmo src/solver.cmo src/report.cmo src/tools.cmo src/fda.cmo src/findlib.cmo src/ocaml_arch.cmo src/ocaml_utils.cmo src/ocaml_dependencies.cmo src/ocaml_compiler.cmo src/ocaml_tools.cmo src/ocaml_specific.cmo src/exit_codes.cmo src/plugin.cmo src/hooks.cmo src/main.cmo -o tmp/ocamlbuild_pack.cmo
- mv tmp/ocamlbuild_pack.cmi src/ocamlbuild_pack.cmi
- mv tmp/ocamlbuild_pack.cmo src/ocamlbuild_pack.cmo
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_plugin.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_plugin.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_executor.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_executor.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_unix_plugin.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_unix_plugin.ml
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c bin/ocamlbuild.mli
- ocamlc.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c bin/ocamlbuild.ml
- ocamlc.opt -I +unix -I src -o ocamlbuild.byte unix.cma src/ocamlbuild_pack.cmo plugin-lib/ocamlbuild_plugin.cmo plugin-lib/ocamlbuild_executor.cmo plugin-lib/ocamlbuild_unix_plugin.cmo bin/ocamlbuild.cmo
- ocamlc.opt -a -o plugin-lib/ocamlbuildlib.cma src/ocamlbuild_pack.cmo plugin-lib/ocamlbuild_plugin.cmo plugin-lib/ocamlbuild_executor.cmo plugin-lib/ocamlbuild_unix_plugin.cmo
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/const.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/display.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/log.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_ast.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/glob.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/lexers.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/command.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_config.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/options.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/report.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.ml
- ocamlopt.opt -for-pack Ocamlbuild_pack -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c src/main.ml
- mkdir -p tmp
- ocamlopt.opt -pack src/const.cmx src/loc.cmx src/discard_printf.cmx src/signatures.cmi src/my_std.cmx src/my_unix.cmx src/tags.cmx src/display.cmx src/log.cmx src/shell.cmx src/bool.cmx src/glob_ast.cmx src/glob_lexer.cmx src/glob.cmx src/lexers.cmx src/param_tags.cmx src/command.cmx src/ocamlbuild_config.cmx src/ocamlbuild_where.cmx src/slurp.cmx src/options.cmx src/pathname.cmx src/configuration.cmx src/flags.cmx src/hygiene.cmx src/digest_cache.cmx src/resource.cmx src/rule.cmx src/solver.cmx src/report.cmx src/tools.cmx src/fda.cmx src/findlib.cmx src/ocaml_arch.cmx src/ocaml_utils.cmx src/ocaml_dependencies.cmx src/ocaml_compiler.cmx src/ocaml_tools.cmx src/ocaml_specific.cmx src/exit_codes.cmx src/plugin.cmx src/hooks.cmx src/main.cmx -o tmp/ocamlbuild_pack.cmx
- mv tmp/ocamlbuild_pack.cmx src/ocamlbuild_pack.cmx
- mv tmp/ocamlbuild_pack.o src/ocamlbuild_pack.o
- ocamlopt.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_plugin.ml
- ocamlopt.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_executor.ml
- ocamlopt.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c plugin-lib/ocamlbuild_unix_plugin.ml
- ocamlopt.opt -w +L -w +R -w +Z -I src -I plugin-lib -I bin -I +unix -safe-string -bin-annot -strict-sequence -c bin/ocamlbuild.ml
- ocamlopt.opt -I +unix -I src -o ocamlbuild.native unix.cmxa src/ocamlbuild_pack.cmx plugin-lib/ocamlbuild_plugin.cmx plugin-lib/ocamlbuild_executor.cmx plugin-lib/ocamlbuild_unix_plugin.cmx bin/ocamlbuild.cmx
- ocamlopt.opt -a -o plugin-lib/ocamlbuildlib.cmxa src/ocamlbuild_pack.cmx plugin-lib/ocamlbuild_plugin.cmx plugin-lib/ocamlbuild_executor.cmx plugin-lib/ocamlbuild_unix_plugin.cmx
- ocamlc.opt src/ocamlbuild_pack.cmo -I src man/options_man.ml -o man/options_man.byte
- ./man/options_man.byte > man/ocamlbuild.options.1
- cat man/ocamlbuild.header.1 man/ocamlbuild.options.1 man/ocamlbuild.footer.1 > man/ocamlbuild.1
- make ocamlbuild.install
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- rm -f ocamlbuild.install
- touch ocamlbuild.install
- make install-bin-opam
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo 'bin: [' >> ocamlbuild.install
- echo '  "ocamlbuild.byte" {"ocamlbuild.byte"}' >> ocamlbuild.install
- echo '  "ocamlbuild.native" {"ocamlbuild.native"}' >> ocamlbuild.install
- echo '  "ocamlbuild.native" {"ocamlbuild"}' >> ocamlbuild.install
- echo ']' >> ocamlbuild.install
- echo >> ocamlbuild.install
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make install-lib-opam
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo 'lib: [' >> ocamlbuild.install
- make install-lib-basics-opam
- make[3]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo '  "ocamlbuild.opam" {"opam"}' >> ocamlbuild.install
- echo '  "META"' >> ocamlbuild.install
- for lib in src/signatures.mli src/signatures.cmi src/signatures.cmti; do \
-   echo "  \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \
- done
- make[3]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make install-lib-byte-opam
- make[3]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- for lib in plugin-lib/ocamlbuildlib.cma bin/ocamlbuild.cmo src/ocamlbuild_pack.cmi plugin-lib/ocamlbuild_plugin.cmi plugin-lib/ocamlbuild_executor.cmi plugin-lib/ocamlbuild_unix_plugin.cmi; do \
-   echo "  \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \
- done
- make[3]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make install-lib-native-opam
- make[3]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- for lib in plugin-lib/ocamlbuildlib.cmxa plugin-lib/ocamlbuildlib.a bin/ocamlbuild.cmx bin/ocamlbuild.o src/ocamlbuild_pack.cmx plugin-lib/ocamlbuild_plugin.cmx plugin-lib/ocamlbuild_executor.cmx plugin-lib/ocamlbuild_unix_plugin.cmx plugin-lib/ocamlbuild_plugin.o plugin-lib/ocamlbuild_executor.o plugin-lib/ocamlbuild_unix_plugin.o; do \
-   echo "  \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \
- done
- make[3]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo ']' >> ocamlbuild.install
- echo >> ocamlbuild.install
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make install-man-opam
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo 'man: [' >> ocamlbuild.install
- echo '  "man/ocamlbuild.1" {"man1/ocamlbuild.1"}' >> ocamlbuild.install
- echo ']' >> ocamlbuild.install
- echo >> ocamlbuild.install
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make install-doc-opam
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- echo 'doc: [' >> ocamlbuild.install
- echo '  "LICENSE"' >> ocamlbuild.install
- echo '  "Changes"' >> ocamlbuild.install
- echo '  "Readme.md"' >> ocamlbuild.install
- echo ']' >> ocamlbuild.install
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/ocamlbuild.0.14.3'
-> compiled  ocamlbuild.0.14.3
Processing 18/24: [zarith: make]
-> installed ocamlbuild.0.14.3
Processing 19/24: [zarith: make]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" (CWD=/home/opam/.opam/5.0/.opam-switch/build/zarith.1.13)
- (echo "let"; grep "version" META | head -1) > zarith_version.ml
- ocamldep  zarith_version.ml z.ml q.ml big_int_Z.ml z.mli q.mli big_int_Z.mli > depend
- ocamlc -g -I +compiler-libs -bin-annot  -c zarith_version.ml
- ocamlc -g -I +compiler-libs -bin-annot  -c z.mli
- ocamlc -g -I +compiler-libs -bin-annot  -c z.ml
- ocamlc -g -I +compiler-libs -bin-annot  -c q.mli
- ocamlc -g -I +compiler-libs -bin-annot  -c q.ml
- ocamlc -g -I +compiler-libs -bin-annot  -c big_int_Z.mli
- ocamlc -g -I +compiler-libs -bin-annot  -c big_int_Z.ml
- ocamlmklib -g -failsafe -o zarith zarith_version.cmo z.cmo q.cmo big_int_Z.cmo -lgmp 
- ocamlc -ccopt "-I/home/opam/.opam/5.0/lib/ocaml  -DHAS_GMP  -O3 -Wall -Wextra " -c caml_z.c
- ocamlmklib -g -failsafe -o zarith caml_z.o -lgmp 
- ocamlc -g -I +compiler-libs -bin-annot  -c zarith_top.ml
- ocamlc -g -o zarith_top.cma -a zarith_top.cmo
- ocamlopt -g -I +compiler-libs  -c zarith_version.ml
- ocamlopt -g -I +compiler-libs  -c z.ml
- ocamlopt -g -I +compiler-libs  -c q.ml
- ocamlopt -g -I +compiler-libs  -c big_int_Z.ml
- ocamlmklib -g -failsafe -o zarith zarith_version.cmx z.cmx q.cmx big_int_Z.cmx -lgmp 
- ocamlopt -shared -o zarith.cmxs -I . zarith.cmxa -linkall
-> compiled  zarith.1.13
Processing 20/24: [zarith: make install]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/5.0/.opam-switch/build/zarith.1.13)
- ocamlfind install -destdir "/home/opam/.opam/5.0/lib" zarith META zarith.cma libzarith.a z.cmi q.cmi big_int_Z.cmi zarith_top.cma z.mli zarith.cmxa zarith_version.cmx z.cmx q.cmx big_int_Z.cmx zarith.cmxs zarith.h q.mli big_int_Z.mli zarith.a z.cmti q.cmti big_int_Z.cmti -optional dllzarith.so
- Installed /home/opam/.opam/5.0/lib/zarith/big_int_Z.cmti
- Installed /home/opam/.opam/5.0/lib/zarith/q.cmti
- Installed /home/opam/.opam/5.0/lib/zarith/z.cmti
- Installed /home/opam/.opam/5.0/lib/zarith/zarith.a
- Installed /home/opam/.opam/5.0/lib/zarith/big_int_Z.mli
- Installed /home/opam/.opam/5.0/lib/zarith/q.mli
- Installed /home/opam/.opam/5.0/lib/zarith/zarith.h
- Installed /home/opam/.opam/5.0/lib/zarith/zarith.cmxs
- Installed /home/opam/.opam/5.0/lib/zarith/big_int_Z.cmx
- Installed /home/opam/.opam/5.0/lib/zarith/q.cmx
- Installed /home/opam/.opam/5.0/lib/zarith/z.cmx
- Installed /home/opam/.opam/5.0/lib/zarith/zarith_version.cmx
- Installed /home/opam/.opam/5.0/lib/zarith/zarith.cmxa
- Installed /home/opam/.opam/5.0/lib/zarith/z.mli
- Installed /home/opam/.opam/5.0/lib/zarith/zarith_top.cma
- Installed /home/opam/.opam/5.0/lib/zarith/big_int_Z.cmi
- Installed /home/opam/.opam/5.0/lib/zarith/q.cmi
- Installed /home/opam/.opam/5.0/lib/zarith/z.cmi
- Installed /home/opam/.opam/5.0/lib/zarith/libzarith.a
- Installed /home/opam/.opam/5.0/lib/zarith/zarith.cma
- Installed /home/opam/.opam/5.0/lib/stublibs/dllzarith.so
- Installed /home/opam/.opam/5.0/lib/stublibs/dllzarith.so.owner
- ocamlfind: [WARNING] You have installed DLLs but the directory /home/opam/.opam/5.0/lib/stublibs is not mentioned in ld.conf
- Installed /home/opam/.opam/5.0/lib/zarith/META
-> installed zarith.1.13
Processing 21/24: [lem: make]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "INSTALL_DIR=/home/opam/.opam/5.0" (CWD=/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10)
- echo "(* Generated file -- do not edit. *)" > src/version.ml
- echo 'let v="2022-12-10"' >> src/version.ml
- echo "(* Generated file -- do not edit. *)" > src/share_directory.ml
- echo let d=\"/home/opam/.opam/5.0/share/lem\" >> src/share_directory.ml
- make -C src all
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/src'
- ocamlbuild -use-ocamlfind -cflags -g main.native
- ocamlfind ocamldep -package zarith -modules main.ml > main.ml.depends
- ocamlfind ocamldep -package zarith -modules main.mli > main.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o main.cmi main.mli
- ocamlfind ocamldep -package zarith -modules ast.ml > ast.ml.depends
- ocamlfind ocamldep -package zarith -modules ulib/ulib.ml > ulib/ulib.ml.depends
- ocamlfind ocamldep -package zarith -modules ulib/batText.mli > ulib/batText.mli.depends
- ocamlfind ocamldep -package zarith -modules ulib/batUChar.mli > ulib/batUChar.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ulib/batUChar.cmi ulib/batUChar.mli
- ocamlfind ocamldep -package zarith -modules ulib/batUTF8.mli > ulib/batUTF8.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ulib/batText.cmi ulib/batText.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ulib/batUTF8.cmi ulib/batUTF8.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ulib/ulib.cmo ulib/ulib.ml
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ast.cmo ast.ml
- ocamlfind ocamldep -package zarith -modules ulib/batText.ml > ulib/batText.ml.depends
- ocamlfind ocamldep -package zarith -modules ulib/batReturn.ml > ulib/batReturn.ml.depends
- ocamlfind ocamldep -package zarith -modules ulib/batReturn.mli > ulib/batReturn.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ulib/batReturn.cmi ulib/batReturn.mli
- ocamlfind ocamldep -package zarith -modules ulib/batUChar.ml > ulib/batUChar.ml.depends
- ocamlfind ocamldep -package zarith -modules ulib/batUTF8.ml > ulib/batUTF8.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ulib/batUChar.cmx ulib/batUChar.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ulib/batReturn.cmx ulib/batReturn.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ulib/batUTF8.cmx ulib/batUTF8.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ulib/batText.cmx ulib/batText.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ulib/ulib.cmx ulib/ulib.ml
- ocamlfind ocamldep -package zarith -modules ast_util.ml > ast_util.ml.depends
- ocamlfind ocamldep -package zarith -modules ast_util.mli > ast_util.mli.depends
- ocamlfind ocamldep -package zarith -modules name.mli > name.mli.depends
- ocamlfind ocamldep -package zarith -modules output.mli > output.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o output.cmi output.mli
- ocamlfind ocamldep -package zarith -modules path.mli > path.mli.depends
- ocamlfind ocamldep -package zarith -modules ident.mli > ident.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o name.cmi name.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ident.cmi ident.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o path.cmi path.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o ast_util.cmi ast_util.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ast.cmx ast.ml
- ocamlfind ocamldep -package zarith -modules ident.ml > ident.ml.depends
- ocamlfind ocamldep -package zarith -modules name.ml > name.ml.depends
- ocamlfind ocamldep -package zarith -modules output.ml > output.ml.depends
- ocamlfind ocamldep -package zarith -modules reporting_basic.ml > reporting_basic.ml.depends
- ocamlfind ocamldep -package zarith -modules reporting_basic.mli > reporting_basic.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o reporting_basic.cmi reporting_basic.mli
- ocamlfind ocamldep -package zarith -modules pp.ml > pp.ml.depends
- ocamlfind ocamldep -package zarith -modules pp.mli > pp.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o pp.cmi pp.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o pp.cmx pp.ml
- ocamlfind ocamldep -package zarith -modules util.ml > util.ml.depends
- ocamlfind ocamldep -package zarith -modules util.mli > util.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o util.cmi util.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o reporting_basic.cmx reporting_basic.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o util.cmx util.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o output.cmx output.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o output.cmx output.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o name.cmx name.ml
- ocamlfind ocamldep -package zarith -modules path.ml > path.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ident.cmx ident.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o path.cmx path.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o path.cmx path.ml
- File "path.ml", lines 109-119, characters 2-20:
- 109 | ..match p with
- 110 |     | Path_list -> 0
- 111 |     | Path_bool -> 1
- 112 |     | Path_nat -> 2
- 113 |     | Path_numeral -> 3
- ...
- 116 |     | Path_vector -> 6
- 117 |     | Path_char -> 7
- 118 |     | Path_string -> 8
- 119 |     | Path_unit -> 9
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Path_def (_, _)
- ocamlfind ocamldep -package zarith -modules backend.ml > backend.ml.depends
- ocamlfind ocamldep -package zarith -modules backend.mli > backend.mli.depends
- ocamlfind ocamldep -package zarith -modules typed_ast.mli > typed_ast.mli.depends
- ocamlfind ocamldep -package zarith -modules finite_map.ml > finite_map.ml.depends
- ocamlfind ocamldep -package zarith -modules nvar.mli > nvar.mli.depends
- ocamlfind ocamldep -package zarith -modules seplist.mli > seplist.mli.depends
- ocamlfind ocamldep -package zarith -modules target.mli > target.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o finite_map.cmo finite_map.ml
- ocamlfind ocamldep -package zarith -modules types.mli > types.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o nvar.cmi nvar.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o seplist.cmi seplist.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o target.cmi target.mli
- ocamlfind ocamldep -package zarith -modules tyvar.mli > tyvar.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o tyvar.cmi tyvar.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o types.cmi types.mli
- + ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o types.cmi types.mli
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o typed_ast.cmi typed_ast.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o backend.cmi backend.mli
- ocamlfind ocamldep -package zarith -modules backend_common.ml > backend_common.ml.depends
- ocamlfind ocamldep -package zarith -modules backend_common.mli > backend_common.mli.depends
- ocamlfind ocamldep -package zarith -modules macro_expander.mli > macro_expander.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o macro_expander.cmi macro_expander.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o backend_common.cmi backend_common.mli
- ocamlfind ocamldep -package zarith -modules pattern_syntax.ml > pattern_syntax.ml.depends
- ocamlfind ocamldep -package zarith -modules pattern_syntax.mli > pattern_syntax.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o pattern_syntax.cmi pattern_syntax.mli
- ocamlfind ocamldep -package zarith -modules seplist.ml > seplist.ml.depends
- ocamlfind ocamldep -package zarith -modules target.ml > target.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o finite_map.cmx finite_map.ml
- ocamlfind ocamldep -package zarith -modules typed_ast.ml > typed_ast.ml.depends
- ocamlfind ocamldep -package zarith -modules nvar.ml > nvar.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o seplist.cmx seplist.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o target.cmx target.ml
- ocamlfind ocamldep -package zarith -modules types.ml > types.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o nvar.cmx nvar.ml
- ocamlfind ocamldep -package zarith -modules tyvar.ml > tyvar.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o tyvar.cmx tyvar.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o types.cmx types.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o types.cmx types.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "types.ml", line 1615, characters 12-28:
- 1615 |     let rec walk_constraints = function
-                    ^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable walk_constraints.
- ocamlfind ocamldep -package zarith -modules typed_ast_syntax.ml > typed_ast_syntax.ml.depends
- ocamlfind ocamldep -package zarith -modules typed_ast_syntax.mli > typed_ast_syntax.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o typed_ast_syntax.cmi typed_ast_syntax.mli
- ocamlfind ocamldep -package zarith -modules external_constants.ml > external_constants.ml.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o external_constants.cmo external_constants.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typed_ast.cmx typed_ast.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typed_ast.cmx typed_ast.ml
- File "typed_ast.ml", lines 2496-2512, characters 4-13:
- 2496 | ....match t.term with
- 2497 |       | Typ_wild _ | Typ_var _ | Typ_paren _ | Typ_len _ -> t (*TODO Check that parens aren't needed *)
- 2498 |       | Typ_fn _ ->
- 2499 |           if ctxt = TC_fn_right then
- 2500 |             t
- ...
- 2509 |           if ctxt = TC_app then
- 2510 |             mk_tparen Ast.Unknown None t None (Some(t.typ))
- 2511 |           else 
- 2512 |             t
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Typ_with_sort (_, _)
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o external_constants.cmx external_constants.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typed_ast_syntax.cmx typed_ast_syntax.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typed_ast_syntax.cmx typed_ast_syntax.ml
- File "typed_ast_syntax.ml", lines 968-976, characters 2-52:
- 968 | ..match t.term with
- 969 |     | Typ_wild _ -> ue
- 970 |     | Typ_var _ -> ue
- 971 |     | Typ_len _ -> ue
- 972 |     | Typ_fn (t1, _, t2) -> add_src_t_entities (add_src_t_entities ue t1) t2
- 973 |     | Typ_tup sp -> Seplist.fold_left (fun t ue -> add_src_t_entities ue t) ue sp
- 974 |     | Typ_app (id, args) -> List.fold_left add_src_t_entities (used_entities_add_type ue id.descr) args
- 975 |     | Typ_backend (_, args) -> List.fold_left add_src_t_entities ue args
- 976 |     | Typ_paren (_, t, _) -> add_src_t_entities ue t
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Typ_with_sort (_, _)
- ocamlfind ocamldep -package zarith -modules precedence.ml > precedence.ml.depends
- ocamlfind ocamldep -package zarith -modules precedence.mli > precedence.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o precedence.cmi precedence.mli
- ocamlfind ocamldep -package zarith -modules share_directory.ml > share_directory.ml.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o share_directory.cmo share_directory.ml
- ocamlfind ocamldep -package zarith -modules target_binding.ml > target_binding.ml.depends
- ocamlfind ocamldep -package zarith -modules target_binding.mli > target_binding.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o target_binding.cmi target_binding.mli
- ocamlfind ocamldep -package zarith -modules macro_expander.ml > macro_expander.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o pattern_syntax.cmx pattern_syntax.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o precedence.cmx precedence.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o precedence.cmx precedence.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "precedence.ml", line 85, characters 14-15:
- 85 |   | P_special _ -> -1
-                    ^
- Warning 28 [wildcard-arg-to-constant-constr]: wildcard pattern given as argument to a constant constructor
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o share_directory.cmx share_directory.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o target_binding.cmx target_binding.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o macro_expander.cmx macro_expander.ml
- ocamlfind ocamldep -package zarith -modules coq_backend.ml > coq_backend.ml.depends
- ocamlfind ocamldep -package zarith -modules coq_backend_utils.ml > coq_backend_utils.ml.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o coq_backend_utils.cmo coq_backend_utils.ml
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o coq_backend.cmo coq_backend.ml
- + ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o coq_backend.cmo coq_backend.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend_common.cmx backend_common.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend_common.cmx backend_common.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend_utils.cmx coq_backend_utils.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend.cmx coq_backend.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend.cmx coq_backend.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamldep -package zarith -modules debug.ml > debug.ml.depends
- ocamlfind ocamldep -package zarith -modules pcombinators.mli > pcombinators.mli.depends
- ocamlfind ocamldep -package zarith -modules syntactic_tests.mli > syntactic_tests.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o pcombinators.cmi pcombinators.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o syntactic_tests.cmi syntactic_tests.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o debug.cmo debug.ml
- ocamlfind ocamldep -package zarith -modules pcombinators.ml > pcombinators.ml.depends
- ocamlfind ocamldep -package zarith -modules syntactic_tests.ml > syntactic_tests.ml.depends
- ocamlfind ocamldep -package zarith -modules reporting.ml > reporting.ml.depends
- ocamlfind ocamldep -package zarith -modules reporting.mli > reporting.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o reporting.cmi reporting.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend.cmx backend.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend.cmx backend.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "backend.ml", lines 1643-1650, characters 2-35:
- 1643 | ..match c_id_string with
- 1644 |   | "AilSyntax.Plus"        -> false
- 1645 |   | "AilSyntax.Minus"       -> false
- 1646 |   | "AilSyntax.Bnot"        -> false
- 1647 |   | "AilSyntax.Address"     -> false
- 1648 |   | "AilSyntax.Indirection" -> false
- 1649 |   | "AilSyntax.PostfixIncr" -> true
- 1650 |   | "AilSyntax.PostfixDecr" -> true
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "backend.ml", lines 1943-1948, characters 14-17:
- 1943 | ..............begin
- 1944 |                 match ppc (c_id_string',[]),  ail_unary_is_postfix c_id_string' with
- 1945 |                 | (kind,(Some op_output)), true  -> Ail, Some  [pparg e; (concat emp op_output) ]
- 1946 |                 | (kind,(Some op_output)), false -> Ail, Some  [pparg_flip_lskip (concat emp op_output) e ]
- 1947 |                 | (kind,None), true -> Ail, Some [pparg op; pparg e;]
- 1948 |               end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ((_, None), false)
- File "backend.ml", lines 1940-1950, characters 8-11:
- 1940 | ........begin
- 1941 |           match deconstruct_arg op with
- 1942 |           | Some (c_id_string',[]) ->
- 1943 |               begin
- 1944 |                 match ppc (c_id_string',[]),  ail_unary_is_postfix c_id_string' with
- ...
- 1947 |                 | (kind,None), true -> Ail, Some [pparg op; pparg e;]
- 1948 |               end
- 1949 |           | None -> Ail, Some [pparg op; pparg e;]
- 1950 |         end
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (_, _::_)
- File "backend.ml", lines 2915-2954, characters 40-73:
- 2915 | ........................................match t.term with
- 2916 |   | Typ_wild(sk) -> t
- 2917 |   | Typ_var(sk,tv) -> t
- 2918 |   | Typ_len(n) -> t
- 2919 |   | Typ_fn(t1,sk,t2) ->
- ...
- 2951 |                     { t with term = Typ_backend(id, List.map (hol_strip_args_t type_names) ts) }
- 2952 |       end
- 2953 |   | Typ_paren(sk1,t,sk2) ->
- 2954 |       { t with term = Typ_paren(sk1,hol_strip_args_t type_names t, sk2) }
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Typ_with_sort (_, _)
- File "backend.ml", line 2170, characters 9-16:
- 2170 |     let (c_descr : Typed_ast.const_descr) = c_env_lookup Ast.Unknown A.env.c_env cd.descr in
-                 ^^^^^^^
- Warning 26 [unused-var]: unused variable c_descr.
- File "backend.ml", line 3751, characters 12-69:
- 3751 |   | Val_def ((Let_def(s1, targets,(p, name_map, topt,sk, e)) as def)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable def.
- File "backend.ml", line 3762, characters 12-63:
- 3762 |   | Val_def ((Fun_def (s1, rec_flag, targets, clauses) as def)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable def.
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o reporting.cmx reporting.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o pcombinators.cmx pcombinators.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o syntactic_tests.cmx syntactic_tests.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o syntactic_tests.cmx syntactic_tests.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "syntactic_tests.ml", line 165, characters 10-70:
- 165 |           List.map (fun x -> check_decidable_equality_def' env x true)
-                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 5 [ignored-partial-application]: this function application is partial,
- maybe some arguments are missing.
- ocamlfind ocamldep -package zarith -modules initial_env.ml > initial_env.ml.depends
- ocamlfind ocamldep -package zarith -modules initial_env.mli > initial_env.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o initial_env.cmi initial_env.mli
- ocamlfind ocamldep -package zarith -modules process_file.ml > process_file.ml.depends
- ocamlfind ocamldep -package zarith -modules process_file.mli > process_file.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o process_file.cmi process_file.mli
- /home/opam/.opam/5.0/bin/ocamllex.opt -q lexer.mll
- ocamlfind ocamldep -package zarith -modules lexer.ml > lexer.ml.depends
- /home/opam/.opam/5.0/bin/ocamlyacc parser.mly
- + /home/opam/.opam/5.0/bin/ocamlyacc parser.mly
- 5 rules never reduced
- 2 shift/reduce conflicts, 2 reduce/reduce conflicts.
- ocamlfind ocamldep -package zarith -modules parser.mli > parser.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o parser.cmi parser.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o lexer.cmo lexer.ml
- ocamlfind ocamldep -package zarith -modules parser.ml > parser.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o parser.cmx parser.ml
- ocamlfind ocamldep -package zarith -modules trans.ml > trans.ml.depends
- ocamlfind ocamldep -package zarith -modules trans.mli > trans.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o trans.cmi trans.mli
- ocamlfind ocamldep -package zarith -modules patterns.ml > patterns.ml.depends
- ocamlfind ocamldep -package zarith -modules patterns.mli > patterns.mli.depends
- ocamlfind ocamldep -package zarith -modules def_trans.mli > def_trans.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o def_trans.cmi def_trans.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o patterns.cmi patterns.mli
- ocamlfind ocamldep -package zarith -modules def_trans.ml > def_trans.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o def_trans.cmx def_trans.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o def_trans.cmx def_trans.ml
- File "def_trans.ml", line 129, characters 32-55:
- 129 | let remove_import_include _ env (((d,s),l,lenv) as def) =
-                                       ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable def.
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o patterns.cmx patterns.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o patterns.cmx patterns.ml
- File "patterns.ml", line 94, characters 35-77:
- 94 | let check_number_patterns env p = (for_all_subpat check_number_patterns_aux p; ())
-                                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 10 [non-unit-statement]: this expression should have type unit.
- File "patterns.ml", line 2145, characters 6-21:
- 2145 |   let new_list_wc_pat = matrix_compile_mk_pwild list_ty in
-              ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable new_list_wc_pat.
- File "patterns.ml", line 2146, characters 6-21:
- 2146 |   let new_elem_wc_pat = matrix_compile_mk_pwild elem_ty in
-              ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable new_elem_wc_pat.
- File "patterns.ml", line 2190, characters 6-14:
- 2190 |   let nil_pats =
-              ^^^^^^^^
- Warning 26 [unused-var]: unused variable nil_pats.
- File "patterns.ml", line 2192, characters 6-15:
- 2192 |   let cons_pats =
-              ^^^^^^^^^
- Warning 26 [unused-var]: unused variable cons_pats.
- File "patterns.ml", line 2346, characters 6-19:
- 2346 |   let case_fun_else p ee =
-              ^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable case_fun_else.
- File "patterns.ml", line 2348, characters 6-18:
- 2348 |   let dest_in_else e = [] in
-              ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable dest_in_else.
- File "patterns.ml", line 2349, characters 6-20:
- 2349 |   let restr_pat_else _ = matrix_compile_mk_pwild p_ty in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable restr_pat_else.
- File "patterns.ml", line 2351, characters 6-10:
- 2351 |   let nall = List.length all_args in
-              ^^^^
- Warning 26 [unused-var]: unused variable nall.
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o lexer.cmx lexer.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o trans.cmx trans.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o process_file.cmx process_file.ml
- ocamlfind ocamldep -package zarith -modules module_dependencies.ml > module_dependencies.ml.depends
- ocamlfind ocamldep -package zarith -modules module_dependencies.mli > module_dependencies.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o module_dependencies.cmi module_dependencies.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o ast_util.cmx ast_util.ml
- ocamlfind ocamldep -package zarith -modules rename_top_level.ml > rename_top_level.ml.depends
- ocamlfind ocamldep -package zarith -modules rename_top_level.mli > rename_top_level.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o rename_top_level.cmi rename_top_level.mli
- ocamlfind ocamldep -package zarith -modules target_trans.ml > target_trans.ml.depends
- ocamlfind ocamldep -package zarith -modules target_trans.mli > target_trans.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o target_trans.cmi target_trans.mli
- ocamlfind ocamldep -package zarith -modules convert_relations.ml > convert_relations.ml.depends
- ocamlfind ocamldep -package zarith -modules typecheck_ctxt.mli > typecheck_ctxt.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o typecheck_ctxt.cmi typecheck_ctxt.mli
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o convert_relations.cmo convert_relations.ml
- + ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o convert_relations.cmo convert_relations.ml
- File "convert_relations.ml", lines 1494-1496, characters 6-45:
- 1494 | ......let Some (c_ref) = Nfmap.apply c_ref_m c_rule in
- 1495 |       let c_args = sep_no_skips (List.map t_to_src_t c_args) in
- 1496 |       (mk_name_l c_name, c_ref, None, c_args)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- None
- File "convert_relations.ml", lines 2014-2019, characters 6-55:
- 2014 | ......let ([output], equalities) =
- 2015 |         extract_patterns env avoid [v] [true] in
- 2016 |       let bound = Nmap.domain (pat_to_bound output) in
- 2017 |       LET(output, u,
- 2018 |           build_code (Nset.union bound known) indconds
- 2019 |             sideconds2 (equalities@eqconds2) usefuleqs)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ({typ=_; rest=_; _ }::{typ=_; rest=_; _ }::_, _)
- File "convert_relations.ml", line 1870, characters 6-10:
- 1870 |   let vars = Nfmap.domain (Nfmap.from_list rule.rule_vars) in
-              ^^^^
- Warning 26 [unused-var]: unused variable vars.
- ocamlfind ocamldep -package zarith -modules typecheck_ctxt.ml > typecheck_ctxt.ml.depends
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typecheck_ctxt.cmx typecheck_ctxt.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o rename_top_level.cmx rename_top_level.ml
- ocamlfind ocamldep -package zarith -modules target_syntax.ml > target_syntax.ml.depends
- ocamlfind ocamldep -package zarith -modules target_syntax.mli > target_syntax.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o target_syntax.cmi target_syntax.mli
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o convert_relations.cmx convert_relations.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o convert_relations.cmx convert_relations.ml
- File "convert_relations.ml", lines 1494-1496, characters 6-45:
- 1494 | ......let Some (c_ref) = Nfmap.apply c_ref_m c_rule in
- 1495 |       let c_args = sep_no_skips (List.map t_to_src_t c_args) in
- 1496 |       (mk_name_l c_name, c_ref, None, c_args)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- None
- File "convert_relations.ml", lines 2014-2019, characters 6-55:
- 2014 | ......let ([output], equalities) =
- 2015 |         extract_patterns env avoid [v] [true] in
- 2016 |       let bound = Nmap.domain (pat_to_bound output) in
- 2017 |       LET(output, u,
- 2018 |           build_code (Nset.union bound known) indconds
- 2019 |             sideconds2 (equalities@eqconds2) usefuleqs)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ({typ=_; rest=_; _ }::{typ=_; rest=_; _ }::_, _)
- File "convert_relations.ml", line 1870, characters 6-10:
- 1870 |   let vars = Nfmap.domain (Nfmap.from_list rule.rule_vars) in
-              ^^^^
- Warning 26 [unused-var]: unused variable vars.
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o target_syntax.cmx target_syntax.ml
- ocamlfind ocamldep -package zarith -modules typecheck.ml > typecheck.ml.depends
- ocamlfind ocamldep -package zarith -modules typecheck.mli > typecheck.mli.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o typecheck.cmi typecheck.mli
- ocamlfind ocamldep -package zarith -modules version.ml > version.ml.depends
- ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o version.cmo version.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o debug.cmx debug.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o initial_env.cmx initial_env.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o initial_env.cmx initial_env.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o module_dependencies.cmx module_dependencies.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o target_trans.cmx target_trans.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typecheck.cmx typecheck.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typecheck.cmx typecheck.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o version.cmx version.ml
- ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o main.cmx main.ml
- + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o main.cmx main.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- ocamlfind ocamlopt -linkpkg str.cmxa -package zarith -I ulib ulib/batReturn.cmx ulib/batUChar.cmx ulib/batUTF8.cmx ulib/batText.cmx ulib/ulib.cmx ast.cmx pp.cmx reporting_basic.cmx util.cmx output.cmx name.cmx ident.cmx path.cmx ast_util.cmx external_constants.cmx finite_map.cmx nvar.cmx seplist.cmx target.cmx tyvar.cmx types.cmx typed_ast.cmx macro_expander.cmx typed_ast_syntax.cmx pattern_syntax.cmx precedence.cmx share_directory.cmx target_binding.cmx backend_common.cmx coq_backend_utils.cmx coq_backend.cmx backend.cmx def_trans.cmx reporting.cmx patterns.cmx typecheck_ctxt.cmx convert_relations.cmx pcombinators.cmx syntactic_tests.cmx debug.cmx parser.cmx lexer.cmx trans.cmx process_file.cmx initial_env.cmx module_dependencies.cmx rename_top_level.cmx target_syntax.cmx target_trans.cmx typecheck.cmx version.cmx main.cmx -o main.native
- + ocamlfind ocamlopt -linkpkg str.cmxa -package zarith -I ulib ulib/batReturn.cmx ulib/batUChar.cmx ulib/batUTF8.cmx ulib/batText.cmx ulib/ulib.cmx ast.cmx pp.cmx reporting_basic.cmx util.cmx output.cmx name.cmx ident.cmx path.cmx ast_util.cmx external_constants.cmx finite_map.cmx nvar.cmx seplist.cmx target.cmx tyvar.cmx types.cmx typed_ast.cmx macro_expander.cmx typed_ast_syntax.cmx pattern_syntax.cmx precedence.cmx share_directory.cmx target_binding.cmx backend_common.cmx coq_backend_utils.cmx coq_backend.cmx backend.cmx def_trans.cmx reporting.cmx patterns.cmx typecheck_ctxt.cmx convert_relations.cmx pcombinators.cmx syntactic_tests.cmx debug.cmx parser.cmx lexer.cmx trans.cmx process_file.cmx initial_env.cmx module_dependencies.cmx rename_top_level.cmx target_syntax.cmx target_trans.cmx typecheck.cmx version.cmx main.cmx -o main.native
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/src'
- ln -sf src/main.native lem
- cat lem.sh >lem 
- chmod a+x lem
- mkdir -p bin
- cd bin && ln -sf ../src/main.native lem
- make -C library
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/library'
- make -C .. build-lem
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10'
- echo "(* Generated file -- do not edit. *)" > src/version.ml
- echo 'let v="2022-12-10"' >> src/version.ml
- echo "(* Generated file -- do not edit. *)" > src/share_directory.ml
- echo let d=\"/home/opam/.opam/5.0/share/lem\" >> src/share_directory.ml
- make -C src all
- make[3]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/src'
- ocamlbuild -use-ocamlfind -cflags -g main.native
- ocamlfind ocamlopt -linkpkg str.cmxa -package zarith -I ulib ulib/batReturn.cmx ulib/batUChar.cmx ulib/batUTF8.cmx ulib/batText.cmx ulib/ulib.cmx ast.cmx pp.cmx reporting_basic.cmx util.cmx output.cmx name.cmx ident.cmx path.cmx ast_util.cmx external_constants.cmx finite_map.cmx nvar.cmx seplist.cmx target.cmx tyvar.cmx types.cmx typed_ast.cmx macro_expander.cmx typed_ast_syntax.cmx pattern_syntax.cmx precedence.cmx share_directory.cmx target_binding.cmx backend_common.cmx coq_backend_utils.cmx coq_backend.cmx backend.cmx def_trans.cmx reporting.cmx patterns.cmx typecheck_ctxt.cmx convert_relations.cmx pcombinators.cmx syntactic_tests.cmx debug.cmx parser.cmx lexer.cmx trans.cmx process_file.cmx initial_env.cmx module_dependencies.cmx rename_top_level.cmx target_syntax.cmx target_trans.cmx typecheck.cmx version.cmx main.cmx -o main.native
- + ocamlfind ocamlopt -linkpkg str.cmxa -package zarith -I ulib ulib/batReturn.cmx ulib/batUChar.cmx ulib/batUTF8.cmx ulib/batText.cmx ulib/ulib.cmx ast.cmx pp.cmx reporting_basic.cmx util.cmx output.cmx name.cmx ident.cmx path.cmx ast_util.cmx external_constants.cmx finite_map.cmx nvar.cmx seplist.cmx target.cmx tyvar.cmx types.cmx typed_ast.cmx macro_expander.cmx typed_ast_syntax.cmx pattern_syntax.cmx precedence.cmx share_directory.cmx target_binding.cmx backend_common.cmx coq_backend_utils.cmx coq_backend.cmx backend.cmx def_trans.cmx reporting.cmx patterns.cmx typecheck_ctxt.cmx convert_relations.cmx pcombinators.cmx syntactic_tests.cmx debug.cmx parser.cmx lexer.cmx trans.cmx process_file.cmx initial_env.cmx module_dependencies.cmx rename_top_level.cmx target_syntax.cmx target_trans.cmx typecheck.cmx version.cmx main.cmx -o main.native
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- make[3]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/src'
- ln -sf src/main.native lem
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10'
- ../lem -ocaml -outdir ../ocaml-lib -wl ign -wl_auto_import err -wl_rename err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem -auxiliary_level none -only_changed_output
- ../lem -hol -hol_remove_matches -outdir ../hol-lib -wl ign -wl_auto_import err -wl_rename err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem -auxiliary_level none -only_changed_output
- ../lem -isa -outdir ../isabelle-lib -wl ign -wl_auto_import err -wl_rename err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem -auxiliary_level none -only_changed_output
- ../lem -coq -outdir ../coq-lib -wl ign -wl_auto_import err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem -auxiliary_level none -only_changed_output
- ../lem -tex_all ../tex-lib/lem-libs.tex -wl ign -wl_auto_import err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem 
- ../lem -html -outdir ../html-lib -wl ign -wl_auto_import err bool.lem basic_classes.lem function.lem maybe.lem num.lem tuple.lem list.lem either.lem set_helpers.lem set.lem map.lem relation.lem sorting.lem function_extra.lem assert_extra.lem list_extra.lem string.lem num_extra.lem map_extra.lem set_extra.lem maybe_extra.lem string_extra.lem word.lem show.lem show_extra.lem machine_word.lem pervasives.lem pervasives_extra.lem debug.lem 
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/library'
- make ocaml-libs
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10'
- make -C ocaml-lib all
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- Makefile:10: warning: overriding recipe for target 'clean'
- ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean'
- ocamlbuild -build-dir _build_zarith -X local -X dependencies -I num_impl_zarith -use-ocamlfind -pkg zarith extract.cma extract.cmxa
- ocamlfind ocamldep -package zarith -modules num_impl_zarith/big_int_impl.mli > num_impl_zarith/big_int_impl.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o num_impl_zarith/big_int_impl.cmi num_impl_zarith/big_int_impl.mli
- ocamlfind ocamldep -package zarith -modules num_impl_zarith/big_int_impl.ml > num_impl_zarith/big_int_impl.ml.depends
- ocamlfind ocamldep -package zarith -modules num_impl_zarith/rational_impl.mli > num_impl_zarith/rational_impl.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o num_impl_zarith/rational_impl.cmi num_impl_zarith/rational_impl.mli
- ocamlfind ocamldep -package zarith -modules num_impl_zarith/rational_impl.ml > num_impl_zarith/rational_impl.ml.depends
- ocamlfind ocamldep -package zarith -modules nat_big_num.mli > nat_big_num.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o nat_big_num.cmi nat_big_num.mli
- ocamlfind ocamldep -package zarith -modules nat_big_num.ml > nat_big_num.ml.depends
- ocamlfind ocamldep -package zarith -modules nat_num.mli > nat_num.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o nat_num.cmi nat_num.mli
- ocamlfind ocamldep -package zarith -modules nat_num.ml > nat_num.ml.depends
- ocamlfind ocamldep -package zarith -modules rational.mli > rational.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o rational.cmi rational.mli
- ocamlfind ocamldep -package zarith -modules rational.ml > rational.ml.depends
- ocamlfind ocamldep -package zarith -modules pset.mli > pset.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o pset.cmi pset.mli
- ocamlfind ocamldep -package zarith -modules pset.ml > pset.ml.depends
- ocamlfind ocamldep -package zarith -modules pmap.mli > pmap.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o pmap.cmi pmap.mli
- ocamlfind ocamldep -package zarith -modules pmap.ml > pmap.ml.depends
- ocamlfind ocamldep -package zarith -modules vector.mli > vector.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o vector.cmi vector.mli
- ocamlfind ocamldep -package zarith -modules vector.ml > vector.ml.depends
- ocamlfind ocamldep -package zarith -modules bit.mli > bit.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o bit.cmi bit.mli
- ocamlfind ocamldep -package zarith -modules bit.ml > bit.ml.depends
- ocamlfind ocamldep -package zarith -modules xstring.mli > xstring.mli.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o xstring.cmi xstring.mli
- ocamlfind ocamldep -package zarith -modules xstring.ml > xstring.ml.depends
- ocamlfind ocamldep -package zarith -modules either.ml > either.ml.depends
- ocamlfind ocamldep -package zarith -modules lem.ml > lem.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_assert_extra.ml > lem_assert_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_basic_classes.ml > lem_basic_classes.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem.cmo lem.ml
- ocamlfind ocamldep -package zarith -modules lem_bool.ml > lem_bool.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_bool.cmo lem_bool.ml
- ocamlfind ocamldep -package zarith -modules lem_either.ml > lem_either.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o either.cmo either.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_basic_classes.cmo lem_basic_classes.ml
- ocamlfind ocamldep -package zarith -modules lem_list.ml > lem_list.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_function.ml > lem_function.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_maybe.ml > lem_maybe.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_function.cmo lem_function.ml
- ocamlfind ocamldep -package zarith -modules lem_num.ml > lem_num.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_tuple.ml > lem_tuple.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_maybe.cmo lem_maybe.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_num.cmo lem_num.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_tuple.cmo lem_tuple.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_list.cmo lem_list.ml
- ocamlfind ocamldep -package zarith -modules lem_function_extra.ml > lem_function_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_list_extra.ml > lem_list_extra.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_assert_extra.cmo lem_assert_extra.ml
- ocamlfind ocamldep -package zarith -modules lem_machine_word.ml > lem_machine_word.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_show.ml > lem_show.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_string.ml > lem_string.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_string.cmo lem_string.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_show.cmo lem_show.ml
- ocamlfind ocamldep -package zarith -modules lem_map.ml > lem_map.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_set.ml > lem_set.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_set_helpers.ml > lem_set_helpers.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_set_helpers.cmo lem_set_helpers.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_set.cmo lem_set.ml
- ocamlfind ocamldep -package zarith -modules lem_map_extra.ml > lem_map_extra.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_map.cmo lem_map.ml
- ocamlfind ocamldep -package zarith -modules lem_maybe_extra.ml > lem_maybe_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_num_extra.ml > lem_num_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_pervasives.ml > lem_pervasives.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_either.cmo lem_either.ml
- ocamlfind ocamldep -package zarith -modules lem_word.ml > lem_word.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_word.cmo lem_word.ml
- ocamlfind ocamldep -package zarith -modules lem_pervasives_extra.ml > lem_pervasives_extra.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_function_extra.cmo lem_function_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_list_extra.cmo lem_list_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_machine_word.cmo lem_machine_word.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_map_extra.cmo lem_map_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_maybe_extra.cmo lem_maybe_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_num_extra.cmo lem_num_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_pervasives.cmo lem_pervasives.ml
- ocamlfind ocamldep -package zarith -modules lem_set_extra.ml > lem_set_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_sorting.ml > lem_sorting.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_sorting.cmo lem_sorting.ml
- ocamlfind ocamldep -package zarith -modules lem_show_extra.ml > lem_show_extra.ml.depends
- ocamlfind ocamldep -package zarith -modules lem_relation.ml > lem_relation.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_relation.cmo lem_relation.ml
- ocamlfind ocamldep -package zarith -modules lem_string_extra.ml > lem_string_extra.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_set_extra.cmo lem_set_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_show_extra.cmo lem_show_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_string_extra.cmo lem_string_extra.ml
- ocamlfind ocamldep -package zarith -modules lem_debug.ml > lem_debug.ml.depends
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o num_impl_zarith/big_int_impl.cmo num_impl_zarith/big_int_impl.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o num_impl_zarith/rational_impl.cmo num_impl_zarith/rational_impl.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o nat_big_num.cmo nat_big_num.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o nat_num.cmo nat_num.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o rational.cmo rational.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o pset.cmo pset.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o pmap.cmo pmap.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o vector.cmo vector.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o bit.cmo bit.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o xstring.cmo xstring.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_pervasives_extra.cmo lem_pervasives_extra.ml
- ocamlfind ocamlc -c -package zarith -I num_impl_zarith -o lem_debug.cmo lem_debug.ml
- ocamlfind ocamlc -a -package zarith -I num_impl_zarith num_impl_zarith/big_int_impl.cmo num_impl_zarith/rational_impl.cmo nat_big_num.cmo nat_num.cmo rational.cmo pset.cmo pmap.cmo vector.cmo bit.cmo xstring.cmo either.cmo lem.cmo lem_assert_extra.cmo lem_bool.cmo lem_basic_classes.cmo lem_function.cmo lem_maybe.cmo lem_num.cmo lem_tuple.cmo lem_list.cmo lem_either.cmo lem_function_extra.cmo lem_list_extra.cmo lem_string.cmo lem_show.cmo lem_machine_word.cmo lem_set_helpers.cmo lem_set.cmo lem_map.cmo lem_map_extra.cmo lem_maybe_extra.cmo lem_num_extra.cmo lem_word.cmo lem_pervasives.cmo lem_sorting.cmo lem_set_extra.cmo lem_relation.cmo lem_show_extra.cmo lem_string_extra.cmo lem_pervasives_extra.cmo lem_debug.cmo -o extract.cma
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o num_impl_zarith/big_int_impl.cmx num_impl_zarith/big_int_impl.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o num_impl_zarith/rational_impl.cmx num_impl_zarith/rational_impl.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o pset.cmx pset.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o nat_num.cmx nat_num.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o nat_big_num.cmx nat_big_num.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o xstring.cmx xstring.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem.cmx lem.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_bool.cmx lem_bool.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o either.cmx either.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_basic_classes.cmx lem_basic_classes.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_function.cmx lem_function.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o rational.cmx rational.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_maybe.cmx lem_maybe.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_num.cmx lem_num.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_tuple.cmx lem_tuple.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_list.cmx lem_list.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_assert_extra.cmx lem_assert_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_string.cmx lem_string.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_show.cmx lem_show.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_set_helpers.cmx lem_set_helpers.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o pmap.cmx pmap.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_set.cmx lem_set.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_map.cmx lem_map.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_either.cmx lem_either.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_word.cmx lem_word.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_function_extra.cmx lem_function_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_list_extra.cmx lem_list_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_machine_word.cmx lem_machine_word.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_map_extra.cmx lem_map_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_maybe_extra.cmx lem_maybe_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_num_extra.cmx lem_num_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_pervasives.cmx lem_pervasives.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_sorting.cmx lem_sorting.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_relation.cmx lem_relation.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_set_extra.cmx lem_set_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_show_extra.cmx lem_show_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_string_extra.cmx lem_string_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o vector.cmx vector.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o bit.cmx bit.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_pervasives_extra.cmx lem_pervasives_extra.ml
- ocamlfind ocamlopt -c -package zarith -I num_impl_zarith -o lem_debug.cmx lem_debug.ml
- ocamlfind ocamlopt -a -package zarith -I num_impl_zarith num_impl_zarith/big_int_impl.cmx num_impl_zarith/rational_impl.cmx nat_big_num.cmx nat_num.cmx rational.cmx pset.cmx pmap.cmx vector.cmx bit.cmx xstring.cmx either.cmx lem.cmx lem_assert_extra.cmx lem_bool.cmx lem_basic_classes.cmx lem_function.cmx lem_maybe.cmx lem_num.cmx lem_tuple.cmx lem_list.cmx lem_either.cmx lem_function_extra.cmx lem_list_extra.cmx lem_string.cmx lem_show.cmx lem_machine_word.cmx lem_set_helpers.cmx lem_set.cmx lem_map.cmx lem_map_extra.cmx lem_maybe_extra.cmx lem_num_extra.cmx lem_word.cmx lem_pervasives.cmx lem_relation.cmx lem_sorting.cmx lem_set_extra.cmx lem_show_extra.cmx lem_string_extra.cmx lem_pervasives_extra.cmx lem_debug.cmx -o extract.cmxa
- ocamlbuild -build-dir _build_num -X local -X dependencies -I num_impl_num -use-ocamlfind -pkg num extract.cma extract.cmxa
- ocamlfind ocamldep -package num -modules num_impl_num/big_int_impl.mli > num_impl_num/big_int_impl.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o num_impl_num/big_int_impl.cmi num_impl_num/big_int_impl.mli
- ocamlfind ocamldep -package num -modules num_impl_num/big_int_impl.ml > num_impl_num/big_int_impl.ml.depends
- ocamlfind ocamldep -package num -modules num_impl_num/rational_impl.mli > num_impl_num/rational_impl.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o num_impl_num/rational_impl.cmi num_impl_num/rational_impl.mli
- ocamlfind ocamldep -package num -modules num_impl_num/rational_impl.ml > num_impl_num/rational_impl.ml.depends
- ocamlfind ocamldep -package num -modules nat_big_num.mli > nat_big_num.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o nat_big_num.cmi nat_big_num.mli
- ocamlfind ocamldep -package num -modules nat_big_num.ml > nat_big_num.ml.depends
- ocamlfind ocamldep -package num -modules nat_num.mli > nat_num.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o nat_num.cmi nat_num.mli
- ocamlfind ocamldep -package num -modules nat_num.ml > nat_num.ml.depends
- ocamlfind ocamldep -package num -modules rational.mli > rational.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o rational.cmi rational.mli
- ocamlfind ocamldep -package num -modules rational.ml > rational.ml.depends
- ocamlfind ocamldep -package num -modules pset.mli > pset.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o pset.cmi pset.mli
- ocamlfind ocamldep -package num -modules pset.ml > pset.ml.depends
- ocamlfind ocamldep -package num -modules pmap.mli > pmap.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o pmap.cmi pmap.mli
- ocamlfind ocamldep -package num -modules pmap.ml > pmap.ml.depends
- ocamlfind ocamldep -package num -modules vector.mli > vector.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o vector.cmi vector.mli
- ocamlfind ocamldep -package num -modules vector.ml > vector.ml.depends
- ocamlfind ocamldep -package num -modules bit.mli > bit.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o bit.cmi bit.mli
- ocamlfind ocamldep -package num -modules bit.ml > bit.ml.depends
- ocamlfind ocamldep -package num -modules xstring.mli > xstring.mli.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o xstring.cmi xstring.mli
- ocamlfind ocamldep -package num -modules xstring.ml > xstring.ml.depends
- ocamlfind ocamldep -package num -modules either.ml > either.ml.depends
- ocamlfind ocamldep -package num -modules lem.ml > lem.ml.depends
- ocamlfind ocamldep -package num -modules lem_assert_extra.ml > lem_assert_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_basic_classes.ml > lem_basic_classes.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem.cmo lem.ml
- ocamlfind ocamldep -package num -modules lem_bool.ml > lem_bool.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_bool.cmo lem_bool.ml
- ocamlfind ocamldep -package num -modules lem_either.ml > lem_either.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o either.cmo either.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_basic_classes.cmo lem_basic_classes.ml
- ocamlfind ocamldep -package num -modules lem_list.ml > lem_list.ml.depends
- ocamlfind ocamldep -package num -modules lem_function.ml > lem_function.ml.depends
- ocamlfind ocamldep -package num -modules lem_maybe.ml > lem_maybe.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_function.cmo lem_function.ml
- ocamlfind ocamldep -package num -modules lem_num.ml > lem_num.ml.depends
- ocamlfind ocamldep -package num -modules lem_tuple.ml > lem_tuple.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_maybe.cmo lem_maybe.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_num.cmo lem_num.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_tuple.cmo lem_tuple.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_list.cmo lem_list.ml
- ocamlfind ocamldep -package num -modules lem_function_extra.ml > lem_function_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_list_extra.ml > lem_list_extra.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_assert_extra.cmo lem_assert_extra.ml
- ocamlfind ocamldep -package num -modules lem_machine_word.ml > lem_machine_word.ml.depends
- ocamlfind ocamldep -package num -modules lem_show.ml > lem_show.ml.depends
- ocamlfind ocamldep -package num -modules lem_string.ml > lem_string.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_string.cmo lem_string.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_show.cmo lem_show.ml
- ocamlfind ocamldep -package num -modules lem_map.ml > lem_map.ml.depends
- ocamlfind ocamldep -package num -modules lem_set.ml > lem_set.ml.depends
- ocamlfind ocamldep -package num -modules lem_set_helpers.ml > lem_set_helpers.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_set_helpers.cmo lem_set_helpers.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_set.cmo lem_set.ml
- ocamlfind ocamldep -package num -modules lem_map_extra.ml > lem_map_extra.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_map.cmo lem_map.ml
- ocamlfind ocamldep -package num -modules lem_maybe_extra.ml > lem_maybe_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_num_extra.ml > lem_num_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_pervasives.ml > lem_pervasives.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_either.cmo lem_either.ml
- ocamlfind ocamldep -package num -modules lem_word.ml > lem_word.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_word.cmo lem_word.ml
- ocamlfind ocamldep -package num -modules lem_pervasives_extra.ml > lem_pervasives_extra.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_function_extra.cmo lem_function_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_list_extra.cmo lem_list_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_machine_word.cmo lem_machine_word.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_map_extra.cmo lem_map_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_maybe_extra.cmo lem_maybe_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_num_extra.cmo lem_num_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_pervasives.cmo lem_pervasives.ml
- ocamlfind ocamldep -package num -modules lem_set_extra.ml > lem_set_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_sorting.ml > lem_sorting.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_sorting.cmo lem_sorting.ml
- ocamlfind ocamldep -package num -modules lem_show_extra.ml > lem_show_extra.ml.depends
- ocamlfind ocamldep -package num -modules lem_relation.ml > lem_relation.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_relation.cmo lem_relation.ml
- ocamlfind ocamldep -package num -modules lem_string_extra.ml > lem_string_extra.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_set_extra.cmo lem_set_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_show_extra.cmo lem_show_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_string_extra.cmo lem_string_extra.ml
- ocamlfind ocamldep -package num -modules lem_debug.ml > lem_debug.ml.depends
- ocamlfind ocamlc -c -package num -I num_impl_num -o num_impl_num/big_int_impl.cmo num_impl_num/big_int_impl.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o num_impl_num/rational_impl.cmo num_impl_num/rational_impl.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o nat_big_num.cmo nat_big_num.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o nat_num.cmo nat_num.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o rational.cmo rational.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o pset.cmo pset.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o pmap.cmo pmap.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o vector.cmo vector.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o bit.cmo bit.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o xstring.cmo xstring.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_pervasives_extra.cmo lem_pervasives_extra.ml
- ocamlfind ocamlc -c -package num -I num_impl_num -o lem_debug.cmo lem_debug.ml
- ocamlfind ocamlc -a -package num -I num_impl_num num_impl_num/big_int_impl.cmo num_impl_num/rational_impl.cmo nat_big_num.cmo nat_num.cmo rational.cmo pset.cmo pmap.cmo vector.cmo bit.cmo xstring.cmo either.cmo lem.cmo lem_assert_extra.cmo lem_bool.cmo lem_basic_classes.cmo lem_function.cmo lem_maybe.cmo lem_num.cmo lem_tuple.cmo lem_list.cmo lem_either.cmo lem_function_extra.cmo lem_list_extra.cmo lem_string.cmo lem_show.cmo lem_machine_word.cmo lem_set_helpers.cmo lem_set.cmo lem_map.cmo lem_map_extra.cmo lem_maybe_extra.cmo lem_num_extra.cmo lem_word.cmo lem_pervasives.cmo lem_sorting.cmo lem_set_extra.cmo lem_relation.cmo lem_show_extra.cmo lem_string_extra.cmo lem_pervasives_extra.cmo lem_debug.cmo -o extract.cma
- ocamlfind ocamlopt -c -package num -I num_impl_num -o num_impl_num/big_int_impl.cmx num_impl_num/big_int_impl.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o num_impl_num/rational_impl.cmx num_impl_num/rational_impl.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o pset.cmx pset.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o nat_num.cmx nat_num.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o nat_big_num.cmx nat_big_num.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o xstring.cmx xstring.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem.cmx lem.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_bool.cmx lem_bool.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o either.cmx either.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_basic_classes.cmx lem_basic_classes.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_function.cmx lem_function.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o rational.cmx rational.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_maybe.cmx lem_maybe.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_num.cmx lem_num.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_tuple.cmx lem_tuple.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_list.cmx lem_list.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_assert_extra.cmx lem_assert_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_string.cmx lem_string.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_show.cmx lem_show.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_set_helpers.cmx lem_set_helpers.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o pmap.cmx pmap.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_set.cmx lem_set.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_map.cmx lem_map.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_either.cmx lem_either.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_word.cmx lem_word.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_function_extra.cmx lem_function_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_list_extra.cmx lem_list_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_machine_word.cmx lem_machine_word.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_map_extra.cmx lem_map_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_maybe_extra.cmx lem_maybe_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_num_extra.cmx lem_num_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_pervasives.cmx lem_pervasives.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_sorting.cmx lem_sorting.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_relation.cmx lem_relation.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_set_extra.cmx lem_set_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_show_extra.cmx lem_show_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_string_extra.cmx lem_string_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o vector.cmx vector.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o bit.cmx bit.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_pervasives_extra.cmx lem_pervasives_extra.ml
- ocamlfind ocamlopt -c -package num -I num_impl_num -o lem_debug.cmx lem_debug.ml
- ocamlfind ocamlopt -a -package num -I num_impl_num num_impl_num/big_int_impl.cmx num_impl_num/rational_impl.cmx nat_big_num.cmx nat_num.cmx rational.cmx pset.cmx pmap.cmx vector.cmx bit.cmx xstring.cmx either.cmx lem.cmx lem_assert_extra.cmx lem_bool.cmx lem_basic_classes.cmx lem_function.cmx lem_maybe.cmx lem_num.cmx lem_tuple.cmx lem_list.cmx lem_either.cmx lem_function_extra.cmx lem_list_extra.cmx lem_string.cmx lem_show.cmx lem_machine_word.cmx lem_set_helpers.cmx lem_set.cmx lem_map.cmx lem_map_extra.cmx lem_maybe_extra.cmx lem_num_extra.cmx lem_word.cmx lem_pervasives.cmx lem_relation.cmx lem_sorting.cmx lem_set_extra.cmx lem_show_extra.cmx lem_string_extra.cmx lem_pervasives_extra.cmx lem_debug.cmx -o extract.cmxa
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- make -C library ocaml-lib-tests
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/library'
- lem_basic_classesAuxiliary.ml
- lem_boolAuxiliary.ml
- lem_eitherAuxiliary.ml
- lem_function_extraAuxiliary.ml
- lem_listAuxiliary.ml
- lem_list_extraAuxiliary.ml
- lem_machine_wordAuxiliary.ml
- lem_mapAuxiliary.ml
- lem_map_extraAuxiliary.ml
- lem_maybeAuxiliary.ml
- lem_numAuxiliary.ml
- lem_num_extraAuxiliary.ml
- lem_relationAuxiliary.ml
- lem_setAuxiliary.ml
- lem_set_extraAuxiliary.ml
- lem_sortingAuxiliary.ml
- lem_stringAuxiliary.ml
- lem_string_extraAuxiliary.ml
- lem_tupleAuxiliary.ml
- lem_wordAuxiliary.ml
- 
- 
- 
- 
- ***************************************************
- * Testing lem_basic_classes
- ***************************************************
- 
- ordering_cases_0: ok
- ordering_cases_1: ok
- ordering_cases_2: ok
- ordering_match_1: ok
- ordering_match_2: ok
- ordering_match_3: ok
- ordering_match_4: ok
- ordering_match_5: ok
- ordering_match_6: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_bool
- ***************************************************
- 
- not_1: ok
- not_2: ok
- and_1: ok
- and_2: ok
- and_3: ok
- and_4: ok
- or_1: ok
- or_2: ok
- or_3: ok
- or_4: ok
- imp_1: ok
- imp_2: ok
- imp_3: ok
- imp_4: ok
- equiv_1: ok
- equiv_2: ok
- equiv_3: ok
- equiv_4: ok
- xor_1: ok
- xor_2: ok
- xor_3: ok
- xor_4: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_either
- ***************************************************
- 
- either_equal_1: ok
- either_equal_2: ok
- either_equal_3: ok
- either_equal_4: ok
- either_equal_5: ok
- either_equal_6: ok
- either_equal_7: ok
- either_pattern_1: ok
- either_pattern_2: ok
- either_pattern_3: ok
- either_pattern_4: ok
- isLeft_1: ok
- isLeft_2: ok
- isRight_1: ok
- isRight_2: ok
- either_1: ok
- either_2: ok
- either_3: ok
- either_4: ok
- partitionEither_1: ok
- lefts_1: ok
- rights_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_function_extra
- ***************************************************
- 
- id_0: ok
- id_1: ok
- id_2: ok
- const_0: ok
- const_1: ok
- const_2: ok
- comb_0: ok
- comb_1: ok
- apply_0: ok
- apply_1: ok
- flip_0: ok
- flip_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_list
- ***************************************************
- 
- null_simple_1: ok
- null_simple_2: ok
- null_simple_3: ok
- length_0: ok
- length_1: ok
- length_2: ok
- list_ord_1: ok
- list_ord_2: ok
- list_ord_3: ok
- list_ord_4: ok
- list_ord_5: ok
- list_ord_6: ok
- list_ord_7: ok
- list_ord_8: ok
- list_ord_9: ok
- append_1: ok
- snoc_1: ok
- snoc_2: ok
- snoc_3: ok
- reverseAppend_1: ok
- reverse_nil: ok
- reverse_1: ok
- reverse_2: ok
- reverse_5: ok
- map_nil: ok
- map_1: ok
- map_2: ok
- map_3: ok
- map_4: ok
- map_5: ok
- map_6: ok
- foldl_0: ok
- foldl_1: ok
- foldl_4: ok
- foldr_0: ok
- foldr_1: ok
- foldr_4: ok
- concat_nil: ok
- concat_1: ok
- concat_2: ok
- concat_3: ok
- concatMap_nil: ok
- concatMap_1: ok
- concatMap_2: ok
- concatMap_3: ok
- all_0: ok
- all_4: ok
- all_4_neg: ok
- any_0: ok
- any_4: ok
- any_4_neg: ok
- dest_init_0: ok
- dest_init_1: ok
- dest_init_2: ok
- index_0: ok
- index_1: ok
- index_2: ok
- index_3: ok
- index_4: ok
- index_5: ok
- index_6: ok
- findIndices_1: ok
- findIndices_2: ok
- findIndices_3: ok
- find_index0: ok
- find_index1: ok
- find_index2: ok
- elemIndices_0: ok
- elemIndices_1: ok
- elemIndices_2: ok
- elemIndex_0: ok
- elemIndex_1: ok
- elemIndex_2: ok
- genlist_0: ok
- genlist_1: ok
- genlist_2: ok
- genlist_3: ok
- replicate_0: ok
- replicate_1: ok
- replicate_2: ok
- replicate_3: ok
- splitAt_1: ok
- splitAt_2: ok
- splitAt_3: ok
- take_1: ok
- take_2: ok
- take_3: ok
- drop_1: ok
- drop_2: ok
- drop_3: ok
- splitWhile_1: ok
- splitWhile_2: ok
- dropWhile_0: ok
- dropWhile_1: ok
- dropWhile_2: ok
- dropWhile_3: ok
- takeWhile_0: ok
- takeWhile_1: ok
- takeWhile_2: ok
- takeWhile_3: ok
- isPrefixOf_0: ok
- isPrefixOf_1: ok
- isPrefixOf_2: ok
- isPrefixOf_3: ok
- isPrefixOf_4: ok
- list_update_1: ok
- list_update_2: ok
- list_update_3: ok
- list_update_4: ok
- list_update_5: ok
- elem_1: ok
- elem_2: ok
- elem_3: ok
- elem_4: ok
- find_1: ok
- find_2: ok
- find_3: ok
- find_4: ok
- lookup_1: ok
- lookup_2: ok
- lookup_3: ok
- filter_0: ok
- filter_1: ok
- partition_0: ok
- partition_1: ok
- deleteFirst_1: ok
- deleteFirst_2: ok
- deleteFirst_3: ok
- delete_1: ok
- delete_2: ok
- delete_3: ok
- delete_4: ok
- zip_1: ok
- zip_2: ok
- unzip_1: ok
- unzip_2: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_list_extra
- ***************************************************
- 
- head_simple_1: ok
- head_simple_2: ok
- tail_simple_1: ok
- tail_simple_2: ok
- tail_simple_3: ok
- last_simple_1: ok
- last_simple_2: ok
- init_simple_1: ok
- init_simple_2: ok
- init_simple_3: ok
- nth_0: ok
- nth_1: ok
- nth_2: ok
- nth_3: ok
- nth_4: ok
- nth_5: ok
- zipSameLength_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_machine_word
- ***************************************************
- 
- size_test: ok
- size_itself_test: ok
- length_test: ok
- signedIntFromword_test: ok
- wordFromBitlist_test: ok
- bitlistFromWord_test: ok
- wordFromBitlist_bitListFromWord_test: ok
- extract_concat_test: ok
- update_test: ok
- setBit_test1: ok
- setBit_test2: ok
- setBit_test3: ok
- getBit_test: ok
- msb_test1: ok
- msb_test2: ok
- lsb_test1: ok
- lsb_test2: ok
- shift_test1: ok
- shift_test2: ok
- shift_test3: ok
- shift_test4: ok
- and_test: ok
- or_test: ok
- xor_test: ok
- not_test: ok
- rotateR_test: ok
- rotateL_test: ok
- zext_test_0: ok
- zext_test_1: ok
- wordFromInteger_nat_test1: ok
- wordFromInteger_nat_test2: ok
- plus_test: ok
- minus_test: ok
- times_test: ok
- udiv_test: ok
- sdiv_test: ok
- signedLess_test_1: ok
- signedLess_test_2: ok
- signedLess_test_3: ok
- signedLessEq_test_1: ok
- signedLessEq_test_2: ok
- signedLessEq_test_3: ok
- unsignedLess_test_1: ok
- unsignedLess_test_2: ok
- unsignedLess_test_3: ok
- unsignedLessEq_test_1: ok
- unsignedLessEq_test_2: ok
- unsignedLessEq_test_3: ok
- signed_shift_test1: ok
- sext_test_0: ok
- sext_test_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_map
- ***************************************************
- 
- insert_equal_singleton: ok
- commutative_insert_1: ok
- commutative_insert_2: ok
- empty_null: ok
- lookup_insert_1: ok
- lookup_insert_2: ok
- lookup_insert_3: ok
- lookup_empty_0: ok
- find_insert_0: ok
- fromList_0: ok
- fromList_1: ok
- toSet_0: ok
- toSet_1: ok
- toSet_2: ok
- domain_0: ok
- domain_1: ok
- domain_2: ok
- range_0: ok
- range_1: ok
- range_2: ok
- member_insert_1: ok
- member_insert_2: ok
- member_insert_3: ok
- any_0: ok
- any_1: ok
- any_2: ok
- any_3: ok
- all_0: ok
- all_1: ok
- all_2: ok
- all_3: ok
- delete_insert_1: ok
- delete_insert_2: ok
- delete_delete: ok
- map_0: ok
- empty_size: ok
- singleton_size: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_map_extra
- ***************************************************
- 
- find_insert_1: ok
- find_insert_2: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_maybe
- ***************************************************
- 
- maybe_eq_1: ok
- maybe_eq_2: ok
- maybe_eq_3: ok
- maybe_eq_4: ok
- maybe_1: ok
- maybe_2: ok
- maybe_3: ok
- maybe_4: ok
- isJust_1: ok
- isJust_2: ok
- isNothing_1: ok
- isNothing_2: ok
- fromMaybe_1: ok
- fromMaybe_2: ok
- fromMaybe_3: ok
- fromMaybe_4: ok
- map_1: ok
- map_2: ok
- map_3: ok
- bind_1: ok
- bind_2: ok
- bind_3: ok
- bind_4: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_num
- ***************************************************
- 
- nat_test1: ok
- nat_test2: ok
- nat_test3: ok
- nat_test4: ok
- nat_test5: ok
- nat_test6: ok
- nat_test7: ok
- nat_test8: ok
- nat_test9: ok
- nat_test10: ok
- nat_test11: ok
- nat_test12: ok
- nat_test13: ok
- nat_test14: ok
- nat_test15: ok
- nat_test16: ok
- nat_test17: ok
- nat_test18: ok
- nat_test19: ok
- nat_test20: ok
- nat_test21: ok
- nat_test22: ok
- nat_test23: ok
- nat_test24: ok
- nat_test25: ok
- nat_test26: ok
- nat_test27: ok
- nat_test28a: ok
- nat_test28b: ok
- nat_test29: ok
- natural_test1: ok
- natural_test2: ok
- natural_test3: ok
- natural_test4: ok
- natural_test5: ok
- natural_test6: ok
- natural_test7: ok
- natural_test8: ok
- natural_test9: ok
- natural_test10: ok
- natural_test11: ok
- natural_test12: ok
- natural_test13: ok
- natural_test14: ok
- natural_test15: ok
- natural_test16: ok
- natural_test17: ok
- natural_test18: ok
- natural_test19: ok
- natural_test20: ok
- natural_test21: ok
- natural_test22: ok
- natural_test23: ok
- natural_test24: ok
- natural_test25: ok
- natural_test26: ok
- natural_test27: ok
- natural_test28a: ok
- natural_test28b: ok
- natural_test29: ok
- int_test1: ok
- int_test2: ok
- int_test3: ok
- int_test4: ok
- int_test5: ok
- int_test6: ok
- int_test6a: ok
- int_test7: ok
- int_test7a: ok
- int_test8: ok
- int_test8at: ok
- int_test9: ok
- int_test10: ok
- int_test11: ok
- int_test12: ok
- int_test13: ok
- int_test14: ok
- int_test15: ok
- int_test16: ok
- int_test17: ok
- int_test18: ok
- int_test19: ok
- int_test20: ok
- int_test21: ok
- int_test22: ok
- int_test23: ok
- int_test24: ok
- int_test25: ok
- int_test26: ok
- int_test27: ok
- int_test28: ok
- int_test29: ok
- int32_test1: ok
- int32_test2: ok
- int32_test3: ok
- int32_test4: ok
- int32_test5: ok
- int32_test6: ok
- int32_test7: ok
- int32_test8: ok
- int32_test9: ok
- int32_test10: ok
- int32_test11: ok
- int32_test12: ok
- int32_test13: ok
- int32_test13a: ok
- int32_test14: ok
- int32_test15: ok
- int32_test16: ok
- int32_test17: ok
- int32_test18: ok
- int32_test19: ok
- int32_test20: ok
- int32_test21: ok
- int32_test22: ok
- int32_test23: ok
- int32_test24: ok
- int32_test25: ok
- int32_test26: ok
- int32_test27: ok
- int32_test28: ok
- int64_test1: ok
- int64_test2: ok
- int64_test3: ok
- int64_test4: ok
- int64_test5: ok
- int64_test6: ok
- int64_test7: ok
- int64_test8: ok
- int64_test9: ok
- int64_test10: ok
- int64_test11: ok
- int64_test12: ok
- int64_test13: ok
- int64_test13a: ok
- int64_test14: ok
- int64_test15: ok
- int64_test16: ok
- int64_test17: ok
- int64_test18: ok
- int64_test19: ok
- int64_test20: ok
- int64_test21: ok
- int64_test22: ok
- int64_test23: ok
- int64_test24: ok
- int64_test25: ok
- int64_test26: ok
- int64_test27: ok
- int64_test28: ok
- integer_test1: ok
- integer_test2: ok
- integer_test3: ok
- integer_test4: ok
- integer_test5: ok
- integer_test6: ok
- integer_test6a: ok
- integer_test7: ok
- integer_test7a: ok
- integer_test8: ok
- integer_test8a: ok
- integer_test9: ok
- integer_test10: ok
- integer_test11: ok
- integer_test12: ok
- integer_test13: ok
- integer_test14: ok
- integer_test15: ok
- integer_test16: ok
- integer_test17: ok
- integer_test18: ok
- integer_test19: ok
- integer_test20: ok
- integer_test21: ok
- integer_test22: ok
- integer_test23: ok
- integer_test24: ok
- integer_test25: ok
- integer_test26: ok
- integer_test27: ok
- integer_test28: ok
- integer_test29: ok
- integer_test30: ok
- rational_test1: ok
- rational_test2: ok
- rational_test3: ok
- rational_test4: ok
- rational_test5: ok
- rational_test5a: ok
- rational_test5b: ok
- rational_test5c: ok
- rational_test6: ok
- rational_test6a: ok
- rational_test7: ok
- rational_test8: ok
- rational_test9: ok
- rational_test10: ok
- rational_test11: ok
- rational_test12: ok
- rational_test13: ok
- rational_test14: ok
- rational_test15: ok
- rational_test16: ok
- rational_test17: ok
- rational_test18: ok
- rational_test19: ok
- rational_test20: ok
- rational_test21: ok
- rational_test22: ok
- rational_test23: ok
- rational_test24: ok
- rational_test25: ok
- rational_test26: ok
- rational_test27: ok
- rational_test28: ok
- rational_test29: ok
- real_test1: ok
- real_test2: ok
- real_test3: ok
- real_test4: ok
- real_test5: ok
- real_test5a: ok
- real_test5b: ok
- real_test5c: ok
- real_test6: ok
- real_test6a: ok
- real_test7: ok
- real_test8: ok
- real_test9: ok
- real_test10: ok
- real_test11: ok
- real_test12: ok
- real_test13: ok
- real_test14: ok
- real_test15: ok
- real_test16: ok
- real_test17: ok
- real_test18: ok
- real_test19: ok
- real_test20: ok
- real_test21: ok
- real_test22: ok
- real_test23: ok
- real_test24: ok
- real_test25: ok
- real_test26: ok
- real_test27: ok
- real_test28: ok
- real_test29: ok
- real_test30: ok
- real_test31: ok
- real_test32: ok
- real_test33: ok
- integer_from_int_0: ok
- integer_from_int_1: ok
- integer_from_int_2: ok
- integer_from_nat_0: ok
- integer_from_nat_1: ok
- integer_from_nat_2: ok
- integerFromNatural_0: ok
- integerFromNatural_1: ok
- integerFromNatural_2: ok
- integer_from_int32_0: ok
- integer_from_int32_1: ok
- integer_from_int32_2: ok
- integer_from_int32_3: ok
- integer_from_int32_4: ok
- integer_from_int32_5: ok
- integer_from_int64_0: ok
- integer_from_int64_1: ok
- integer_from_int64_2: ok
- integer_from_int64_3: ok
- integer_from_int64_4: ok
- integer_from_int64_5: ok
- natural_from_nat_0: ok
- natural_from_nat_1: ok
- natural_from_nat_2: ok
- natural_from_integer_0: ok
- natural_from_integer_1: ok
- natural_from_integer_2: ok
- int_from_integer_0: ok
- int_from_integer_1: ok
- int_from_integer_2: ok
- int_from_nat_0: ok
- int_from_nat_1: ok
- int_from_nat_2: ok
- nat_from_natural_0: ok
- nat_from_natural_1: ok
- nat_from_natural_2: ok
- nat_from_int_0: ok
- nat_from_int_1: ok
- nat_from_int_2: ok
- int32_from_nat_0: ok
- int32_from_nat_1: ok
- int32_from_nat_2: ok
- int32_from_natural_0: ok
- int32_from_natural_1: ok
- int32_from_natural_2: ok
- int32_from_integer_0: ok
- int32_from_integer_1: ok
- int32_from_integer_2: ok
- int32_from_integer_3: ok
- int32_from_integer_4: ok
- int32_from_integer_5: ok
- int32_from_int_0: ok
- int32_from_int_1: ok
- int32_from_int_2: ok
- int32_from_int_3: ok
- int32_from_int_4: ok
- int32_from_int_5: ok
- int32_from_int_64_0: ok
- int32_from_int_64_1: ok
- int32_from_int_64_2: ok
- int32_from_int_64_3: ok
- int32_from_int_64_4: ok
- int32_from_int_64_5: ok
- int64_from_nat_0: ok
- int64_from_nat_1: ok
- int64_from_nat_2: ok
- int64_from_natural_0: ok
- int64_from_natural_1: ok
- int64_from_natural_2: ok
- int64_from_integer_0: ok
- int64_from_integer_1: ok
- int64_from_integer_2: ok
- int64_from_integer_3: ok
- int64_from_integer_4: ok
- int64_from_integer_5: ok
- int64_from_int_0: ok
- int64_from_int_1: ok
- int64_from_int_2: ok
- int64_from_int_3: ok
- int64_from_int_4: ok
- int64_from_int_5: ok
- int64_from_int_33_0: ok
- int64_from_int_32_1: ok
- int64_from_int_32_2: ok
- int64_from_int_32_3: ok
- int64_from_int_32_4: ok
- int64_from_int_32_5: ok
- natural_from_int_0: ok
- natural_from_int_1: ok
- natural_from_int_2: ok
- natural_from_int32_0: ok
- natural_from_int32_1: ok
- natural_from_int32_2: ok
- natural_from_int64_0: ok
- natural_from_int64_1: ok
- natural_from_int64_2: ok
- int_from_natural_0: ok
- int_from_natural_1: ok
- int_from_natural_2: ok
- int_from_int32_0: ok
- int_from_int32_1: ok
- int_from_int32_2: ok
- int_from_int64_0: ok
- int_from_int64_1: ok
- int_from_int64_2: ok
- nat_from_integer_0: ok
- nat_from_integer_1: ok
- nat_from_integer_2: ok
- nat_from_int32_0: ok
- nat_from_int32_1: ok
- nat_from_int32_2: ok
- nat_from_int64_0: ok
- nat_from_int64_1: ok
- nat_from_int64_2: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_num_extra
- ***************************************************
- 
- integerOfString_test_1: ok
- integerOfString_test_2: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_relation
- ***************************************************
- 
- rel_basic_0: ok
- rel_basic_1: ok
- rel_basic_2: ok
- in_rel_0: ok
- in_rel_1: ok
- in_rel_2: ok
- in_rel_3: ok
- relEmpty_0: ok
- relEmpty_1: ok
- relAdd_0: ok
- relAdd_1: ok
- relAdd_2: ok
- relAdd_3: ok
- rel_id_0: ok
- rel_id_1: ok
- rel_id_2: ok
- rel_id_3: ok
- rel_union_0: ok
- rel_inter_0: ok
- rel_comp_0: ok
- rel_restrict_0: ok
- rel_converse_0: ok
- rel_domain_0: ok
- rel_domain_1: ok
- rel_domain_2: ok
- rel_range_0: ok
- rel_range_1: ok
- rel_range_2: ok
- rel_field_0: ok
- rel_field_1: ok
- rel_field_2: ok
- rel_over_0: ok
- rel_over_1: ok
- rel_apply_0: ok
- rel_apply_1: ok
- is_subrel_0: ok
- is_subrel_1: ok
- is_subrel_2: ok
- is_subrel_3: ok
- is_reflexive_on_0: ok
- is_reflexive_on_1: ok
- is_reflexive_on_2: ok
- is_irreflexive_on_0: ok
- is_irreflexive_on_1: ok
- is_irreflexive_on_2: ok
- is_irreflexive_on_3: ok
- is_irreflexive_0: ok
- is_irreflexive_1: ok
- is_symmetric_on_0: ok
- is_symmetric_on_1: ok
- is_symmetric_on_2: ok
- is_symmetric_0: ok
- is_symmetric_1: ok
- is_antisymmetric_on_0: ok
- is_antisymmetric_on_1: ok
- is_antisymmetric_0: ok
- is_antisymmetric_1: ok
- is_transitive_on_0: ok
- is_transitive_on_1: ok
- is_transitive_0: ok
- is_transitive_1: ok
- is_total_on_0: ok
- is_total_on_1: ok
- is_trichotomous_on_0: ok
- is_trichotomous_on_1: ok
- is_single_valued_0: ok
- is_single_valued_1: ok
- is_equivalence_0: ok
- is_equivalence_1: ok
- is_equivalence_2: ok
- is_preorder_0: ok
- is_preorder_1: ok
- is_preorder_2: ok
- is_partialorder_0: ok
- is_partialorder_1: ok
- is_partialorder_2: ok
- is_partialorder_3: ok
- is_strict_partialorder_on_0: ok
- is_strict_partialorder_on_1: ok
- is_strict_partialorder_on_2: ok
- is_strict_partialorder_on_3: ok
- is_strict_partialorder_on_4: ok
- is_strict_partialorder_0: ok
- is_strict_partialorder_1: ok
- is_strict_partialorder_2: ok
- is_strict_partialorder_3: ok
- is_strict_partialorder_4: ok
- is_totalorder_on_0: ok
- is_totalorder_on_1: ok
- is_totalorder_on_2: ok
- is_strict_totalorder_on_0: ok
- is_strict_totalorder_on_1: ok
- transitive_closure_0: ok
- transitive_closure_1: ok
- transitive_closure_add_0: ok
- transitive_closure_add_1: ok
- transitive_closure_add_2: ok
- reflexive_transitive_closure_0: ok
- withoutTransitiveEdges_0: ok
- withoutTransitiveEdges_1: ok
- withoutTransitiveEdges_2: ok
- withoutTransitiveEdges_3: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_set
- ***************************************************
- 
- empty_0: ok
- empty_1: ok
- empty_2: ok
- empty_3: ok
- any_0: ok
- any_1: ok
- all_0: ok
- all_1: ok
- in_1: ok
- in_2: ok
- in_3: ok
- in_4: ok
- nin_1: ok
- nin_2: ok
- nin_3: ok
- nin_4: ok
- null_1: ok
- null_2: ok
- singleton_1: ok
- singleton_2: ok
- singleton_3: ok
- singleton_4: ok
- size_1: ok
- size_2: ok
- size_3: ok
- size_4: ok
- size_5: ok
- set_patterns_0: ok
- set_patterns_1: ok
- set_patterns_2: ok
- set_patterns_3: ok
- set_patterns_4: ok
- set_patterns_5: ok
- set_patterns_6: ok
- set_patterns_7: ok
- set_patterns_8: ok
- set_patterns_9: ok
- set_patterns_10: ok
- union_1: ok
- insert_1: ok
- insert_2: ok
- insert_3: ok
- filter_1: ok
- filter_2: ok
- split_simple: ok
- isSubsetOf_1: ok
- isSubsetOf_2: ok
- isSubsetOf_3: ok
- isProperSubsetOf_1: ok
- isProperSubsetOf_2: ok
- isProperSubsetOf_3: ok
- bigunion_0: ok
- bigunion_1: ok
- bigunion_2: ok
- bigunion_3: ok
- difference_1: ok
- intersection_1: ok
- map_1: ok
- map_2: ok
- bigunionmap_0: ok
- bigunionmap_1: ok
- fromList_1: ok
- fromList_2: ok
- fromList_3: ok
- Sigma_1: ok
- cross_1: ok
- lfp_empty_0: ok
- lfp_empty_1: ok
- lfp_saturate_neg_1: ok
- lfp_saturate_neg_2: ok
- lfp_saturate_mod_3: ok
- lfp_saturate_mod_4: ok
- lfp_saturate_mod_5: ok
- lfp_termination: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_set_extra
- ***************************************************
- 
- choose_0: ok
- choose_1: ok
- choose_2: ok
- choose_3: ok
- toList_0: ok
- toList_1: ok
- toList_2: ok
- toOrderedList_0: ok
- toOrderedList_1: ok
- toOrderedList_2: ok
- lfp_empty: ok
- lfp_saturate_neg: ok
- lfp_saturate_mod: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_sorting
- ***************************************************
- 
- perm_1: ok
- perm_2: ok
- perm_3: ok
- perm_4: ok
- perm_5: ok
- perm_6: ok
- isSorted_1: ok
- isSorted_2: ok
- isSorted_3: ok
- isSorted_4: ok
- isSorted_5: ok
- isSorted_6: ok
- sort_1: ok
- sort_2: ok
- sort_3: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_string
- ***************************************************
- 
- char_simple_0: ok
- char_simple_1: ok
- char_simple_2: ok
- char_simple_3: ok
- char_simple_4: ok
- char_simple_5: ok
- char_simple_6: ok
- string_simple_0: ok
- string_simple_1: ok
- string_simple_2: ok
- string_simple_3: ok
- toCharList_0: ok
- toCharList_1: ok
- toString_0: ok
- toString_1: ok
- makeString_0: ok
- makeString_1: ok
- makeString_2: ok
- stringLength_0: ok
- stringLength_1: ok
- stringLength_2: ok
- stringAppend_0: ok
- empty_string_0: ok
- empty_string_1: ok
- string_cons_0: ok
- string_cons_1: ok
- string_patterns_0: ok
- string_patterns_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_string_extra
- ***************************************************
- 
- stringFromNat_0: ok
- stringFromNat_1: ok
- stringFromNat_2: ok
- stringFromNatural_0: ok
- stringFromNatural_1: ok
- stringFromNatural_2: ok
- stringFromInt_0: ok
- stringFromInt_1: ok
- stringFromInt_2: ok
- stringFromInt_3: ok
- stringFromInteger_0: ok
- stringFromInteger_1: ok
- stringFromInteger_2: ok
- stringFromInteger_3: ok
- string_compare_1: ok
- string_compare_2: ok
- string_compare_3: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_tuple
- ***************************************************
- 
- fst_1: ok
- fst_2: ok
- snd_1: ok
- snd_2: ok
- curry_1: ok
- uncurry_1: ok
- swap_1: ok
- 
- 
- 
- 
- ***************************************************
- * Testing lem_word
- ***************************************************
- 
- boolListFrombitSeq_0: ok
- boolListFrombitSeq_1: ok
- boolListFrombitSeq_2: ok
- bitSeqFromBoolList_0: ok
- bitSeqFromBoolList_1: ok
- bitSeqFromBoolList_2: ok
- cleanBitSeq_0: ok
- cleanBitSeq_1: ok
- cleanBitSeq_2: ok
- resizeBitSeq_0: ok
- resizeBitSeq_1: ok
- resizeBitSeq_2: ok
- resizeBitSeq_3: ok
- resizeBitSeq_4: ok
- bitSeqNot_0: ok
- integerFromBoolList_0: ok
- integerFromBoolList_1: ok
- integerFromBoolList_2: ok
- integerFromBoolList_3: ok
- integerFromBoolList_4: ok
- boolListFromInteger_0: ok
- boolListFromInteger_1: ok
- boolListFromInteger_2: ok
- boolListFromInteger_3: ok
- boolListFromInteger_4: ok
- bitSeqFromInteger_0: ok
- bitSeqFromInteger_1: ok
- bitSeqFromInteger_2: ok
- bitSeqFromInteger_3: ok
- bitSeqFromInteger_4: ok
- bitSeqFromInteger_5: ok
- integerFromBitSeq_0: ok
- integerFromBitSeq_1: ok
- integerFromBitSeq_2: ok
- integerFromBitSeq_3: ok
- integerFromBitSeq_inv_0: ok
- integerFromBitSeq_inv_1: ok
- integerFromBitSeq_inv_2: ok
- bitSequence_test1: ok
- bitSequence_test2: ok
- bitSequence_test3: ok
- bitSequence_test4: ok
- bitSequence_test5: ok
- bitSequence_test6: ok
- bitSequence_test6a: ok
- bitSequence_test7: ok
- bitSequence_test7a: ok
- bitSequence_test8: ok
- bitSequence_test8a: ok
- bitSequence_test9: ok
- bitSequence_test10: ok
- bitSequence_test11: ok
- bitSequence_test12: ok
- bitSequence_test13: ok
- bitSequence_test14: ok
- bitSequence_test15: ok
- bitSequence_test16: ok
- bitSequence_test17: ok
- bitSequence_test18: ok
- bitSequence_test19: ok
- bitSequence_test20: ok
- bitSequence_test21: ok
- bitSequence_test22: ok
- bitSequence_test23: ok
- bitSequence_test24: ok
- bitSequence_test25: ok
- bitSequence_test26: ok
- bitSequence_bittest1: ok
- bitSequence_bittest2: ok
- bitSequence_bittest3: ok
- bitSequence_bittest4: ok
- bitSequence_bittest5: ok
- bitSequence_bittest6: ok
- bitSequence_bittest7: ok
- bitSequence_bittest8: ok
- bitSequence_bittest9: ok
- bitSequence_bittest10: ok
- bitSequence_bittest11: ok
- bitSequence_bittest12: ok
- bitSequence_bittest13: ok
- bitSequence_bittest14: ok
- bitSequence_bittest15: ok
- bitSequence_bittest16: ok
- bitSequence_bittest17: ok
- bitSequence_bittest18: ok
- bitSequence_bittest19: ok
- bitSequence_bittest20: ok
- bitSequence_bittest21: ok
- bitSequence_bittest22: ok
- bitSequence_bittest23: ok
- bitSequence_bittest24: ok
- int32_bittest1: ok
- int32_bittest2: ok
- int32_bittest3: ok
- int32_bittest4: ok
- int32_bittest5: ok
- int32_bittest6: ok
- int32_bittest7: ok
- int32_bittest8: ok
- int32_bittest9: ok
- int32_bittest10: ok
- int32_bittest11: ok
- int32_bittest12: ok
- int32_bittest13: ok
- int32_bittest14: ok
- int32_bittest15: ok
- int32_bittest16: ok
- int32_bittest17: ok
- int32_bittest18: ok
- int32_bittest19: ok
- int32_bittest20: ok
- int32_bittest21: ok
- int32_bittest22: ok
- int32_bittest23: ok
- int32_bittest24: ok
- int64_bittest1: ok
- int64_bittest2: ok
- int64_bittest3: ok
- int64_bittest4: ok
- int64_bittest5: ok
- int64_bittest6: ok
- int64_bittest7: ok
- int64_bittest8: ok
- int64_bittest9: ok
- int64_bittest10: ok
- int64_bittest11: ok
- int64_bittest12: ok
- int64_bittest13: ok
- int64_bittest14: ok
- int64_bittest15: ok
- int64_bittest16: ok
- int64_bittest17: ok
- int64_bittest18: ok
- int64_bittest19: ok
- int64_bittest20: ok
- int64_bittest21: ok
- int64_bittest22: ok
- int64_bittest23: ok
- int64_bittest24: ok
- integer_bittest1: ok
- integer_bittest2: ok
- integer_bittest3: ok
- integer_bittest4: ok
- integer_bittest5: ok
- integer_bittest6: ok
- integer_bittest7: ok
- integer_bittest8: ok
- integer_bittest9: ok
- integer_bittest10: ok
- integer_bittest11: ok
- integer_bittest12: ok
- integer_bittest13: ok
- integer_bittest14: ok
- integer_bittest15: ok
- integer_bittest16: ok
- integer_bittest17: ok
- integer_bittest18: ok
- integer_bittest19: ok
- integer_bittest20: ok
- integer_bittest22: ok
- integer_bittest24: ok
- int_bittest1: ok
- int_bittest2: ok
- int_bittest3: ok
- int_bittest4: ok
- int_bittest5: ok
- int_bittest6: ok
- int_bittest7: ok
- int_bittest8: ok
- int_bittest9: ok
- int_bittest10: ok
- int_bittest11: ok
- int_bittest12: ok
- int_bittest17: ok
- int_bittest18: ok
- int_bittest19: ok
- int_bittest20: ok
- int_bittest22: ok
- int_bittest24: ok
- natural_bittest1: ok
- natural_bittest2: ok
- natural_bittest3: ok
- natural_bittest4: ok
- natural_bittest5: ok
- natural_bittest6: ok
- natural_bittest9: ok
- natural_bittest10: ok
- natural_bittest11: ok
- natural_bittest12: ok
- natural_bittest13: ok
- natural_bittest14: ok
- natural_bittest15: ok
- natural_bittest16: ok
- natural_bittest17: ok
- natural_bittest18: ok
- natural_bittest19: ok
- natural_bittest20: ok
- nat_bittest1: ok
- nat_bittest2: ok
- nat_bittest3: ok
- nat_bittest4: ok
- nat_bittest5: ok
- nat_bittest6: ok
- nat_bittest9: ok
- nat_bittest10: ok
- nat_bittest11: ok
- nat_bittest12: ok
- nat_bittest17: ok
- nat_bittest18: ok
- nat_bittest19: ok
- nat_bittest20: ok
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/library'
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10'
-> compiled  lem.2022-12-10
Processing 22/24: [lem: make install]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "INSTALL_DIR=/home/opam/.opam/5.0" "install" (CWD=/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10)
- mkdir -p /home/opam/.opam/5.0/bin
- rm -f /home/opam/.opam/5.0/bin/lem
- cp src/main.native /home/opam/.opam/5.0/bin/lem
- rm -rf /home/opam/.opam/5.0/share/lem
- mkdir -p /home/opam/.opam/5.0/share/lem/library
- cp library/*.lem /home/opam/.opam/5.0/share/lem/library
- cp library/*_constants /home/opam/.opam/5.0/share/lem/library
- make -C ocaml-lib install
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- Makefile:10: warning: overriding recipe for target 'clean'
- ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean'
- ocamlbuild -build-dir _build_zarith -X local -X dependencies -I num_impl_zarith -use-ocamlfind -pkg zarith extract.cma extract.cmxa
- make /home/opam/.opam/5.0/lib/lem_zarith/META
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- Makefile:10: warning: overriding recipe for target 'clean'
- ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean'
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib lem_zarith
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/lem_zarith/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "" lem_zarith num_impl_zarith/META _build_zarith/extract.cma _build_zarith/extract.cmxa _build_zarith/extract.a `find _build_zarith -name '*.cmi' -o -name '*.cmx' -o -name '*.mli'`
- Installed /home/opam/.opam/5.0/lib/lem_zarith/big_int_impl.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/big_int_impl.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational_impl.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational_impl.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/big_int_impl.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational_impl.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_big_num.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_big_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_num.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pset.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pset.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pmap.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pmap.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/vector.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/vector.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/bit.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/bit.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/xstring.mli
- Installed /home/opam/.opam/5.0/lib/lem_zarith/xstring.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pset.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/nat_big_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/xstring.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_bool.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_bool.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/either.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/either.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_basic_classes.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_basic_classes.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_function.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_function.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/rational.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_maybe.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_maybe.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_tuple.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_tuple.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_list.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_list.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_assert_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_assert_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_string.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_string.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_show.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_show.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set_helpers.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set_helpers.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/pmap.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_map.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_map.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_either.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_either.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_word.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_word.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_function_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_function_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_list_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_list_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_machine_word.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_machine_word.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_map_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_map_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_maybe_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_maybe_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_num_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_num_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_pervasives.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_pervasives.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_sorting.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_sorting.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_relation.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_relation.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_set_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_show_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_show_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_string_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_string_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/vector.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/bit.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_pervasives_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_pervasives_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_debug.cmi
- Installed /home/opam/.opam/5.0/lib/lem_zarith/lem_debug.cmx
- Installed /home/opam/.opam/5.0/lib/lem_zarith/extract.a
- Installed /home/opam/.opam/5.0/lib/lem_zarith/extract.cmxa
- Installed /home/opam/.opam/5.0/lib/lem_zarith/extract.cma
- Installed /home/opam/.opam/5.0/lib/lem_zarith/META
- touch /home/opam/.opam/5.0/lib/lem_zarith/META
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- ocamlbuild -build-dir _build_num -X local -X dependencies -I num_impl_num -use-ocamlfind -pkg num extract.cma extract.cmxa
- make /home/opam/.opam/5.0/lib/lem_num/META
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- Makefile:10: warning: overriding recipe for target 'clean'
- ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean'
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib lem_num
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/lem_num/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "" lem_num num_impl_num/META _build_num/extract.cma _build_num/extract.cmxa _build_num/extract.a `find _build_num -name '*.cmi' -o -name '*.cmx' -o -name '*.mli'`
- Installed /home/opam/.opam/5.0/lib/lem_num/big_int_impl.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/big_int_impl.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/rational_impl.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/rational_impl.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/big_int_impl.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/rational_impl.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_big_num.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_big_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_num.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/rational.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/rational.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/pset.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/pset.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/pmap.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/pmap.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/vector.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/vector.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/bit.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/bit.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/xstring.mli
- Installed /home/opam/.opam/5.0/lib/lem_num/xstring.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/pset.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/nat_big_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/xstring.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_bool.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_bool.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/either.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/either.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_basic_classes.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_basic_classes.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_function.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_function.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/rational.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_maybe.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_maybe.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_num.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_num.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_tuple.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_tuple.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_list.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_list.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_assert_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_assert_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_string.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_string.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_show.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_show.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set_helpers.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set_helpers.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/pmap.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_map.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_map.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_either.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_either.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_word.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_word.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_function_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_function_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_list_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_list_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_machine_word.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_machine_word.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_map_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_map_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_maybe_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_maybe_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_num_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_num_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_pervasives.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_pervasives.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_sorting.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_sorting.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_relation.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_relation.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_set_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_show_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_show_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_string_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_string_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/vector.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/bit.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_pervasives_extra.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_pervasives_extra.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_debug.cmi
- Installed /home/opam/.opam/5.0/lib/lem_num/lem_debug.cmx
- Installed /home/opam/.opam/5.0/lib/lem_num/extract.a
- Installed /home/opam/.opam/5.0/lib/lem_num/extract.cmxa
- Installed /home/opam/.opam/5.0/lib/lem_num/extract.cma
- Installed /home/opam/.opam/5.0/lib/lem_num/META
- touch /home/opam/.opam/5.0/lib/lem_num/META
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- make /home/opam/.opam/5.0/lib/lem/META
- make[2]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- Makefile:10: warning: overriding recipe for target 'clean'
- ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean'
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib lem
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/lem/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "" lem META
- Installed /home/opam/.opam/5.0/lib/lem/META
- touch /home/opam/.opam/5.0/lib/lem/META
- make[2]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- cp -R coq-lib /home/opam/.opam/5.0/share/lem
- cp -R hol-lib /home/opam/.opam/5.0/share/lem
- cp -R isabelle-lib /home/opam/.opam/5.0/share/lem
-> installed lem.2022-12-10
Processing 23/24: [linksem: make]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" (CWD=/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8)
- make -C src
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8/src'
- OCAMLPATH is 
- lem.mk:13: MAKECMDGOALS is 
- CAML_LD_LIBRARY_PATH=/home/opam/.opam/5.0/lib/stublibs:/home/opam/.opam/5.0/lib/ocaml/stublibs:/home/opam/.opam/5.0/lib/ocaml
- OCAML_TOPLEVEL_PATH=/home/opam/.opam/5.0/lib/toplevel
- fatal: not a git repository (or any parent up to mount point /)
- Stopping at filesystem boundary (GIT_DISCOVERY_ACROSS_FILESYSTEM not set).
- Makefile:11: warning: overriding recipe for target 'clean'
- no_ocamlbuild.mk:116: warning: ignoring old recipe for target 'clean'
- cp byte_sequence_ocaml.lem byte_sequence_impl.lem
- lem -ocaml -only_changed_output default_printing.lem missing_pervasives.lem show.lem endianness.lem multimap.lem error.lem filesystem.lem byte_sequence.lem byte_pattern.lem byte_pattern_extra.lem archive.lem elf_types_native_uint.lem hex_printing.lem string_table.lem auxv.lem elf_header.lem elf_symbol_table.lem elf_program_header_table.lem elf_section_header_table.lem elf_relocation.lem elf_interpreted_segment.lem elf_interpreted_section.lem elf_note.lem elf_file.lem elf_dynamic.lem dwarf_ctypes.lem dwarf.lem ldconfig.lem abis/abi_classes.lem memory_image.lem memory_image_orderings.lem abis/abi_utilities.lem gnu_extensions/gnu_ext_abi.lem abis/power64/abi_power64.lem abis/power64/abi_power64_elf_header.lem abis/power64/abi_power64_section_header_table.lem abis/power64/abi_power64_dynamic.lem abis/aarch64/abi_aarch64_le_elf_header.lem abis/aarch64/abi_aarch64_symbol_table.lem abis/aarch64/abi_aarch64_section_header_table.lem abis/aarch64/abi_aarch64_program_header_table.lem abis/aarch64/abi_aarch64_le_serialisation.lem abis/aarch64/abi_aarch64_relocation.lem abis/aarch64/abi_aarch64_le.lem abstract_linker_script.lem abis/amd64/abi_amd64_elf_header.lem abis/amd64/abi_amd64_serialisation.lem abis/amd64/abi_amd64_relocation.lem abis/amd64/abi_amd64_program_header_table.lem abis/amd64/abi_amd64_section_header_table.lem abis/amd64/abi_amd64_symbol_table.lem abis/amd64/abi_amd64.lem abis/mips64/abi_mips64_dynamic.lem abis/mips64/abi_mips64_elf_header.lem abis/mips64/abi_mips64_relocation.lem abis/mips64/abi_mips64_serialisation.lem abis/mips64/abi_mips64_program_header_table.lem abis/mips64/abi_mips64_section_header_table.lem abis/mips64/abi_mips64_symbol_table.lem abis/mips64/abi_mips64.lem abis/x86/abi_x86_relocation.lem abis/power64/abi_power64_relocation.lem abis/riscv/abi_riscv_elf_header.lem abis/riscv/abi_riscv_program_header_table.lem abis/riscv/abi_riscv_relocation.lem abis/riscv/abi_riscv_section_header_table.lem abis/riscv/abi_riscv_serialisation.lem abis/riscv/abi_riscv_symbol_table.lem abis/riscv/abi_riscv.lem abis/cheri_mips64/abi_cheri_mips64_capability.lem abis/cheri_mips64/abi_cheri_mips64_dynamic.lem abis/cheri_mips64/abi_cheri_mips64_elf_header.lem abis/cheri_mips64/abi_cheri_mips64_relocation.lem abis/cheri_mips64/abi_cheri_mips64.lem gnu_extensions/gnu_ext_types_native_uint.lem gnu_extensions/gnu_ext_section_header_table.lem gnu_extensions/gnu_ext_dynamic.lem gnu_extensions/gnu_ext_symbol_versioning.lem gnu_extensions/gnu_ext_program_header_table.lem gnu_extensions/gnu_ext_section_to_segment_mapping.lem gnu_extensions/gnu_ext_note.lem abis/abis.lem adaptors/sail_interface.lem adaptors/harness_interface.lem elf_memory_image.lem elf_memory_image_of_elf64_file.lem command_line.lem input_list.lem linkable_list.lem linker_script.lem link.lem load.lem elf64_file_of_elf_memory_image.lem test_image.lem byte_sequence_ocaml.lem main_link.lem main_elf.lem scratch.lem copy_elf.lem main_load.lem byte_sequence_impl.lem
- File "main_load.lem", line 244, character 9 to line 250, character 24
-   Warning: unused variables: 'x', 'r'
- File "main_load.lem", line 279, character 67 to line 306, character 3
-   Warning: unused variable: 'rel_idx'
- File "main_load.lem", line 292, character 9 to line 304, character 11
-   Warning: unused variables: 'symidx', 'scnidx'
- File "main_load.lem", line 504, character 3 to line 516, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "main_load.lem", line 520, character 3 to line 523, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "main_load.lem", line 527, character 3 to line 530, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "main_load.lem", line 710, character 7 to line 750, character 9
-   Warning: unused variable: 'dyns'
- File "main_load.lem", line 103, character 1 to line 111, character 5
-   Warning: unused variable: 'endian'
- File "copy_elf.lem", line 70, character 3 to line 147, character 5
-   Warning: unused variable: 'ss'
- File "copy_elf.lem", line 199, character 94 to line 213, character 7
-   Warning: unused variable: 'bs'
- File "copy_elf.lem", line 193, character 7 to line 196, character 9
-   Warning: unused variables: 'more', 'progname'
- File "main_elf.lem", line 70, character 3 to line 147, character 5
-   Warning: unused variable: 'ss'
- File "main_elf.lem", line 199, character 94 to line 388, character 7
-   Warning: unused variable: 'bs'
- File "main_elf.lem", line 371, character 67 to line 381, character 19
-   Warning: unused variable: 'stbl'
- File "main_elf.lem", line 358, character 67 to line 368, character 19
-   Warning: unused variable: 'stbl'
- File "main_elf.lem", line 279, character 67 to line 289, character 19
-   Warning: unused variable: 'stbl'
- File "main_elf.lem", line 266, character 67 to line 276, character 19
-   Warning: unused variable: 'stbl'
- File "main_elf.lem", line 193, character 7 to line 196, character 9
-   Warning: unused variables: 'more', 'progname'
- File "main_link.lem", line 57, character 5 to line 68, character 86
-   Warning: unused variable: 'fresh'
- File "main_link.lem", line 89, character 5 to line 141, character 19
-   Warning: unused variable: 'item_options'
- File "main_link.lem", line 50, character 1 to line 51, character 40
-   Warning: unused variables: 'img1', 'img2'
- File "main_link.lem", line 54, character 1 to line 68, character 86
-   Warning: unused variable: 'names'
- File "elf64_file_of_elf_memory_image.lem", line 425, character 84 to line 440, character 13
-   Warning: unused variable: 'i'
- File "elf64_file_of_elf_memory_image.lem", line 158, character 91 to line 193, character 45
-   Warning: unused variable: 'el_range'
- File "elf64_file_of_elf_memory_image.lem", line 138, character 37 to line 138, character 67
-   Warning: unused variables: 'range', 'el'
- File "elf64_file_of_elf_memory_image.lem", line 120, character 10 to line 135, character 10
-   Warning: unused variables: 'isec1', 'range1'
- File "elf64_file_of_elf_memory_image.lem", line 120, character 41 to line 135, character 9
-   Warning: unused variables: 'isec2', 'range2'
- File "elf64_file_of_elf_memory_image.lem", line 77, character 45 to line 81, character 15
-   Warning: unused variable: 'idx'
- File "elf64_file_of_elf_memory_image.lem", line 71, character 45 to line 71, character 67
-   Warning: unused variable: 'idx'
- File "elf64_file_of_elf_memory_image.lem", line 55, character 1 to line 449, character 7
-   Warning: unused variable: 'fname'
- File "load.lem", line 158, character 3 to line 222, character 7
-   Warning: unused variable: 'is_absolute'
- File "load.lem", line 230, character 7 to line 244, character 9
-   Warning: unused variable: 'errmsg'
- File "load.lem", line 260, character 15 to line 267, character 36
-   Warning: unused variables: 'scn', 'rel_idx', 'rel_src_scn'
- File "load.lem", line 263, character 5 to line 267, character 36
-   Warning: unused variable: 'is_absolute'
- File "load.lem", line 264, character 5 to line 267, character 36
-   Warning: unused variable: 'calcfn'
- File "load.lem", line 277, character 3 to line 291, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 312, character 3 to line 343, character 5
-   Warning: unused variable: 'sym_entry'
- File "load.lem", line 424, character 3 to line 426, character 5
-   Warning: unused variable: 'got_entry_addr'
- File "load.lem", line 420, character 18 to line 423, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 413, character 16 to line 416, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 406, character 21 to line 409, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 380, character 31 to line 400, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 369, character 20 to line 372, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 440, character 22 to line 443, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 433, character 25 to line 436, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "load.lem", line 522, character 3 to line 616, character 13
-   Warning: unused variable: 'symtab_scn'
- File "load.lem", line 572, character 28 to line 572, character 51
-   Warning: unused variable: 'symidx'
- File "load.lem", line 533, character 24 to line 549, character 17
-   Warning: unused variable: 'scnidx'
- File "load.lem", line 526, character 27 to line 531, character 60
-   Warning: unused variables: 'symidx', 'scnidx', 'sym_name'
- File "load.lem", line 528, character 5 to line 531, character 60
-   Warning: unused variable: 'sym_value'
- File "load.lem", line 225, character 1 to line 247, character 5
-   Warning: unused variable: 'sym_name'
- File "link.lem", line 89, character 30 to line 108, character 15
-   Warning: unused variable: 'bi'
- File "link.lem", line 89, character 49 to line 103, character 22
-   Warning: unused variables: 'b_idx', 'b_ref_item', 'b_maybe_def'
- File "link.lem", line 214, character 25 to line 289, character 78
-   Warning: unused variables: 'ref_idx', 'ref_item'
- File "link.lem", line 237, character 37 to line 246, character 39
-   Warning: unused variable: 'def_item'
- File "link.lem", line 216, character 53 to line 219, character 27
-   Warning: unused variables: 'def_idx', 'def'
- File "link.lem", line 162, character 28 to line 194, character 32
-   Warning: unused variable: 'options'
- File "link.lem", line 162, character 44 to line 194, character 31
-   Warning: unused variables: 'ref', 'ref_idx', 'ref_item'
- File "link.lem", line 163, character 29 to line 194, character 31
-   Warning: unused variable: 'def_idx'
- File "link.lem", line 330, character 56 to line 330, character 123
-   Warning: unused variable: 'el'
- File "link.lem", line 317, character 63 to line 322, character 11
-   Warning: unused variable: 'el_range'
- File "link.lem", line 318, character 9 to line 322, character 11
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Memory_image.ImageBase', 'Memory_image.EntryPoint', 'Memory_image.SymbolDef _', 'Memory_image.SymbolRef _', 'Memory_image.FileFeature(Memory_image.ElfHeader _)', 'Memory_image.FileFeature(Memory_image.ElfSectionHeaderTable _)', 'Memory_image.FileFeature(Memory_image.ElfProgramHeaderTable _)', 'Memory_image.FileFeature(Memory_image.ElfSegment _)', 'Memory_image.AbiFeature _'
- File "link.lem", line 318, character 9 to line 322, character 11
-   Warning: unused variable: 'idx'
- File "link.lem", line 307, character 39 to line 314, character 11
-   Warning: unused variable: 'el_range'
- File "link.lem", line 375, character 5 to line 475, character 3
-   Warning: unused variables: 'blob', 'origin', 'input_opts'
- File "link.lem", line 509, character 28 to line 509, character 68
-   Warning: unused variable: 'idx'
- File "link.lem", line 599, character 29 to line 644, character 19
-   Warning: unused variable: 'rs'
- File "link.lem", line 609, character 43 to line 637, character 31
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(Memory_image.ChangeRelocTo _,_)'
- File "link.lem", line 560, character 9 to line 592, character 11
-   Warning: unused variable: 'field_is_absolute_addr'
- File "link.lem", line 747, character 5 to line 932, character 7
-   Warning: unused variable: 'reloc_resolutions'
- File "link.lem", line 912, character 9 to line 915, character 11
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(Command_line.OutputFilename _)', 'Maybe.Just(Command_line.OutputKind _)', 'Maybe.Just(Command_line.ForceCommonDefined _)', 'Maybe.Just(Command_line.Soname _)', 'Maybe.Just(Command_line.TextSegmentStart _)', 'Maybe.Just(Command_line.RodataSegmentStart _)', 'Maybe.Just(Command_line.LdataSegmentStart _)', 'Maybe.Just Command_line.BindFunctionsEarly', 'Maybe.Just Command_line.BindNonFunctionsEarly'
- File "link.lem", line 888, character 29 to line 898, character 19
-   Warning: unused variable: 'rs'
- File "link.lem", line 890, character 21 to line 896, character 23
-   Warning: unused variables: 'len', 'start', 'el_name'
- File "link.lem", line 838, character 19 to line 859, character 92
-   Warning: unused variable: 'linkable'
- File "link.lem", line 784, character 13 to line 815, character 15
-   Warning: unused variables: 'obj', 'fname', 'blob', 'inp_unit'
- File "link.lem", line 787, character 21 to line 814, character 64
-   Warning: unused variable: 'our_gid'
- File "link.lem", line 805, character 47 to line 808, character 27
-   Warning: unused variables: 'b_ref_idx', 'b_ref', 'b_ref_item'
- File "link.lem", line 805, character 100 to line 808, character 27
-   Warning: unused variables: 'b_def', 'b_def_item'
- File "link.lem", line 787, character 75 to line 793, character 23
-   Warning: unused variables: 'aidx', 'gidx', 'aidx', 'gidx'
- File "link.lem", line 778, character 57 to line 782, character 15
-   Warning: unused variable: 'fname'
- File "link.lem", line 669, character 75 to line 677, character 11
-   Warning: unused variable: 'ref_idx'
- File "link.lem", line 670, character 9 to line 677, character 11
-   Warning: unused variables: 'def_linkable', 'def_sym'
- File "link.lem", line 653, character 57 to line 656, character 20
-   Warning: unused variables: 'obj', 'inp'
- File "link.lem", line 83, character 1 to line 109, character 7
-   Warning: unused variable: 'item'
- File "link.lem", line 532, character 1 to line 649, character 17
-   Warning: unused variable: 'bindings_by_name'
- File "linker_script.lem", line 177, character 5 to line 180, character 7
-   Warning: unused variable: 'c'
- File "linker_script.lem", line 236, character 29 to line 239, character 7
-   Warning: unused variables: 'idx', 'img', 'fname'
- File "linker_script.lem", line 243, character 32 to line 246, character 7
-   Warning: unused variables: 'idx', 'img', 'fname'
- File "linker_script.lem", line 250, character 31 to line 253, character 7
-   Warning: unused variables: 'idx', 'img', 'fname', 'def'
- File "linker_script.lem", line 257, character 29 to line 261, character 7
-   Warning: unused variables: 'idx', 'img', 'fname'
- File "linker_script.lem", line 282, character 23 to line 294, character 2
-   Warning: unused variable: 'writable'
- File "linker_script.lem", line 315, character 38 to line 315, character 63
-   Warning: unused variable: 'pos'
- File "linker_script.lem", line 315, character 50 to line 315, character 62
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 326, character 68 to line 342, character 7
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Linker_script.Hole _'
- File "linker_script.lem", line 326, character 68 to line 342, character 7
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'retain_pol', 'linkable_idx', 'name', 'spec', 'pol'
- File "linker_script.lem", line 347, character 5 to line 349, character 25
-   Warning: unused variable: 'comp_addrs'
- File "linker_script.lem", line 455, character 38 to line 455, character 71
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 451, character 38 to line 451, character 81
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 447, character 37 to line 447, character 120
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 443, character 38 to line 443, character 82
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 439, character 38 to line 439, character 71
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 435, character 37 to line 435, character 95
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 393, character 34 to line 397, character 7
-   Warning: unused variables: 'idx', 'img', 'fname', 'def'
- File "linker_script.lem", line 390, character 28 to line 390, character 87
-   Warning: unused variable: 'inp'
- File "linker_script.lem", line 379, character 38 to line 388, character 7
-   Warning: pattern-matching is not exhaustive
-   missing patterns '_'
- File "linker_script.lem", line 967, character 6 to line 987, character 7
-   Warning: redundant patterns: 'Linker_script.OnlyIfRo', 'Linker_script.OnlyIfRw'
- File "linker_script.lem", line 967, character 6 to line 987, character 7
-   Warning: unused variable: 'Always'
- File "linker_script.lem", line 979, character 46 to line 984, character 17
-   Warning: unused variable: 'retainpol'
- File "linker_script.lem", line 970, character 46 to line 975, character 18
-   Warning: unused variable: 'retainpol'
- File "linker_script.lem", line 1043, character 17 to line 1189, character 15
-   Warning: unused variables: 'advance_fn', 'maxpagesize', 'commonpagesize', 'maybe_expr'
- File "linker_script.lem", line 1132, character 81 to line 1135, character 31
-   Warning: unused variables: 'img', 'fname'
- File "linker_script.lem", line 1064, character 22 to line 1069, character 24
-   Warning: unused variables: 'idx', 'sec'
- File "linker_script.lem", line 1086, character 21 to line 1099, character 106
-   Warning: unused variable: 'acc_with_output_sec'
- File "linker_script.lem", line 1230, character 13 to line 1235, character 15
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'def', 'retain_pol', 'linkable_idx'
- File "linker_script.lem", line 1301, character 13 to line 1309, character 15
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just false,Maybe.Just true)'
- File "linker_script.lem", line 1301, character 13 to line 1309, character 15
-   Warning: redundant pattern: '(Maybe.Just true, Maybe.Just false)'
- File "linker_script.lem", line 1287, character 13 to line 1295, character 15
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just false,Maybe.Just true)'
- File "linker_script.lem", line 1287, character 13 to line 1295, character 15
-   Warning: redundant pattern: '(Maybe.Just true, Maybe.Just false)'
- File "linker_script.lem", line 1270, character 9 to line 1279, character 11
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'def', 'retain_pol', 'linkable_idx', 'name', 'spec', 'pol'
- File "linker_script.lem", line 1259, character 9 to line 1267, character 11
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'def', 'retain_pol', 'linkable_idx', 'name', 'spec', 'pol'
- File "linker_script.lem", line 1250, character 9 to line 1256, character 11
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'def', 'retain_pol', 'linkable_idx'
- File "linker_script.lem", line 1241, character 9 to line 1247, character 11
-   Warning: unused variables: 'retain_pol', 'img', 'fname', 'def', 'retain_pol', 'linkable_idx'
- File "linker_script.lem", line 1900, character 14 to line 2304, character 15
-   Warning: unused variables: 'name', 'symdefpol', 'symsize', 'syminfo', 'symother', 'outputguard', 'maybe_expr', 'sub_elements', 'selector', 'retainpol', 'sortpol', 'selector'
- File "linker_script.lem", line 2133, character 21 to line 2154, character 120
-   Warning: unused variable: 'endpos_option2'
- File "linker_script.lem", line 2068, character 81 to line 2126, character 101
-   Warning: unused variable: 'new_script_item_idx'
- File "linker_script.lem", line 2073, character 59 to line 2124, character 31
-   Warning: unused variables: 'outputguard', 'maybe_expr', 'sub_elements'
- File "linker_script.lem", line 2084, character 37 to line 2110, character 71
-   Warning: unused variables: 'addr', 'secname', 'guard'
- File "linker_script.lem", line 2104, character 41 to line 2108, character 72
-   Warning: unused variable: 'comp_addrs'
- File "linker_script.lem", line 2106, character 41 to line 2108, character 72
-   Warning: unused variable: 'size'
- File "linker_script.lem", line 2167, character 21 to line 2301, character 21
-   Warning: unused variables: 'addr', 'secname', 'guard'
- File "linker_script.lem", line 2171, character 21 to line 2301, character 21
-   Warning: unused variable: 'count_sections_in_image'
- File "linker_script.lem", line 2275, character 25 to line 2300, character 151
-   Warning: unused variable: 'sec_sz'
- File "linker_script.lem", line 2224, character 71 to line 2254, character 23
-   Warning: unused variables: 'idx', 'img', 'fname', 'retain_pol', 'name', 'spec', 'pol'
- File "linker_script.lem", line 2172, character 25 to line 2180, character 48
-   Warning: unused variable: 'section_ranges'
- File "linker_script.lem", line 2175, character 29 to line 2178, character 31
-   Warning: unused variables: 'idx', 'isec'
- File "linker_script.lem", line 1389, character 13 to line 1892, character 13
-   Warning: unused variable: 'final_addr'
- File "linker_script.lem", line 1871, character 17 to line 1878, character 108
-   Warning: unused variable: 'section_tags_bare'
- File "linker_script.lem", line 1871, character 54 to line 1875, character 23
-   Warning: unused variable: 'maybe_range'
- File "linker_script.lem", line 1872, character 21 to line 1875, character 23
-   Warning: unused variables: 'idx', 'isec'
- File "linker_script.lem", line 1392, character 17 to line 1829, character 49
-   Warning: unused variable: 'make_line'
- File "linker_script.lem", line 1398, character 55 to line 1818, character 19
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Linker_script.Hole _'
- File "linker_script.lem", line 1398, character 55 to line 1818, character 19
-   Warning: unused variables: 'retainpolicy', 'img', 'fname', 'retain_pol', 'pol'
- File "linker_script.lem", line 1493, character 37 to line 1772, character 85
-   Warning: unused variable: 'included_global_defs'
- File "linker_script.lem", line 1531, character 41 to line 1746, character 47
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Memory_image.ImageBase', 'Memory_image.EntryPoint', 'Memory_image.FileFeature(Memory_image.ElfHeader _)', 'Memory_image.FileFeature(Memory_image.ElfSectionHeaderTable _)', 'Memory_image.FileFeature(Memory_image.ElfProgramHeaderTable _)', 'Memory_image.FileFeature(Memory_image.ElfSegment _)'
- File "linker_script.lem", line 1531, character 41 to line 1746, character 47
-   Warning: unused variables: 'idx', 'isec'
- File "linker_script.lem", line 1573, character 49 to line 1745, character 51
-   Warning: unused variable: 'bi'
- File "linker_script.lem", line 1575, character 49 to line 1745, character 51
-   Warning: unused variables: 'maybe_def', 'ref_idx', 'ref_linkable'
- File "linker_script.lem", line 1707, character 88 to line 1722, character 71
-   Warning: unused variables: 'r', 'bi', 'rl', 'ri'
- File "linker_script.lem", line 1711, character 81 to line 1720, character 83
-   Warning: unused variable: 'def_item'
- File "linker_script.lem", line 1676, character 107 to line 1690, character 75
-   Warning: unused variables: 'ref_item', 'bi'
- File "linker_script.lem", line 1677, character 73 to line 1690, character 75
-   Warning: unused variables: 'def_idx', 'def', 'def_item'
- File "linker_script.lem", line 1566, character 72 to line 1566, character 144
-   Warning: unused variables: 'bi', 'r_item', 'm_d'
- File "linker_script.lem", line 1513, character 57 to line 1529, character 43
-   Warning: unused variable: 'el_name'
- File "linker_script.lem", line 1427, character 41 to line 1478, character 43
-   Warning: unused variables: 'len', 'start'
- File "linker_script.lem", line 1366, character 40 to line 1369, character 15
-   Warning: unused variable: 'a'
- File "linker_script.lem", line 2428, character 10 to line 2484, character 12
-   Warning: unused variable: 'discards'
- File "linker_script.lem", line 2443, character 10 to line 2484, character 12
-   Warning: unused variable: 'place_after_rel'
- File "linker_script.lem", line 2446, character 46 to line 2468, character 11
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Linker_script.Common _'
- File "linker_script.lem", line 2430, character 44 to line 2435, character 84
-   Warning: unused variables: 'maybe_addr', 'guard', 'script_el_idx'
- File "linker_script.lem", line 2403, character 61 to line 2412, character 8
-   Warning: redundant pattern: '_'
- File "linker_script.lem", line 2403, character 61 to line 2412, character 8
-   Warning: unused variables: 'name', 'maybe_addr', 'guard', 'script_el_idx'
- File "linker_script.lem", line 2519, character 5 to line 2750, character 27
-   Warning: unused variable: 'discards'
- File "linker_script.lem", line 2669, character 5 to line 2750, character 27
-   Warning: unused variable: 'discard_line'
- File "linker_script.lem", line 2688, character 5 to line 2750, character 27
-   Warning: unused variable: 'outputs_by_name_with_position'
- File "linker_script.lem", line 2669, character 34 to line 2677, character 7
-   Warning: unused variables: 'idx', 'img', 'fname', 'def'
- File "linker_script.lem", line 2641, character 70 to line 2641, character 122
-   Warning: unused variable: 'maybe_new_def'
- File "linker_script.lem", line 2632, character 50 to line 2632, character 101
-   Warning: unused variables: 'b_idx', 'new_b'
- File "linker_script.lem", line 2612, character 47 to line 2625, character 19
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just _,[],Maybe.Just _)'
- File "linker_script.lem", line 2612, character 47 to line 2625, character 19
-   Warning: unused variables: 'def', 'more', 'pair1', 'pair2'
- File "linker_script.lem", line 2563, character 35 to line 2563, character 120
-   Warning: unused variable: 'more'
- File "linker_script.lem", line 2552, character 29 to line 2555, character 31
-   Warning: unused variable: 'symdef'
- File "linker_script.lem", line 2527, character 36 to line 2543, character 89
-   Warning: unused variables: 'secname', 'maybe_addr', 'guard', 'script_el_idx'
- File "linker_script.lem", line 264, character 1 to line 264, character 45
-   Warning: unused variables: 'i1', 'i2'
- File "linker_script.lem", line 324, character 1 to line 343, character 29
-   Warning: unused variable: 'secs'
- File "linker_script.lem", line 378, character 1 to line 964, character 6
-   Warning: unused variable: 'user_rodata_segment_start'
- File "linker_script.lem", line 966, character 1 to line 987, character 7
-   Warning: unused variable: 'name'
- File "linkable_list.lem", line 58, character 5 to line 60, character 34
-   Warning: unused variables: 'obj', 'opts'
- File "linkable_list.lem", line 82, character 12 to line 93, character 11
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(_,Input_list.ControlScript,_)'
- File "linkable_list.lem", line 82, character 12 to line 93, character 11
-   Warning: unused variables: 'origin', 'seq', 'fname', 'origin', 'seq', 'fname', 'origin'
- File "linkable_list.lem", line 132, character 9 to line 140, character 100
-   Warning: unused variable: 'all_def_ranges'
- File "linkable_list.lem", line 180, character 5 to line 300, character 7
-   Warning: unused variables: 'ref_obj', 'ref_blob', 'ref_u', 'ref_options'
- File "linkable_list.lem", line 278, character 5 to line 300, character 7
-   Warning: unused variable: 'refstr'
- File "linkable_list.lem", line 256, character 79 to line 276, character 7
-   Warning: unused variables: 'd', 'd_idx', 'd_l', 'more_pairs'
- File "linkable_list.lem", line 264, character 34 to line 270, character 20
-   Warning: unused variable: 'd1'
- File "linkable_list.lem", line 264, character 89 to line 270, character 19
-   Warning: unused variable: 'd2'
- File "linkable_list.lem", line 192, character 9 to line 251, character 24
-   Warning: unused variables: 'def_obj', 'def_fname', 'def_blob', 'def_options'
- File "linkable_list.lem", line 194, character 9 to line 251, character 24
-   Warning: unused variable: 'def_u'
- File "linkable_list.lem", line 196, character 46 to line 202, character 11
-   Warning: unused variables: 'aidx', 'gidx', 'aidx', 'gidx'
- File "linkable_list.lem", line 329, character 5 to line 360, character 72
-   Warning: unused variable: 'all_ref_ranges'
- File "linkable_list.lem", line 354, character 5 to line 360, character 72
-   Warning: unused variable: 'und_ref_triples'
- File "linkable_list.lem", line 387, character 57 to line 391, character 19
-   Warning: unused variable: 'ref'
- File "linkable_list.lem", line 388, character 17 to line 391, character 19
-   Warning: unused variables: 'def', 'def_linkable'
- File "linkable_list.lem", line 460, character 57 to line 464, character 19
-   Warning: unused variable: 'ref'
- File "linkable_list.lem", line 461, character 17 to line 464, character 19
-   Warning: unused variables: 'def', 'def_linkable'
- File "linkable_list.lem", line 154, character 1 to line 300, character 7
-   Warning: unused variables: 'a', 'linkables'
- File "input_list.lem", line 48, character 32 to line 53, character 3
-   Warning: unused variable: 'cid'
- File "input_list.lem", line 77, character 5 to line 82, character 7
-   Warning: unused variables: 'u', 'blob'
- File "input_list.lem", line 79, character 5 to line 82, character 7
-   Warning: unused variables: 'aid', 'aidx'
- File "input_list.lem", line 159, character 5 to line 162, character 7
-   Warning: unused variable: 'path'
- File "input_list.lem", line 159, character 22 to line 159, character 63
-   Warning: unused variable: 'path'
- File "input_list.lem", line 222, character 38 to line 223, character 109
-   Warning: unused variables: 'names', 'seqs'
- File "input_list.lem", line 207, character 60 to line 207, character 148
-   Warning: unused variable: 'inner_fname'
- File "input_list.lem", line 230, character 5 to line 268, character 6
-   Warning: redundant pattern: '_'
- File "input_list.lem", line 255, character 28 to line 265, character 17
-   Warning: unused variable: 'i'
- File "input_list.lem", line 275, character 13 to line 311, character 15
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Command_line.BuiltinControlScript'
- File "input_list.lem", line 299, character 35 to line 301, character 25
-   Warning: unused variable: 'i'
- File "input_list.lem", line 112, character 1 to line 112, character 51
-   Warning: unused variable: 'opts'
- File "input_list.lem", line 121, character 1 to line 122, character 52
-   Warning: unused variable: 'pos'
- File "command_line.lem", line 120, character 5 to line 126, character 7
-   Warning: unused variable: 'opts'
- File "command_line.lem", line 124, character 43 to line 124, character 66
-   Warning: unused variable: 'opts'
- File "command_line.lem", line 172, character 16 to line 176, character 7
-   Warning: unused variable: 'more'
- File "command_line.lem", line 334, character 72 to line 334, character 103
-   Warning: unused variable: 'args'
- File "command_line.lem", line 335, character 72 to line 335, character 103
-   Warning: unused variable: 'args'
- File "command_line.lem", line 383, character 72 to line 383, character 193
-   Warning: unused variable: 'argvals'
- File "command_line.lem", line 384, character 72 to line 384, character 128
-   Warning: unused variable: 'argvals'
- File "command_line.lem", line 401, character 72 to line 401, character 135
-   Warning: unused variable: 'argvals'
- File "command_line.lem", line 540, character 5 to line 546, character 7
-   Warning: unused variable: 'first'
- File "command_line.lem", line 557, character 13 to line 561, character 15
-   Warning: unused variable: 'following'
- File "command_line.lem", line 592, character 29 to line 615, character 15
-   Warning: unused variables: 'aliases', 'doc', 'argspec_regex'
- File "command_line.lem", line 600, character 41 to line 607, character 23
-   Warning: unused variable: 'prefix'
- File "command_line.lem", line 622, character 30 to line 627, character 3
-   Warning: unused variables: 'x', 'xs'
- File "command_line.lem", line 646, character 5 to line 649, character 7
-   Warning: unused variable: 'rest_of_stack'
- File "command_line.lem", line 169, character 1 to line 192, character 19
-   Warning: function 'add_input_file' is defined by non-exhaustive pattern-matching
-   missing patterns '[] _'
- File "command_line.lem", line 195, character 1 to line 203, character 19
-   Warning: function 'start_group' is defined by non-exhaustive pattern-matching
-   missing patterns '[]'
- File "command_line.lem", line 206, character 1 to line 214, character 19
-   Warning: function 'end_group' is defined by non-exhaustive pattern-matching
-   missing patterns '[]'
- File "elf_memory_image_of_elf64_file.lem", line 69, character 5 to line 306, character 7
-   Warning: unused variable: 'pht'
- File "elf_memory_image_of_elf64_file.lem", line 280, character 58 to line 287, character 17
-   Warning: unused variable: 'i'
- File "elf_memory_image_of_elf64_file.lem", line 197, character 17 to line 279, character 20
-   Warning: unused variable: 'reloc_as_triple'
- File "elf_memory_image_of_elf64_file.lem", line 208, character 17 to line 279, character 20
-   Warning: unused variable: 'retrieved_reloc_sites'
- File "elf_memory_image_of_elf64_file.lem", line 221, character 17 to line 279, character 20
-   Warning: unused variable: 'all_annotations_length'
- File "elf_memory_image_of_elf64_file.lem", line 228, character 65 to line 228, character 95
-   Warning: unused variable: 'range'
- File "elf_memory_image_of_elf64_file.lem", line 179, character 25 to line 191, character 93
-   Warning: unused variable: 'calcfn'
- File "elf_memory_image_of_elf64_file.lem", line 102, character 67 to line 110, character 17
-   Warning: unused variable: 'i'
- File "elf_memory_image_of_elf64_file.lem", line 72, character 57 to line 75, character 19
-   Warning: unused variable: 'null_entry'
- File "elf_memory_image_of_elf64_file.lem", line 334, character 5 to line 345, character 7
-   Warning: unused variable: 'allSectionElementRanges'
- File "elf_memory_image_of_elf64_file.lem", line 341, character 5 to line 345, character 7
-   Warning: unused variable: 'x'
- File "elf_memory_image_of_elf64_file.lem", line 336, character 30 to line 339, character 8
-   Warning: unused variable: 'i'
- File "elf_memory_image_of_elf64_file.lem", line 352, character 30 to line 389, character 8
-   Warning: unused variable: 'i'
- File "elf_memory_image_of_elf64_file.lem", line 365, character 17 to line 379, character 45
-   Warning: unused variable: 'range_len_matches_sec'
- File "elf_memory_image_of_elf64_file.lem", line 367, character 17 to line 379, character 45
-   Warning: unused variable: 'sec_matches_element_len'
- File "elf_memory_image_of_elf64_file.lem", line 402, character 5 to line 405, character 7
-   Warning: unused variable: 'e'
- File "elf_memory_image_of_elf64_file.lem", line 411, character 5 to line 418, character 29
-   Warning: unused variable: 'all_section_ranges'
- File "elf_memory_image_of_elf64_file.lem", line 479, character 5 to line 486, character 28
-   Warning: unused variable: 'all_symbol_ranges'
- File "elf_memory_image_of_elf64_file.lem", line 49, character 1 to line 51, character 75
-   Warning: unused variable: 'idx'
- File "elf_memory_image_of_elf64_file.lem", line 54, character 1 to line 57, character 25
-   Warning: unused variables: 'syment', 'f'
- File "elf_memory_image_of_elf64_file.lem", line 60, character 1 to line 63, character 25
-   Warning: unused variable: 'syment'
- File "elf_memory_image_of_elf64_file.lem", line 524, character 1 to line 531, character 40
-   Warning: unused variable: 'img'
- File "elf_memory_image_of_elf64_file.lem", line 541, character 1 to line 546, character 7
-   Warning: unused variable: 'isec'
- File "elf_memory_image.lem", line 41, character 38 to line 41, character 59
-   Warning: unused variable: 'sym_val'
- File "elf_memory_image.lem", line 41, character 21 to line 41, character 35
-   Warning: unused variable: 'r_type'
- File "elf_memory_image.lem", line 124, character 5 to line 133, character 7
-   Warning: unused variable: 'scnidx'
- File "elf_memory_image.lem", line 144, character 10 to line 153, character 11
-   Warning: unused variable: 's'
- File "elf_memory_image.lem", line 169, character 23 to line 175, character 20
-   Warning: unused variable: 'i'
- File "elf_memory_image.lem", line 186, character 20 to line 191, character 20
-   Warning: unused variable: 'symidx'
- File "elf_memory_image.lem", line 281, character 69 to line 307, character 5
-   Warning: unused variable: 'rel_idx'
- File "elf_memory_image.lem", line 296, character 17 to line 305, character 19
-   Warning: unused variables: 'symidx', 'scnidx'
- File "elf_memory_image.lem", line 37, character 1 to line 38, character 58
-   Warning: unused variable: 'f'
- File "elf_memory_image.lem", line 41, character 1 to line 41, character 60
-   Warning: unused variable: 'r'
- File "elf_memory_image.lem", line 203, character 1 to line 251, character 35
-   Warning: unused variable: 'fname'
- File "adaptors/harness_interface.lem", line 784, character 11 to line 793, character 31
-   Warning: unused variable: 'typ'
- File "adaptors/harness_interface.lem", line 915, character 11 to line 924, character 31
-   Warning: unused variable: 'typ'
- File "adaptors/harness_interface.lem", line 1086, character 50 to line 1089, character 138
-   Warning: unused variable: 'rel'
- File "adaptors/harness_interface.lem", line 1169, character 50 to line 1172, character 138
-   Warning: unused variable: 'rel'
- File "adaptors/harness_interface.lem", line 688, character 1 to line 769, character 5
-   Warning: unused variable: 'bs0'
- File "adaptors/harness_interface.lem", line 772, character 1 to line 798, character 7
-   Warning: unused variable: 'sht'
- File "adaptors/harness_interface.lem", line 902, character 1 to line 929, character 7
-   Warning: unused variable: 'sht'
- File "adaptors/sail_interface.lem", line 78, character 92 to line 101, character 7
-   Warning: unused variable: 'bs'
- File "adaptors/sail_interface.lem", line 106, character 92 to line 129, character 7
-   Warning: unused variable: 'bs'
- File "adaptors/sail_interface.lem", line 136, character 92 to line 159, character 7
-   Warning: unused variable: 'bs'
- File "adaptors/sail_interface.lem", line 164, character 92 to line 187, character 7
-   Warning: unused variable: 'bs'
- File "adaptors/sail_interface.lem", line 194, character 92 to line 219, character 7
-   Warning: unused variable: 'bs'
- File "adaptors/sail_interface.lem", line 224, character 92 to line 249, character 7
-   Warning: unused variable: 'bs'
- File "abis/abis.lem", line 108, character 5 to line 113, character 7
-   Warning: unused variables: 'af1', 'af2'
- File "abis/abis.lem", line 117, character 5 to line 122, character 7
-   Warning: unused variables: 'af1', 'af2'
- File "abis/abis.lem", line 349, character 5 to line 366, character 7
-   Warning: unused variable: 'symbol_def'
- File "abis/abis.lem", line 351, character 13 to line 362, character 15
-   Warning: unused variable: 'len'
- File "abis/abis.lem", line 382, character 27 to line 382, character 51
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 382, character 37 to line 382, character 50
-   Warning: unused variable: 'f'
- File "abis/abis.lem", line 407, character 35 to line 429, character 14
-   Warning: unused variable: 'symref'
- File "abis/abis.lem", line 534, character 5 to line 889, character 7
-   Warning: unused variables: 'fnames', 'input_imgs'
- File "abis/abis.lem", line 556, character 5 to line 889, character 7
-   Warning: unused variable: 'symnames'
- File "abis/abis.lem", line 637, character 5 to line 889, character 7
-   Warning: unused variables: 'plt_got_idxs', 'plt_ref_bound_to_maybe_defs'
- File "abis/abis.lem", line 877, character 30 to line 879, character 61
-   Warning: unused variable: 'len'
- File "abis/abis.lem", line 600, character 41 to line 623, character 24
-   Warning: unused variables: 'i', 'fname'
- File "abis/abis.lem", line 600, character 91 to line 623, character 7
-   Warning: unused variable: 'maybe_range'
- File "abis/abis.lem", line 603, character 13 to line 621, character 15
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just _,Maybe.Nothing)'
- File "abis/abis.lem", line 603, character 13 to line 621, character 15
-   Warning: unused variables: 'rr', 'maybe_def', 'MakePIC'
- File "abis/abis.lem", line 540, character 41 to line 554, character 24
-   Warning: unused variables: 'i', 'fname'
- File "abis/abis.lem", line 540, character 91 to line 554, character 7
-   Warning: unused variable: 'maybe_range'
- File "abis/abis.lem", line 543, character 13 to line 552, character 15
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just _,Maybe.Nothing)'
- File "abis/abis.lem", line 543, character 13 to line 552, character 15
-   Warning: unused variables: 'rr', 'maybe_def', 'MakePIC'
- File "abis/abis.lem", line 1065, character 29 to line 1080, character 32
-   Warning: unused variables: 'd', 'def_len'
- File "abis/abis.lem", line 926, character 25 to line 953, character 23
-   Warning: unused variables: 'd', 'def_len'
- File "abis/abis.lem", line 1131, character 13 to line 1151, character 15
-   Warning: unused variables: 'got_el_name', 'got_start_off', 'got_len'
- File "abis/abis.lem", line 1135, character 21 to line 1149, character 23
-   Warning: unused variable: 'got_addr'
- File "abis/abis.lem", line 1139, character 51 to line 1139, character 97
-   Warning: unused variable: 'symname'
- File "abis/abis.lem", line 1162, character 13 to line 1170, character 15
-   Warning: unused variables: 'l', 'got_el_name', 'got_start_off', 'got_len'
- File "abis/abis.lem", line 1187, character 13 to line 1235, character 15
-   Warning: unused variables: 'plt_el_name', 'plt_start_off', 'plt_len'
- File "abis/abis.lem", line 1206, character 37 to line 1211, character 40
-   Warning: unused variable: 'content'
- File "abis/abis.lem", line 1220, character 37 to line 1228, character 39
-   Warning: unused variables: 'len', 'matching_d'
- File "abis/abis.lem", line 1195, character 50 to line 1195, character 129
-   Warning: unused variable: 'symname'
- File "abis/abis.lem", line 1257, character 45 to line 1257, character 183
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1257, character 57 to line 1257, character 182
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1257, character 75 to line 1257, character 181
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1257, character 89 to line 1257, character 180
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1257, character 98 to line 1257, character 180
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1257, character 107 to line 1257, character 180
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1258, character 45 to line 1258, character 133
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1258, character 57 to line 1258, character 132
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1258, character 75 to line 1258, character 131
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1258, character 107 to line 1258, character 130
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1259, character 45 to line 1259, character 165
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1259, character 75 to line 1259, character 163
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1259, character 107 to line 1259, character 162
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1260, character 57 to line 1260, character 170
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1260, character 89 to line 1260, character 168
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1260, character 107 to line 1260, character 168
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1261, character 107 to line 1261, character 189
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1262, character 57 to line 1262, character 204
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1262, character 113 to line 1262, character 190
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1262, character 122 to line 1262, character 190
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1262, character 131 to line 1262, character 190
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1263, character 45 to line 1263, character 119
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1263, character 57 to line 1263, character 118
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1263, character 75 to line 1263, character 117
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1263, character 98 to line 1263, character 116
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1263, character 107 to line 1263, character 116
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1264, character 45 to line 1264, character 119
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1264, character 57 to line 1264, character 118
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1264, character 75 to line 1264, character 117
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1264, character 98 to line 1264, character 116
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1264, character 107 to line 1264, character 116
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1265, character 45 to line 1265, character 162
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1265, character 89 to line 1265, character 159
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1265, character 107 to line 1265, character 159
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1266, character 89 to line 1266, character 187
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1266, character 107 to line 1266, character 187
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1267, character 45 to line 1267, character 133
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1267, character 57 to line 1267, character 132
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1267, character 75 to line 1267, character 131
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1267, character 107 to line 1267, character 130
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1268, character 45 to line 1268, character 145
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1268, character 57 to line 1268, character 144
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1268, character 75 to line 1268, character 143
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1268, character 107 to line 1268, character 142
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1269, character 45 to line 1269, character 179
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1269, character 57 to line 1269, character 178
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1269, character 75 to line 1269, character 177
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1269, character 89 to line 1269, character 164
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1269, character 98 to line 1269, character 164
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1269, character 107 to line 1269, character 164
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1270, character 45 to line 1270, character 181
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1270, character 57 to line 1270, character 180
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1270, character 75 to line 1270, character 179
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1270, character 89 to line 1270, character 166
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1270, character 98 to line 1270, character 166
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1270, character 107 to line 1270, character 166
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1271, character 45 to line 1271, character 178
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1271, character 57 to line 1271, character 177
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1271, character 75 to line 1271, character 176
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1271, character 89 to line 1271, character 163
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1271, character 98 to line 1271, character 163
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1271, character 107 to line 1271, character 163
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1272, character 45 to line 1272, character 180
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1272, character 57 to line 1272, character 179
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1272, character 75 to line 1272, character 178
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1272, character 89 to line 1272, character 165
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1272, character 98 to line 1272, character 165
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1272, character 107 to line 1272, character 165
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1273, character 45 to line 1273, character 185
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1273, character 57 to line 1273, character 184
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1273, character 75 to line 1273, character 183
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1273, character 89 to line 1273, character 170
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1273, character 98 to line 1273, character 170
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1273, character 107 to line 1273, character 170
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1274, character 45 to line 1274, character 185
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1274, character 57 to line 1274, character 184
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1274, character 75 to line 1274, character 183
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1274, character 89 to line 1274, character 170
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1274, character 98 to line 1274, character 170
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1274, character 107 to line 1274, character 170
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1275, character 45 to line 1275, character 150
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1275, character 57 to line 1275, character 149
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1275, character 75 to line 1275, character 148
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1275, character 89 to line 1275, character 134
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1275, character 98 to line 1275, character 134
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1275, character 107 to line 1275, character 134
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1276, character 45 to line 1276, character 182
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1276, character 57 to line 1276, character 181
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1276, character 75 to line 1276, character 180
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1276, character 89 to line 1276, character 167
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1276, character 98 to line 1276, character 167
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1276, character 107 to line 1276, character 167
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1277, character 45 to line 1277, character 182
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1277, character 57 to line 1277, character 181
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1277, character 75 to line 1277, character 180
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1277, character 89 to line 1277, character 167
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1277, character 98 to line 1277, character 167
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1277, character 107 to line 1277, character 167
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1278, character 45 to line 1278, character 185
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1278, character 57 to line 1278, character 184
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1278, character 75 to line 1278, character 183
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1278, character 89 to line 1278, character 170
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1278, character 98 to line 1278, character 170
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1278, character 107 to line 1278, character 170
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1279, character 89 to line 1279, character 187
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1279, character 107 to line 1279, character 187
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1280, character 45 to line 1280, character 184
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1280, character 57 to line 1280, character 183
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1280, character 75 to line 1280, character 182
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1280, character 89 to line 1280, character 169
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1280, character 98 to line 1280, character 169
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1280, character 107 to line 1280, character 169
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1281, character 45 to line 1281, character 181
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1281, character 57 to line 1281, character 180
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1281, character 75 to line 1281, character 179
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1281, character 89 to line 1281, character 166
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1281, character 98 to line 1281, character 166
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1281, character 107 to line 1281, character 166
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1282, character 45 to line 1282, character 185
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1282, character 57 to line 1282, character 184
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1282, character 75 to line 1282, character 183
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1282, character 89 to line 1282, character 170
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1282, character 98 to line 1282, character 170
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1282, character 107 to line 1282, character 170
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1283, character 45 to line 1283, character 184
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1283, character 57 to line 1283, character 183
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1283, character 75 to line 1283, character 182
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1283, character 89 to line 1283, character 169
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1283, character 98 to line 1283, character 169
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1283, character 107 to line 1283, character 169
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1284, character 45 to line 1284, character 183
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1284, character 57 to line 1284, character 182
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1284, character 75 to line 1284, character 181
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1284, character 89 to line 1284, character 168
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1284, character 98 to line 1284, character 168
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1284, character 107 to line 1284, character 168
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1285, character 45 to line 1285, character 183
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1285, character 57 to line 1285, character 182
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1285, character 75 to line 1285, character 181
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1285, character 89 to line 1285, character 168
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1285, character 98 to line 1285, character 168
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1285, character 107 to line 1285, character 168
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1286, character 45 to line 1286, character 192
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1286, character 57 to line 1286, character 191
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1286, character 75 to line 1286, character 190
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1286, character 89 to line 1286, character 177
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1286, character 98 to line 1286, character 177
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1286, character 107 to line 1286, character 177
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1287, character 45 to line 1287, character 201
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1287, character 57 to line 1287, character 200
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1287, character 75 to line 1287, character 199
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1287, character 101 to line 1287, character 186
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1287, character 110 to line 1287, character 186
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1287, character 119 to line 1287, character 186
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1288, character 45 to line 1288, character 185
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1288, character 57 to line 1288, character 184
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1288, character 75 to line 1288, character 183
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1288, character 90 to line 1288, character 170
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1288, character 99 to line 1288, character 170
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1288, character 108 to line 1288, character 170
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1289, character 45 to line 1289, character 186
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 1289, character 57 to line 1289, character 185
-   Warning: unused variable: 'site_addr'
- File "abis/abis.lem", line 1289, character 75 to line 1289, character 184
-   Warning: unused variable: 'rr'
- File "abis/abis.lem", line 1289, character 89 to line 1289, character 171
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1289, character 98 to line 1289, character 171
-   Warning: unused variable: 'a'
- File "abis/abis.lem", line 1289, character 107 to line 1289, character 171
-   Warning: unused variable: 'e'
- File "abis/abis.lem", line 1299, character 37 to line 1299, character 95
-   Warning: unused variable: 'f'
- File "abis/abis.lem", line 1344, character 27 to line 1344, character 51
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1344, character 37 to line 1344, character 50
-   Warning: unused variable: 'f'
- File "abis/abis.lem", line 1366, character 27 to line 1366, character 51
-   Warning: unused variable: 's'
- File "abis/abis.lem", line 1366, character 37 to line 1366, character 50
-   Warning: unused variable: 'f'
- File "abis/abis.lem", line 93, character 1 to line 93, character 55
-   Warning: unused variable: 'op'
- File "abis/abis.lem", line 166, character 1 to line 174, character 9
-   Warning: unused variable: 'sec_name'
- File "abis/abis.lem", line 264, character 1 to line 288, character 25
-   Warning: unused variable: 'img'
- File "abis/abis.lem", line 332, character 1 to line 334, character 87
-   Warning: unused variable: 't'
- File "abis/abis.lem", line 399, character 1 to line 399, character 58
-   Warning: unused variables: 'md1', 'md2'
- File "abis/abis.lem", line 432, character 1 to line 445, character 13
-   Warning: unused variable: 'symref'
- File "gnu_extensions/gnu_ext_note.lem", line 29, character 3 to line 37, character 5
-   Warning: unused variable: 'xs'
- File "gnu_extensions/gnu_ext_note.lem", line 41, character 3 to line 49, character 5
-   Warning: unused variable: 'xs'
- File "gnu_extensions/gnu_ext_note.lem", line 182, character 23 to line 193, character 25
-   Warning: unused variable: 'err'
- File "gnu_extensions/gnu_ext_note.lem", line 185, character 27 to line 192, character 29
-   Warning: unused variable: 'cs'
- File "gnu_extensions/gnu_ext_note.lem", line 243, character 25 to line 254, character 27
-   Warning: unused variable: 'err'
- File "gnu_extensions/gnu_ext_note.lem", line 246, character 29 to line 253, character 31
-   Warning: unused variable: 'cs'
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 380, character 3 to line 404, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 409, character 3 to line 455, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 413, character 7 to line 416, character 9
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 460, character 3 to line 506, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Numeric _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 464, character 7 to line 467, character 9
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(_,Elf_dynamic.Address _)', 'Maybe.Just(_,Elf_dynamic.Size _)', 'Maybe.Just(_,Elf_dynamic.FName _)', 'Maybe.Just(_,Elf_dynamic.SOName _)', 'Maybe.Just(_,Elf_dynamic.Path _)', 'Maybe.Just(_,Elf_dynamic.RPath _)', 'Maybe.Just(_,Elf_dynamic.RunPath _)', 'Maybe.Just(_,Elf_dynamic.Library _)', 'Maybe.Just(_,Elf_dynamic.Flags1 _)', 'Maybe.Just(_,Elf_dynamic.Flags _)', 'Maybe.Just(_,Elf_dynamic.Checksum _)', 'Maybe.Just(_,Elf_dynamic.RelType _)', 'Maybe.Just(_,Elf_dynamic.Timestamp _)', 'Maybe.Just(_,Elf_dynamic.Null)', 'Maybe.Just(_,Elf_dynamic.Ignored)'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 304, character 7 to line 308, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 297, character 7 to line 301, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 290, character 7 to line 294, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 283, character 7 to line 287, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 276, character 7 to line 280, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 269, character 7 to line 273, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 262, character 7 to line 266, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 255, character 7 to line 259, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 248, character 7 to line 252, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 241, character 7 to line 245, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 234, character 7 to line 238, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 393, character 7 to line 397, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 386, character 7 to line 390, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 379, character 7 to line 383, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 372, character 7 to line 376, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 365, character 7 to line 369, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 358, character 7 to line 362, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 351, character 7 to line 355, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 344, character 7 to line 348, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 337, character 7 to line 341, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 330, character 7 to line 334, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 323, character 7 to line 327, character 9
-   Warning: unused variables: 'v', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 417, character 7 to line 421, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 453, character 7 to line 457, character 9
-   Warning: unused variables: 'p', 'i'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 231, character 1 to line 311, character 76
-   Warning: unused variable: 'stbl'
- File "gnu_extensions/gnu_ext_dynamic.lem", line 320, character 1 to line 400, character 76
-   Warning: unused variable: 'stbl'
- File "gnu_extensions/gnu_ext_section_header_table.lem", line 105, character 3 to line 114, character 5
-   Warning: unused variable: 'f'
- File "gnu_extensions/gnu_ext_section_header_table.lem", line 132, character 3 to line 141, character 5
-   Warning: unused variable: 'f'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 68 to line 49, character 262
-   Warning: unused variable: 'img'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 80 to line 49, character 261
-   Warning: unused variable: 'site_addr'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 98 to line 49, character 260
-   Warning: unused variable: 'rr'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 151 to line 49, character 259
-   Warning: unused variable: 's'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 160 to line 49, character 259
-   Warning: unused variable: 'a'
- File "abis/cheri_mips64/abi_cheri_mips64_relocation.lem", line 49, character 169 to line 49, character 259
-   Warning: unused variable: 'ea'
- File "abis/cheri_mips64/abi_cheri_mips64_dynamic.lem", line 52, character 1 to line 67, character 107
-   Warning: unused variable: 'stbl'
- File "abis/cheri_mips64/abi_cheri_mips64_capability.lem", line 19, character 1 to line 47, character 4
-   Warning: unused variables: 'otype', 'sealed', 'perms', 'uperms'
- File "abis/riscv/abi_riscv.lem", line 36, character 1 to line 37, character 37
-   Warning: unused variable: 'segs'
- File "abis/riscv/abi_riscv_section_header_table.lem", line 19, character 1 to line 20, character 31
-   Warning: unused variable: 'm'
- File "abis/riscv/abi_riscv_program_header_table.lem", line 16, character 1 to line 17, character 32
-   Warning: unused variable: 'm'
- File "abis/power64/abi_power64_relocation.lem", line 349, character 1 to line 832, character 60
-   Warning: unused variable: 'gottlsld_val'
- File "abis/mips64/abi_mips64.lem", line 36, character 1 to line 37, character 40
-   Warning: unused variable: 'segs'
- File "abis/mips64/abi_mips64_section_header_table.lem", line 19, character 1 to line 20, character 31
-   Warning: unused variable: 'm'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 56 to line 220, character 218
-   Warning: unused variable: 'img'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 68 to line 220, character 217
-   Warning: unused variable: 'site_addr'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 86 to line 220, character 216
-   Warning: unused variable: 'rr'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 100 to line 220, character 215
-   Warning: unused variable: 's'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 109 to line 220, character 215
-   Warning: unused variable: 'a'
- File "abis/mips64/abi_mips64_relocation.lem", line 220, character 118 to line 220, character 215
-   Warning: unused variable: 'ea'
- File "abis/mips64/abi_mips64_relocation.lem", line 223, character 55 to line 223, character 189
-   Warning: unused variable: 'img'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 74 to line 224, character 149
-   Warning: unused variable: 'img'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 86 to line 224, character 148
-   Warning: unused variable: 'site_addr'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 104 to line 224, character 147
-   Warning: unused variable: 'rr'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 118 to line 224, character 146
-   Warning: unused variable: 's'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 127 to line 224, character 146
-   Warning: unused variable: 'a'
- File "abis/mips64/abi_mips64_relocation.lem", line 224, character 136 to line 224, character 146
-   Warning: unused variable: 'ea'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 75 to line 225, character 150
-   Warning: unused variable: 'img'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 87 to line 225, character 149
-   Warning: unused variable: 'site_addr'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 105 to line 225, character 148
-   Warning: unused variable: 'rr'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 119 to line 225, character 147
-   Warning: unused variable: 's'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 128 to line 225, character 147
-   Warning: unused variable: 'a'
- File "abis/mips64/abi_mips64_relocation.lem", line 225, character 137 to line 225, character 147
-   Warning: unused variable: 'ea'
- File "abis/mips64/abi_mips64_relocation.lem", line 226, character 61 to line 226, character 136
-   Warning: unused variable: 'img'
- File "abis/mips64/abi_mips64_relocation.lem", line 226, character 73 to line 226, character 135
-   Warning: unused variable: 'site_addr'
- File "abis/mips64/abi_mips64_relocation.lem", line 226, character 91 to line 226, character 134
-   Warning: unused variable: 'rr'
- File "abis/mips64/abi_mips64_relocation.lem", line 226, character 114 to line 226, character 133
-   Warning: unused variable: 'a'
- File "abis/mips64/abi_mips64_relocation.lem", line 226, character 123 to line 226, character 133
-   Warning: unused variable: 'ea'
- File "abis/mips64/abi_mips64_dynamic.lem", line 119, character 1 to line 176, character 109
-   Warning: unused variable: 'stbl'
- File "abis/amd64/abi_amd64.lem", line 36, character 1 to line 37, character 37
-   Warning: unused variable: 'segs'
- File "abis/aarch64/abi_aarch64_le.lem", line 34, character 1 to line 35, character 37
-   Warning: unused variable: 'segs'
- File "abis/aarch64/abi_aarch64_relocation.lem", line 423, character 14 to line 423, character 88
-   Warning: unused variable: 'img'
- File "abis/aarch64/abi_aarch64_relocation.lem", line 423, character 26 to line 423, character 87
-   Warning: unused variable: 'site_addr'
- File "abis/aarch64/abi_aarch64_relocation.lem", line 423, character 44 to line 423, character 86
-   Warning: unused variable: 'rr'
- File "abis/aarch64/abi_aarch64_relocation.lem", line 423, character 58 to line 423, character 85
-   Warning: unused variable: 's'
- File "abis/aarch64/abi_aarch64_relocation.lem", line 423, character 67 to line 423, character 85
-   Warning: unused variable: 'a'
- File "abis/power64/abi_power64_dynamic.lem", line 32, character 7 to line 36, character 9
-   Warning: unused variables: 'v', 'i'
- File "abis/power64/abi_power64_dynamic.lem", line 29, character 1 to line 39, character 80
-   Warning: unused variable: 'stbl'
- File "gnu_extensions/gnu_ext_abi.lem", line 42, character 35 to line 49, character 19
-   Warning: pattern-matching is not exhaustive
-   missing patterns '[]', '_::[]', '_::_::[]', '_::_::_::[]', '_::_::_::_::[]', '_::_::_::_::_::[]', '_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::[]', '_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_'
- File "abis/abi_utilities.lem", line 169, character 1 to line 171, character 18
-   Warning: unused variable: 'img'
- File "memory_image_orderings.lem", line 35, character 5 to line 56, character 7
-   Warning: redundant pattern: '(Memory_image.ElfSegment(x1), _)'
- File "memory_image_orderings.lem", line 35, character 5 to line 56, character 7
-   Warning: unused variables: 'x1', 'x1', 'x2', 'x1', 'x1', 'x2', 'x1', 'x2', 'x1', 'x1', 'x2', 'x1', 'x2', 'x1', 'x2', 'x1', 'x1', 'x2', 'x1', 'x2', 'x1', 'x2', 'x1', 'x2', 'x1'
- File "memory_image_orderings.lem", line 61, character 5 to line 68, character 7
-   Warning: unused variables: 'x1', 'x2', 'x1', 'x2', 'x1', 'x2', 'x1', 'x2', 'x1', 'x2'
- File "memory_image_orderings.lem", line 81, character 5 to line 109, character 7
-   Warning: redundant pattern: '(Memory_image.AbiFeature(_), _)'
- File "memory_image_orderings.lem", line 121, character 5 to line 129, character 7
-   Warning: unused variables: 'x1', 'x2'
- File "memory_image_orderings.lem", line 136, character 5 to line 142, character 7
-   Warning: unused variables: 'r', 'x'
- File "memory_image_orderings.lem", line 238, character 5 to line 243, character 28
-   Warning: unused variable: 'all_symbol_ranges'
- File "memory_image_orderings.lem", line 252, character 17 to line 263, character 19
-   Warning: unused variable: 'len'
- File "memory_image_orderings.lem", line 247, character 1 to line 271, character 7
-   Warning: unused variable: 'maybe_reloc'
- File "memory_image.lem", line 429, character 5 to line 438, character 7
-   Warning: unused variable: 'len'
- File "memory_image.lem", line 494, character 35 to line 494, character 91
-   Warning: unused variable: 'len1'
- File "memory_image.lem", line 494, character 57 to line 494, character 90
-   Warning: unused variable: 'len2'
- File "memory_image.lem", line 509, character 37 to line 512, character 11
-   Warning: unused variable: 'tag'
- File "memory_image.lem", line 509, character 63 to line 512, character 11
-   Warning: unused variable: 'el_range'
- File "memory_image.lem", line 548, character 9 to line 560, character 11
-   Warning: unused variables: 'cur_max_le', 'cur_el_name', 'cur_el_rec', 'cur_el_name'
- File "memory_image.lem", line 275, character 1 to line 278, character 62
-   Warning: unused variable: 'f'
- File "memory_image.lem", line 349, character 1 to line 349, character 59
-   Warning: unused variables: 'symaddr', 'addend'
- File "memory_image.lem", line 352, character 1 to line 352, character 66
-   Warning: unused variables: 'img', 'site_addr', 'ref'
- File "memory_image.lem", line 355, character 1 to line 355, character 44
-   Warning: unused variable: 'k'
- File "dwarf.lem", line 1078, character 96 to line 1078, character 170
-   Warning: unused variables: 'ac', 'args'
- File "dwarf.lem", line 1079, character 96 to line 1079, character 162
-   Warning: unused variables: 'ac', 'args'
- File "dwarf.lem", line 1079, character 114 to line 1079, character 162
-   Warning: unused variable: 'v'
- File "dwarf.lem", line 1080, character 96 to line 1080, character 179
-   Warning: unused variables: 'ac', 'args'
- File "dwarf.lem", line 1081, character 96 to line 1081, character 244
-   Warning: unused variable: 'ac'
- File "dwarf.lem", line 1082, character 96 to line 1082, character 175
-   Warning: unused variables: 'ac', 'args'
- File "dwarf.lem", line 1083, character 96 to line 1083, character 185
-   Warning: unused variables: 'ac', 'args'
- File "dwarf.lem", line 1086, character 97 to line 1086, character 137
-   Warning: unused variable: 'ac'
- File "dwarf.lem", line 1089, character 97 to line 1089, character 128
-   Warning: unused variable: 'ac'
- File "dwarf.lem", line 1093, character 97 to line 1093, character 136
-   Warning: unused variable: 'ac'
- File "dwarf.lem", line 1095, character 149 to line 1095, character 238
-   Warning: unused variable: 'vs''
- File "dwarf.lem", line 1099, character 97 to line 1099, character 137
-   Warning: unused variable: 'ac'
- File "dwarf.lem", line 1410, character 16 to line 1410, character 97
-   Warning: unused variable: 'xs'
- File "dwarf.lem", line 1525, character 3 to line 1529, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(_,[])'
- File "dwarf.lem", line 1525, character 3 to line 1529, character 5
-   Warning: unused variables: 'xs'', 'x'
- File "dwarf.lem", line 1567, character 3 to line 1571, character 5
-   Warning: unused variables: 'x1', 'x2'
- File "dwarf.lem", line 1640, character 3 to line 1643, character 5
-   Warning: unused variables: 'x', 'y'
- File "dwarf.lem", line 1834, character 5 to line 1839, character 7
-   Warning: unused variable: 'ys'
- File "dwarf.lem", line 2070, character 20 to line 2070, character 38
-   Warning: unused variable: 'y''
- File "dwarf.lem", line 2082, character 54 to line 2082, character 88
-   Warning: unused variable: 'x'
- File "dwarf.lem", line 2196, character 3 to line 2209, character 5
-   Warning: unused variables: 's', 'pc''
- File "dwarf.lem", line 2282, character 3 to line 2303, character 5
-   Warning: unused variables: 'n', 'n'
- File "dwarf.lem", line 2446, character 3 to line 2451, character 5
-   Warning: unused variables: 'bs', 'n'
- File "dwarf.lem", line 2460, character 3 to line 2466, character 5
-   Warning: unused variables: 'bs', 'n'
- File "dwarf.lem", line 2502, character 6 to line 2503, character 43
-   Warning: unused variables: 'pos', 'af'
- File "dwarf.lem", line 2569, character 6 to line 2577, character 8
-   Warning: unused variable: 'parents''
- File "dwarf.lem", line 2581, character 3 to line 2584, character 5
-   Warning: unused variable: 'cu''
- File "dwarf.lem", line 2591, character 6 to line 2596, character 7
-   Warning: unused variables: 'parents_spec', 'cupdie_spec'
- File "dwarf.lem", line 2611, character 3 to line 2615, character 5
-   Warning: unused variable: 'cu''
- File "dwarf.lem", line 2639, character 41 to line 2640, character 40
-   Warning: unused variable: 'pc'''
- File "dwarf.lem", line 2648, character 14 to line 2652, character 29
-   Warning: unused variable: 'ul'
- File "dwarf.lem", line 2785, character 3 to line 2790, character 84
-   Warning: unused variable: 'offset'
- File "dwarf.lem", line 2817, character 49 to line 2817, character 110
-   Warning: unused variable: 'at'
- File "dwarf.lem", line 2900, character 9 to line 2903, character 11
-   Warning: unused variable: 'pc_abbrev''
- File "dwarf.lem", line 2959, character 9 to line 2962, character 11
-   Warning: unused variable: 'pc_abbrev''
- File "dwarf.lem", line 3166, character 3 to line 3170, character 5
-   Warning: unused variables: 'rli', 'rli'
- File "dwarf.lem", line 3250, character 3 to line 3254, character 5
-   Warning: unused variable: 'bs'
- File "dwarf.lem", line 3257, character 3 to line 3266, character 5
-   Warning: unused variables: 'bs', 'bs'
- File "dwarf.lem", line 3353, character 17 to line 3357, character 19
-   Warning: unused variables: 'pc''', 's', 'pc'''
- File "dwarf.lem", line 3337, character 17 to line 3341, character 19
-   Warning: unused variables: 'pc''', 's', 'pc'''
- File "dwarf.lem", line 3446, character 12 to line 3448, character 37
-   Warning: unused variable: 'ul'
- File "dwarf.lem", line 3723, character 12 to line 3733, character 15
-   Warning: unused variable: 'size'
- File "dwarf.lem", line 3781, character 3 to line 3787, character 5
-   Warning: unused variable: 'n'
- File "dwarf.lem", line 3850, character 5 to line 3855, character 7
-   Warning: unused variables: 'pc'', 'pc''
- File "dwarf.lem", line 3953, character 5 to line 3956, character 7
-   Warning: unused variable: 'pc_loc''
- File "dwarf.lem", line 3943, character 5 to line 3946, character 7
-   Warning: unused variable: 'pc_loc''
- File "dwarf.lem", line 3935, character 5 to line 3938, character 7
-   Warning: unused variable: 'pc_loc''
- File "dwarf.lem", line 3921, character 5 to line 3924, character 7
-   Warning: unused variable: 'pc_info''
- File "dwarf.lem", line 4024, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4025, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4026, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4027, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4028, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4029, character 3 to line 4034, character 8
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 4175, character 3 to line 4186, character 5
-   Warning: unused variable: 'fde'
- File "dwarf.lem", line 4177, character 8 to line 4177, character 128
-   Warning: unused variable: 'rows'
- File "dwarf.lem", line 4368, character 3 to line 4390, character 5
-   Warning: unused variables: 'n', 'n'
- File "dwarf.lem", line 4375, character 7 to line 4388, character 11
-   Warning: unused variable: 'offset'
- File "dwarf.lem", line 4229, character 9 to line 4346, character 11
-   Warning: unused variable: 'size'
- File "dwarf.lem", line 4324, character 13 to line 4331, character 15
-   Warning: unused variable: 'vs''
- File "dwarf.lem", line 4334, character 13 to line 4343, character 15
-   Warning: unused variable: 'bs'
- File "dwarf.lem", line 4480, character 3 to line 4484, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns '([],_::_)', '(_::[],[])', '(_::[],_::_::_)', '(_::_::_,[])', '(_::_::_,_::[])'
- File "dwarf.lem", line 4480, character 3 to line 4484, character 5
-   Warning: unused variable: 'len'
- File "dwarf.lem", line 4534, character 3 to line 4628, character 5
-   Warning: unused variable: 'i'
- File "dwarf.lem", line 4553, character 7 to line 4564, character 9
-   Warning: unused variable: 'r''
- File "dwarf.lem", line 4566, character 7 to line 4570, character 9
-   Warning: unused variable: 'i'
- File "dwarf.lem", line 4643, character 3 to line 4664, character 68
-   Warning: unused variable: 'final_location'
- File "dwarf.lem", line 4819, character 12 to line 4822, character 15
-   Warning: unused variable: 'cupdie''
- File "dwarf.lem", line 4820, character 12 to line 4822, character 15
-   Warning: unused variable: 'mname''
- File "dwarf.lem", line 4703, character 24 to line 4703, character 39
-   Warning: unused variable: 's'
- File "dwarf.lem", line 4836, character 3 to line 4855, character 5
-   Warning: unused variables: 'die', 'cu', 'parents'
- File "dwarf.lem", line 4849, character 97 to line 4849, character 225
-   Warning: unused variable: 'am'
- File "dwarf.lem", line 4859, character 3 to line 4864, character 5
-   Warning: unused variable: 'parents'
- File "dwarf.lem", line 4868, character 3 to line 4873, character 5
-   Warning: unused variable: 'parents'
- File "dwarf.lem", line 4887, character 3 to line 4902, character 5
-   Warning: unused variables: 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'decl', 'cupdie', 'decl', 'mbyte_size', 'mmembers', 'decl', 'mbyte_size', 'mtyp'', 'mmembers', 'cupdie'
- File "dwarf.lem", line 4897, character 45 to line 4897, character 155
-   Warning: unused variable: 'msubrange_typ'
- File "dwarf.lem", line 4919, character 3 to line 4924, character 7
-   Warning: unused variable: 'cupdie'
- File "dwarf.lem", line 4928, character 3 to line 4936, character 5
-   Warning: unused variables: 'decl', 'atk'
- File "dwarf.lem", line 4940, character 3 to line 4945, character 7
-   Warning: unused variable: 'cupdie'
- File "dwarf.lem", line 4948, character 3 to line 4952, character 7
-   Warning: unused variable: 'cupdie'
- File "dwarf.lem", line 4960, character 3 to line 4971, character 5
-   Warning: unused variables: 'decl', 'decl'
- File "dwarf.lem", line 5042, character 9 to line 5072, character 107
-   Warning: unused variables: 'cu', 'parents'
- File "dwarf.lem", line 5063, character 12 to line 5070, character 14
-   Warning: unused variables: 'n', 'n'
- File "dwarf.lem", line 5048, character 51 to line 5048, character 153
-   Warning: unused variables: 'pos', 'av', 'af'
- File "dwarf.lem", line 5119, character 3 to line 5133, character 3
-   Warning: unused variables: 'n1', 'n'
- File "dwarf.lem", line 5128, character 29 to line 5128, character 224
-   Warning: unused variable: 'None'
- File "dwarf.lem", line 5140, character 3 to line 5144, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_string _),Maybe.Nothing)', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Nothing)', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_block _ _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_constantN _ _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_constant_SLEB128 _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_constant_ULEB128 _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_exprloc _ _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_flag _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_ref _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_ref_addr _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_ref_sig8 _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_sec_offset _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_string _))', '(Maybe.Nothing,Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_block _ _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_constantN _ _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_constant_SLEB128 _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_constant_ULEB128 _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_exprloc _ _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_flag _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_ref _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_ref_addr _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_ref_sig8 _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_sec_offset _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_string _),Maybe.Just(Dwarf.AV_strp _))', '(Maybe.Just(Dwarf.AV_strp _),Maybe.Just(Dwarf.AV_strp _))'
- File "dwarf.lem", line 5150, character 7 to line 5154, character 9
-   Warning: unused variable: 'x'
- File "dwarf.lem", line 5192, character 3 to line 5201, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns 'Maybe.Just(Dwarf.AV_addr _)', 'Maybe.Just(Dwarf.AV_constantN _ _)', 'Maybe.Just(Dwarf.AV_constant_SLEB128 _)', 'Maybe.Just(Dwarf.AV_constant_ULEB128 _)', 'Maybe.Just(Dwarf.AV_flag _)', 'Maybe.Just(Dwarf.AV_ref _)', 'Maybe.Just(Dwarf.AV_ref_addr _)', 'Maybe.Just(Dwarf.AV_ref_sig8 _)', 'Maybe.Just(Dwarf.AV_string _)', 'Maybe.Just(Dwarf.AV_strp _)'
- File "dwarf.lem", line 5192, character 3 to line 5201, character 5
-   Warning: unused variables: 'n', 'n'
- File "dwarf.lem", line 5291, character 11 to line 5301, character 14
-   Warning: unused variables: 'typ', 'parents', 'kind', 'removed'
- File "dwarf.lem", line 5293, character 12 to line 5301, character 14
-   Warning: unused variables: 'x'', 'parents'', 'offset'', 'typ'', 'removed'', 'name'', 'kind''
- File "dwarf.lem", line 5292, character 46 to line 5292, character 134
-   Warning: unused variables: 'parents'', 'typ'', 'removed'', 'kind'', 'locs''
- File "dwarf.lem", line 5285, character 31 to line 5285, character 178
-   Warning: unused variables: 'offset', 'typ', 'parents', 'kind', 'removed', 'locs'
- File "dwarf.lem", line 5285, character 99 to line 5285, character 168
-   Warning: unused variables: 'parents'', 'offset'', 'typ'', 'removed'', 'kind'', 'locs''
- File "dwarf.lem", line 5309, character 9 to line 5314, character 22
-   Warning: unused variable: 'x'
- File "dwarf.lem", line 5337, character 6 to line 5349, character 9
-   Warning: unused variables: 'n2', 'n1', 'cu', 'parents', 'sld'
- File "dwarf.lem", line 5371, character 37 to line 5371, character 74
-   Warning: unused variable: 'sld'
- File "dwarf.lem", line 5405, character 6 to line 5417, character 9
-   Warning: unused variables: 'n2', 'n1', 'cu', 'parents', 'sld'
- File "dwarf.lem", line 5406, character 7 to line 5417, character 9
-   Warning: unused variable: 'e'
- File "dwarf.lem", line 5429, character 34 to line 5429, character 71
-   Warning: unused variable: 'sld'
- File "dwarf.lem", line 5527, character 47 to line 5527, character 107
-   Warning: unused variables: 'name', 'ufe'
- File "dwarf.lem", line 5527, character 70 to line 5527, character 107
-   Warning: unused variables: 'name'', 'ufe''
- File "dwarf.lem", line 5527, character 16 to line 5527, character 43
-   Warning: unused variables: 'line', 'name'
- File "dwarf.lem", line 5534, character 40 to line 5534, character 102
-   Warning: unused variable: 'ufe'
- File "dwarf.lem", line 5538, character 3 to line 5542, character 5
-   Warning: unused variable: 'ufe''
- File "dwarf.lem", line 5630, character 3 to line 5715, character 5
-   Warning: unused variables: 's', 'n2', 'n1', 'n3'
- File "dwarf.lem", line 5739, character 3 to line 5742, character 5
-   Warning: unused variable: 'lnh'
- File "dwarf.lem", line 5739, character 20 to line 5739, character 60
-   Warning: unused variable: 'lnrs'
- File "dwarf.lem", line 5933, character 7 to line 5938, character 7
-   Warning: unused variable: 'cupdie''
- File "dwarf.lem", line 5996, character 5 to line 6008, character 12
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 5974, character 11 to line 5979, character 13
-   Warning: unused variable: 'cupdie''
- File "dwarf.lem", line 6020, character 5 to line 6030, character 6
-   Warning: unused variable: 'parents'
- File "dwarf.lem", line 6286, character 8 to line 6291, character 9
-   Warning: unused variables: 'subprogram_name', 'ud'
- File "dwarf.lem", line 6356, character 5 to line 6357, character 48
-   Warning: unused variable: 'cu'
- File "dwarf.lem", line 6371, character 18 to line 6372, character 88
-   Warning: unused variable: 'locs'
- File "dwarf.lem", line 6418, character 3 to line 6420, character 57
-   Warning: unused variable: 'p_context'
- File "dwarf.lem", line 128, character 1 to line 128, character 19
-   Warning: unused variable: 's'
- File "dwarf.lem", line 129, character 1 to line 129, character 20
-   Warning: unused variable: 's'
- File "dwarf.lem", line 130, character 1 to line 130, character 20
-   Warning: unused variable: 's'
- File "dwarf.lem", line 1554, character 1 to line 1554, character 91
-   Warning: unused variable: 'n'
- File "dwarf.lem", line 2087, character 1 to line 2105, character 20
-   Warning: unused variable: 'c'
- File "dwarf.lem", line 2393, character 1 to line 2393, character 93
-   Warning: unused variable: 'parents'
- File "dwarf.lem", line 2445, character 1 to line 2451, character 5
-   Warning: unused variable: 'die1'
- File "dwarf.lem", line 2474, character 1 to line 2492, character 5
-   Warning: unused variables: 'c', 'str'
- File "dwarf.lem", line 2609, character 1 to line 2615, character 5
-   Warning: unused variable: 'parents'
- File "dwarf.lem", line 2763, character 1 to line 2776, character 3
-   Warning: unused variables: 'pp_children', 'parents'
- File "dwarf.lem", line 3011, character 1 to line 3014, character 8
-   Warning: unused variables: 'c', 'cuh'
- File "dwarf.lem", line 3115, character 1 to line 3120, character 8
-   Warning: unused variables: 'c', 'cuh'
- File "dwarf.lem", line 3381, character 1 to line 3393, character 59
-   Warning: unused variables: 'c', 'cuh'
- File "dwarf.lem", line 3400, character 1 to line 3408, character 51
-   Warning: unused variables: 'c', 'cuh'
- File "dwarf.lem", line 3825, character 1 to line 3828, character 73
-   Warning: unused variable: 'ufe'
- File "dwarf.lem", line 3830, character 1 to line 3835, character 73
-   Warning: unused variable: 'ufe'
- File "dwarf.lem", line 3838, character 1 to line 3839, character 6
-   Warning: unused variables: 'mcomp_dir', 'mdir', 'ufe'
- File "dwarf.lem", line 4494, character 1 to line 4499, character 31
-   Warning: unused variable: 'fde'
- File "dwarf.lem", line 4501, character 1 to line 4510, character 10
-   Warning: unused variable: 'fde'
- File "dwarf.lem", line 4520, character 1 to line 4628, character 5
-   Warning: unused variable: 'fi'
- File "dwarf.lem", line 5897, character 1 to line 5900, character 14
-   Warning: unused variables: 'd', 'subprogram_line_extents', 'cu', 'parents'
- File "dwarf.lem", line 6039, character 1 to line 6040, character 59
-   Warning: unused variable: 'sup'
- File "dwarf.lem", line 6334, character 1 to line 6334, character 89
-   Warning: unused variables: 'n', 'm', 'is', 'n'', 'm'', 'is''
- File "dwarf.lem", line 6427, character 1 to line 6434, character 5
-   Warning: unused variable: 'bs'
- File "dwarf.lem", line 6438, character 1 to line 6472, character 3
-   Warning: unused variable: 'bs'
- File "elf_dynamic.lem", line 651, character 9 to line 671, character 11
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 692, character 9 to line 712, character 11
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 945, character 7 to line 949, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 938, character 9 to line 942, character 11
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 928, character 7 to line 932, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 919, character 7 to line 923, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 912, character 7 to line 916, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 905, character 7 to line 909, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 898, character 7 to line 902, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 891, character 7 to line 895, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 882, character 7 to line 886, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 866, character 7 to line 870, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 859, character 7 to line 863, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 852, character 7 to line 856, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 845, character 7 to line 849, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 834, character 7 to line 838, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 825, character 7 to line 829, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 818, character 7 to line 822, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 811, character 7 to line 815, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 804, character 7 to line 808, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 797, character 7 to line 801, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 790, character 7 to line 794, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 783, character 7 to line 787, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 776, character 7 to line 780, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 769, character 7 to line 773, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 762, character 7 to line 766, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 755, character 7 to line 759, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 748, character 7 to line 752, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 741, character 7 to line 745, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 732, character 7 to line 736, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1188, character 7 to line 1192, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1181, character 9 to line 1185, character 11
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1171, character 7 to line 1175, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1162, character 7 to line 1166, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1155, character 7 to line 1159, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1148, character 7 to line 1152, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1141, character 7 to line 1145, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1134, character 7 to line 1138, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1125, character 7 to line 1129, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1109, character 7 to line 1113, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1102, character 7 to line 1106, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1095, character 7 to line 1099, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1088, character 7 to line 1092, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1077, character 7 to line 1081, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1068, character 7 to line 1072, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1061, character 7 to line 1065, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1054, character 7 to line 1058, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1047, character 7 to line 1051, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1040, character 7 to line 1044, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1033, character 7 to line 1037, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1026, character 7 to line 1030, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 1019, character 7 to line 1023, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1012, character 7 to line 1016, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 1005, character 7 to line 1009, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 998, character 7 to line 1002, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 991, character 7 to line 995, character 9
-   Warning: unused variables: 'v', 'i'
- File "elf_dynamic.lem", line 984, character 7 to line 988, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 975, character 7 to line 979, character 9
-   Warning: unused variables: 'p', 'i'
- File "elf_dynamic.lem", line 643, character 1 to line 674, character 7
-   Warning: unused variable: 'endian'
- File "elf_dynamic.lem", line 684, character 1 to line 715, character 7
-   Warning: unused variable: 'endian'
- File "elf_file.lem", line 102, character 21 to line 103, character 19
-   Warning: unused variable: 'offset'
- File "elf_file.lem", line 152, character 7 to line 192, character 19
-   Warning: unused variable: 'segs_zip'
- File "elf_file.lem", line 191, character 21 to line 192, character 19
-   Warning: unused variable: 'offset'
- File "elf_file.lem", line 610, character 29 to line 622, character 57
-   Warning: unused variable: 'bs1'
- File "elf_file.lem", line 629, character 29 to line 641, character 57
-   Warning: unused variable: 'bs1'
- File "elf_file.lem", line 651, character 3 to line 662, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 672, character 3 to line 683, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 740, character 3 to line 758, character 33
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 765, character 3 to line 785, character 33
-   Warning: unused variable: 'hdr'
- File "elf_file.lem", line 767, character 3 to line 785, character 33
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 768, character 47 to line 775, character 13
-   Warning: unused variable: 'index'
- File "elf_file.lem", line 793, character 3 to line 799, character 7
-   Warning: unused variable: 'hdr'
- File "elf_file.lem", line 794, character 3 to line 799, character 7
-   Warning: unused variable: 'sht'
- File "elf_file.lem", line 807, character 3 to line 813, character 7
-   Warning: unused variable: 'hdr'
- File "elf_file.lem", line 808, character 3 to line 813, character 7
-   Warning: unused variable: 'sht'
- File "elf_file.lem", line 823, character 3 to line 839, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 848, character 3 to line 867, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 876, character 3 to line 892, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 901, character 3 to line 917, character 7
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 926, character 3 to line 933, character 7
-   Warning: unused variable: 'sht'
- File "elf_file.lem", line 942, character 3 to line 949, character 7
-   Warning: unused variable: 'sht'
- File "elf_file.lem", line 1070, character 5 to line 1099, character 14
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 1071, character 32 to line 1099, character 14
-   Warning: unused variable: 'bs0'
- File "elf_file.lem", line 1077, character 45 to line 1095, character 15
-   Warning: unused variables: 'entry', 'mach'
- File "elf_file.lem", line 1088, character 13 to line 1095, character 15
-   Warning: unused variables: 'x', 'xs'
- File "elf_file.lem", line 1109, character 5 to line 1141, character 14
-   Warning: unused variable: 'segs'
- File "elf_file.lem", line 1110, character 32 to line 1141, character 14
-   Warning: unused variable: 'bs0'
- File "elf_file.lem", line 1119, character 45 to line 1137, character 15
-   Warning: unused variables: 'entry', 'mach'
- File "elf_file.lem", line 1130, character 13 to line 1137, character 15
-   Warning: unused variables: 'x', 'xs'
- File "elf_note.lem", line 444, character 33 to line 473, character 16
-   Warning: unused variable: 'vn_rdev'
- File "elf_interpreted_section.lem", line 254, character 3 to line 262, character 5
-   Warning: unused variable: 'f'
- File "elf_interpreted_section.lem", line 274, character 3 to line 282, character 5
-   Warning: unused variable: 'f'
- File "elf_section_header_table.lem", line 741, character 3 to line 754, character 5
-   Warning: unused variable: 'xs'
- File "elf_section_header_table.lem", line 761, character 3 to line 774, character 5
-   Warning: unused variable: 'xs'
- File "elf_section_header_table.lem", line 271, character 1 to line 305, character 9
-   Warning: unused variables: 'os', 'proc'
- File "elf_header.lem", line 931, character 1 to line 932, character 17
-   Warning: unused variable: 'hdr'
- File "string_table.lem", line 51, character 3 to line 53, character 5
-   Warning: unused variable: 'base'
- File "string_table.lem", line 59, character 3 to line 61, character 5
-   Warning: unused variable: 'sep'
- File "hex_printing.lem", line 58, character 3 to line 76, character 5
-   Warning: pattern-matching is not exhaustive
-   missing patterns '_::[]'
- File "elf_types_native_uint.lem", line 123, character 1 to line 125, character 40
-   Warning: unused variable: 'endian'
- File "archive.lem", line 28, character 3 to line 43, character 95
-   Warning: unused variable: 'magic_bytes'
- File "archive.lem", line 32, character 40 to line 43, character 95
-   Warning: unused variable: 'magic'
- File "archive.lem", line 34, character 41 to line 43, character 95
-   Warning: unused variable: 'timestamp_str'
- File "archive.lem", line 35, character 41 to line 43, character 95
-   Warning: unused variable: 'uid_str'
- File "archive.lem", line 36, character 41 to line 43, character 95
-   Warning: unused variable: 'gid_str'
- File "archive.lem", line 37, character 41 to line 43, character 95
-   Warning: unused variable: 'mode_str'
- File "archive.lem", line 90, character 21 to line 116, character 23
-   Warning: unused variable: 'ys'
- File "archive.lem", line 131, character 39 to line 137, character 7
-   Warning: unused variable: 'hdr'
- File "byte_pattern_extra.lem", line 84, character 11 to line 87, character 5
-   Warning: unused variable: 'err_msg'
- File "error.lem", line 26, character 3 to line 29, character 5
-   Warning: unused variable: 'err'
- File "error.lem", line 58, character 3 to line 61, character 5
-   Warning: unused variable: 'err'
- File "multimap.lem", line 203, character 9 to line 213, character 9
-   Warning: unused variable: 'lowerThanLow'
- File "multimap.lem", line 205, character 9 to line 213, character 9
-   Warning: unused variable: 'tooHigh'
- File "missing_pervasives.lem", line 274, character 5 to line 278, character 14
-   Warning: unused variable: 'accum_compl'
- File "missing_pervasives.lem", line 276, character 5 to line 278, character 14
-   Warning: unused variable: 'just_indices'
- File "missing_pervasives.lem", line 283, character 5 to line 285, character 9
-   Warning: unused variable: 'accum_compl'
- File "missing_pervasives.lem", line 292, character 5 to line 296, character 34
-   Warning: unused variable: 'just_indices'
- File "missing_pervasives.lem", line 294, character 5 to line 296, character 34
-   Warning: unused variable: 'just_indices_compl'
- File "missing_pervasives.lem", line 313, character 34 to line 316, character 3
-   Warning: pattern-matching is not exhaustive
-   missing patterns '([],[],_::_)', '([],_::_,_)', '(_::_,[],_)', '(_::_,_::_,[])'
- File "missing_pervasives.lem", line 590, character 13 to line 593, character 82
-   Warning: unused variable: 'mapped_list'
- File "missing_pervasives.lem", line 715, character 7 to line 718, character 9
-   Warning: unused variable: 'c'
- File "show.lem", line 22, character 1 to line 22, character 27
-   Warning: unused variable: 'u'
- File "missing_pervasives.lem", line 558, character 2 to line 561, character 4
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 1514, character 3 to line 1518, character 5
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 1525, character 3 to line 1529, character 5
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 1577, character 3 to line 1581, character 5
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 1811, character 5 to line 1818, character 7
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 2021, character 5 to line 2025, character 7
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 2028, character 5 to line 2035, character 7
-   Warning: pattern compilation used for target ocaml
- File "dwarf.lem", line 4156, character 3 to line 4172, character 5
-   Warning: pattern compilation used for target ocaml
- File "memory_image.lem", line 464, character 5 to line 467, character 7
-   Warning: pattern compilation used for target ocaml
- File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 546, character 3 to line 565, character 5
-   Warning: pattern compilation used for target ocaml
- File "/home/opam/.opam/5.0/share/lem/library/set_extra.lem", line 83, character 1 to line 83, character 62
-   Warning: compile message for constant 'Set_extra.toList' and target 'ocaml'
-     toList is only defined on finite sets and the order of the resulting list is unspecified and therefore might differ for different backend implementations.
- File "/home/opam/.opam/5.0/share/lem/library/num.lem", line 2137, character 1 to line 2137, character 43
-   Warning: compile message for constant 'Num.naturalFromInteger' and target 'ocaml'
-     x natFromNatural might fail for too big values. The values allowed are system-dependent. However, at least 30 bit should be available, i.e. all numbers up to 2^30 = 1 073 741 824 should be OK.
- File "/home/opam/.opam/5.0/share/lem/library/map_extra.lem", line 64, character 1 to line 64, character 70
-   Warning: compile message for constant 'Map_extra.toList' and target 'ocaml'
-     Map_extra.mapMaybe is only defined for the ocaml and coq backend
- File "/home/opam/.opam/5.0/share/lem/library/list_extra.lem", line 24, character 1 to line 24, character 35
-   Warning: compile message for constant 'List_extra.head' and target 'ocaml'
-     head is only defined on non-empty list and should therefore be avoided. Use maching instead and handle the empty case explicitly.
- File "/home/opam/.opam/5.0/share/lem/library/list_extra.lem", line 39, character 1 to line 39, character 40
-   Warning: compile message for constant 'List_extra.tail' and target 'ocaml'
-     tail is only defined on non-empty list and should therefore be avoided. Use maching instead and handle the empty case explicitly.
- File "/home/opam/.opam/5.0/share/lem/library/map.lem", line 299, character 1 to line 299, character 87
-   Warning: compile message for constant 'Map.mapi' and target 'ocaml'
-     Map.mapi is only defined for the ocaml backend
- no location information available
-   Warning: renaming 'byte_sequence' to 'byte_sequence0' for target ocaml
- no location information available
-   Warning: renaming 'memory_image' to 'memory_image0' for target ocaml
- no location information available
-   Warning: renaming 'plt_entry_address_fn' to 'plt_entry_address_fn0' for target ocaml
- no location information available
-   Warning: renaming 'byte_sequence' to 'byte_sequence1' for target ocaml
- File "missing_pervasives.lem", line 21, character 1 to line 21, character 28
-   Warning: renaming 'id' to 'id0' for target ocaml
- File "missing_pervasives.lem", line 473, character 1 to line 473, character 51
-   Warning: renaming 'take' to 'take0' for target ocaml
- File "missing_pervasives.lem", line 480, character 1 to line 480, character 51
-   Warning: renaming 'drop' to 'drop0' for target ocaml
- File "missing_pervasives.lem", line 548, character 1 to line 548, character 68
-   Warning: renaming 'find_index' to 'find_index0' for target ocaml
- File "missing_pervasives.lem", line 563, character 1 to line 563, character 51
-   Warning: renaming 'replicate' to 'replicate0' for target ocaml
- File "multimap.lem", line 185, character 1 to line 187, character 62
-   Warning: renaming 'lookupBy' to 'lookupBy0' for target ocaml
- File "byte_sequence.lem", line 65, character 1 to line 65, character 37
-   Warning: renaming 'length' to 'length0' for target ocaml
- File "byte_sequence.lem", line 121, character 1 to line 121, character 86
-   Warning: renaming 'takebytes_with_length' to 'takebytes_with_length0' for target ocaml
- File "byte_sequence.lem", line 203, character 1 to line 203, character 81
-   Warning: renaming 'partition' to 'partition0' for target ocaml
- File "string_table.lem", line 43, character 1 to line 43, character 24
-   Warning: renaming 'empty' to 'empty0' for target ocaml
- File "string_table.lem", line 65, character 1 to line 65, character 34
-   Warning: renaming 'size' to 'size0' for target ocaml
- File "string_table.lem", line 71, character 1 to line 71, character 52
-   Warning: renaming 'concat' to 'concat0' for target ocaml
- File "elf_interpreted_section.lem", line 287, character 1 to line 288, character 22
-   Warning: renaming 'is_valid_elf32_section_header_table' to 'is_valid_elf32_section_header_table0' for target ocaml
- File "elf_interpreted_section.lem", line 295, character 1 to line 296, character 22
-   Warning: renaming 'is_valid_elf64_section_header_table' to 'is_valid_elf64_section_header_table0' for target ocaml
- File "memory_image.lem", line 39, character 19 to line 39, character 24
-   Warning: renaming 'length' to 'length1' for target ocaml
- File "abis/aarch64/abi_aarch64_le.lem", line 75, character 1 to line 75, character 116
-   Warning: renaming 'section_is_special' to 'section_is_special0' for target ocaml
- File "abstract_linker_script.lem", line 6, character 5 to line 6, character 6
-   Warning: renaming 'Eq' to 'Eq0' for target ocaml
- File "abstract_linker_script.lem", line 7, character 5 to line 7, character 6
-   Warning: renaming 'Lt' to 'Lt0' for target ocaml
- File "abstract_linker_script.lem", line 10, character 5 to line 10, character 7
-   Warning: renaming 'And' to 'And0' for target ocaml
- File "abstract_linker_script.lem", line 11, character 5 to line 11, character 6
-   Warning: renaming 'Or' to 'Or0' for target ocaml
- File "abstract_linker_script.lem", line 16, character 5 to line 16, character 7
-   Warning: renaming 'Var' to 'Var0' for target ocaml
- File "abis/amd64/abi_amd64.lem", line 55, character 5 to line 55, character 7
-   Warning: renaming 'GOT' to 'GOT0' for target ocaml
- File "abis/amd64/abi_amd64.lem", line 56, character 7 to line 56, character 9
-   Warning: renaming 'PLT' to 'PLT0' for target ocaml
- File "abis/amd64/abi_amd64.lem", line 58, character 1 to line 58, character 132
-   Warning: renaming 'abiFeatureCompare' to 'abiFeatureCompare0' for target ocaml
- File "abis/amd64/abi_amd64.lem", line 67, character 1 to line 67, character 112
-   Warning: renaming 'abiFeatureTagEq' to 'abiFeatureTagEq0' for target ocaml
- File "abis/amd64/abi_amd64.lem", line 87, character 1 to line 87, character 116
-   Warning: renaming 'section_is_special' to 'section_is_special1' for target ocaml
- File "abis/mips64/abi_mips64_section_header_table.lem", line 25, character 5 to line 25, character 30
-   Warning: renaming 'abi_amg64_special_sections' to 'abi_amg64_special_sections0' for target ocaml
- File "abis/mips64/abi_mips64.lem", line 48, character 5 to line 48, character 7
-   Warning: renaming 'GOT' to 'GOT1' for target ocaml
- File "abis/mips64/abi_mips64.lem", line 49, character 7 to line 49, character 9
-   Warning: renaming 'PLT' to 'PLT1' for target ocaml
- File "abis/mips64/abi_mips64.lem", line 51, character 1 to line 51, character 134
-   Warning: renaming 'abiFeatureCompare' to 'abiFeatureCompare1' for target ocaml
- File "abis/mips64/abi_mips64.lem", line 60, character 1 to line 60, character 114
-   Warning: renaming 'abiFeatureTagEq' to 'abiFeatureTagEq1' for target ocaml
- File "abis/mips64/abi_mips64.lem", line 80, character 1 to line 80, character 116
-   Warning: renaming 'section_is_special' to 'section_is_special2' for target ocaml
- File "abis/riscv/abi_riscv_section_header_table.lem", line 18, character 1 to line 18, character 57
-   Warning: renaming 'string_of_abi_mips64_section_type' to 'string_of_abi_mips64_section_type0' for target ocaml
- File "abis/riscv/abi_riscv_section_header_table.lem", line 25, character 5 to line 25, character 30
-   Warning: renaming 'abi_amg64_special_sections' to 'abi_amg64_special_sections1' for target ocaml
- File "abis/riscv/abi_riscv_section_header_table.lem", line 32, character 1 to line 32, character 85
-   Warning: renaming 'abi_mips64_special_sections_large_code_model' to 'abi_mips64_special_sections_large_code_model0' for target ocaml
- File "abis/riscv/abi_riscv_symbol_table.lem", line 16, character 1 to line 16, character 56
-   Warning: renaming 'string_of_abi_mips64_symbol_type' to 'string_of_abi_mips64_symbol_type0' for target ocaml
- File "abis/riscv/abi_riscv.lem", line 49, character 5 to line 49, character 7
-   Warning: renaming 'GOT' to 'GOT2' for target ocaml
- File "abis/riscv/abi_riscv.lem", line 50, character 7 to line 50, character 9
-   Warning: renaming 'PLT' to 'PLT2' for target ocaml
- File "abis/riscv/abi_riscv.lem", line 52, character 1 to line 52, character 132
-   Warning: renaming 'abiFeatureCompare' to 'abiFeatureCompare2' for target ocaml
- File "abis/riscv/abi_riscv.lem", line 61, character 1 to line 61, character 112
-   Warning: renaming 'abiFeatureTagEq' to 'abiFeatureTagEq2' for target ocaml
- File "abis/riscv/abi_riscv.lem", line 81, character 1 to line 81, character 116
-   Warning: renaming 'section_is_special' to 'section_is_special3' for target ocaml
- File "gnu_extensions/gnu_ext_section_to_segment_mapping.lem", line 80, character 1 to line 80, character 77
-   Warning: renaming 'elf32_section_flags' to 'elf32_section_flags0' for target ocaml
- File "gnu_extensions/gnu_ext_section_to_segment_mapping.lem", line 85, character 1 to line 85, character 77
-   Warning: renaming 'elf64_section_flags' to 'elf64_section_flags0' for target ocaml
- File "elf_memory_image.lem", line 37, character 5 to line 37, character 26
-   Warning: renaming 'elf_section_is_special' to 'elf_section_is_special0' for target ocaml
- File "elf_memory_image.lem", line 40, character 1 to line 40, character 149
-   Warning: renaming 'noop_reloc' to 'noop_reloc0' for target ocaml
- File "elf_memory_image_of_elf64_file.lem", line 470, character 1 to line 470, character 52
-   Warning: renaming 'name_of_symbol_def' to 'name_of_symbol_def0' for target ocaml
- File "command_line.lem", line 152, character 1 to line 152, character 38
-   Warning: renaming 'initial_state' to 'initial_state0' for target ocaml
- File "test_image.lem", line 89, character 5 to line 89, character 7
-   Warning: renaming 'img' to 'img0' for target ocaml
- File "byte_sequence_ocaml.lem", line 94, character 1 to line 94, character 86
-   Warning: renaming 'takebytes_with_length' to 'takebytes_with_length1' for target ocaml
- File "copy_elf.lem", line 57, character 5 to line 57, character 19
-   Warning: renaming 'default_hdr_bdl' to 'default_hdr_bdl0' for target ocaml
- File "copy_elf.lem", line 60, character 5 to line 60, character 19
-   Warning: renaming 'default_pht_bdl' to 'default_pht_bdl0' for target ocaml
- File "copy_elf.lem", line 63, character 5 to line 63, character 19
-   Warning: renaming 'default_sht_bdl' to 'default_sht_bdl0' for target ocaml
- File "copy_elf.lem", line 68, character 1 to line 68, character 74
-   Warning: renaming 'chunks' to 'chunks0' for target ocaml
- File "copy_elf.lem", line 149, character 1 to line 149, character 79
-   Warning: renaming 'provide_offsets' to 'provide_offsets0' for target ocaml
- File "copy_elf.lem", line 160, character 1 to line 160, character 64
-   Warning: renaming 'create_chunks' to 'create_chunks0' for target ocaml
- File "copy_elf.lem", line 168, character 1 to line 168, character 48
-   Warning: renaming 'print_chunk' to 'print_chunk0' for target ocaml
- File "copy_elf.lem", line 175, character 1 to line 175, character 77
-   Warning: renaming 'obtain_abi_specific_string_of_reloc_type' to 'obtain_abi_specific_string_of_reloc_type0' for target ocaml
- File "main_load.lem", line 261, character 5 to line 261, character 43
-   Warning: renaming 'extract_all_relocs_as_symbol_references' to 'extract_all_relocs_as_symbol_references0' for target ocaml
- touch lem_ocaml_sentinel
- mkdir -p "build_zarith/"
- ocamlfind ocamlc -c -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -package num -package lem uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlc -a -o "build_zarith/linksem.cma" -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot uint64_wrapper.cmo uint32_wrapper.cmo show.cmo endianness.cmo error.cmo ml_bindings.cmo missing_pervasives.cmo multimap.cmo default_printing.cmo byte_sequence_wrapper.cmo byte_sequence_impl.cmo filesystem.cmo filesystem_wrapper.cmo byte_sequence.cmo byte_pattern.cmo byte_pattern_extra.cmo archive.cmo elf_types_native_uint.cmo hex_printing.cmo string_table.cmo auxv.cmo elf_header.cmo elf_symbol_table.cmo elf_program_header_table.cmo elf_section_header_table.cmo elf_relocation.cmo elf_interpreted_segment.cmo elf_interpreted_section.cmo elf_note.cmo elf_file.cmo elf_dynamic.cmo dwarf_ctypes.cmo dwarf.cmo ldconfig.cmo abis/abi_classes.cmo memory_image.cmo memory_image_orderings.cmo abis/abi_utilities.cmo gnu_extensions/gnu_ext_abi.cmo abis/power64/abi_power64.cmo abis/power64/abi_power64_elf_header.cmo abis/power64/abi_power64_section_header_table.cmo abis/power64/abi_power64_dynamic.cmo abis/aarch64/abi_aarch64_le_elf_header.cmo abis/aarch64/abi_aarch64_symbol_table.cmo abis/aarch64/abi_aarch64_section_header_table.cmo abis/aarch64/abi_aarch64_program_header_table.cmo abis/aarch64/abi_aarch64_le_serialisation.cmo abis/aarch64/abi_aarch64_relocation.cmo abis/aarch64/abi_aarch64_le.cmo abstract_linker_script.cmo abis/amd64/abi_amd64_elf_header.cmo abis/amd64/abi_amd64_serialisation.cmo abis/amd64/abi_amd64_relocation.cmo abis/amd64/abi_amd64_program_header_table.cmo abis/amd64/abi_amd64_section_header_table.cmo abis/amd64/abi_amd64_symbol_table.cmo abis/amd64/abi_amd64.cmo abis/mips64/abi_mips64_dynamic.cmo abis/mips64/abi_mips64_elf_header.cmo abis/mips64/abi_mips64_relocation.cmo abis/mips64/abi_mips64_serialisation.cmo abis/mips64/abi_mips64_program_header_table.cmo abis/mips64/abi_mips64_section_header_table.cmo abis/mips64/abi_mips64_symbol_table.cmo abis/mips64/abi_mips64.cmo abis/x86/abi_x86_relocation.cmo abis/power64/abi_power64_relocation.cmo abis/riscv/abi_riscv_elf_header.cmo abis/riscv/abi_riscv_program_header_table.cmo abis/riscv/abi_riscv_relocation.cmo abis/riscv/abi_riscv_section_header_table.cmo abis/riscv/abi_riscv_serialisation.cmo abis/riscv/abi_riscv_symbol_table.cmo abis/riscv/abi_riscv.cmo abis/cheri_mips64/abi_cheri_mips64_capability.cmo abis/cheri_mips64/abi_cheri_mips64_dynamic.cmo abis/cheri_mips64/abi_cheri_mips64_elf_header.cmo abis/cheri_mips64/abi_cheri_mips64_relocation.cmo abis/cheri_mips64/abi_cheri_mips64.cmo gnu_extensions/gnu_ext_types_native_uint.cmo gnu_extensions/gnu_ext_section_header_table.cmo gnu_extensions/gnu_ext_dynamic.cmo gnu_extensions/gnu_ext_symbol_versioning.cmo gnu_extensions/gnu_ext_program_header_table.cmo gnu_extensions/gnu_ext_section_to_segment_mapping.cmo gnu_extensions/gnu_ext_note.cmo abis/abis.cmo adaptors/sail_interface.cmo adaptors/harness_interface.cmo elf_memory_image.cmo elf_memory_image_of_elf64_file.cmo command_line.cmo input_list.cmo linkable_list.cmo linker_script.cmo link.cmo load.cmo elf64_file_of_elf_memory_image.cmo test_image.cmo
- mv uint64_wrapper.cmi uint32_wrapper.cmi show.cmi endianness.cmi error.cmi ml_bindings.cmi missing_pervasives.cmi multimap.cmi default_printing.cmi byte_sequence_wrapper.cmi byte_sequence_impl.cmi filesystem.cmi filesystem_wrapper.cmi byte_sequence.cmi byte_pattern.cmi byte_pattern_extra.cmi archive.cmi elf_types_native_uint.cmi hex_printing.cmi string_table.cmi auxv.cmi elf_header.cmi elf_symbol_table.cmi elf_program_header_table.cmi elf_section_header_table.cmi elf_relocation.cmi elf_interpreted_segment.cmi elf_interpreted_section.cmi elf_note.cmi elf_file.cmi elf_dynamic.cmi dwarf_ctypes.cmi dwarf.cmi ldconfig.cmi abis/abi_classes.cmi memory_image.cmi memory_image_orderings.cmi abis/abi_utilities.cmi gnu_extensions/gnu_ext_abi.cmi abis/power64/abi_power64.cmi abis/power64/abi_power64_elf_header.cmi abis/power64/abi_power64_section_header_table.cmi abis/power64/abi_power64_dynamic.cmi abis/aarch64/abi_aarch64_le_elf_header.cmi abis/aarch64/abi_aarch64_symbol_table.cmi abis/aarch64/abi_aarch64_section_header_table.cmi abis/aarch64/abi_aarch64_program_header_table.cmi abis/aarch64/abi_aarch64_le_serialisation.cmi abis/aarch64/abi_aarch64_relocation.cmi abis/aarch64/abi_aarch64_le.cmi abstract_linker_script.cmi abis/amd64/abi_amd64_elf_header.cmi abis/amd64/abi_amd64_serialisation.cmi abis/amd64/abi_amd64_relocation.cmi abis/amd64/abi_amd64_program_header_table.cmi abis/amd64/abi_amd64_section_header_table.cmi abis/amd64/abi_amd64_symbol_table.cmi abis/amd64/abi_amd64.cmi abis/mips64/abi_mips64_dynamic.cmi abis/mips64/abi_mips64_elf_header.cmi abis/mips64/abi_mips64_relocation.cmi abis/mips64/abi_mips64_serialisation.cmi abis/mips64/abi_mips64_program_header_table.cmi abis/mips64/abi_mips64_section_header_table.cmi abis/mips64/abi_mips64_symbol_table.cmi abis/mips64/abi_mips64.cmi abis/x86/abi_x86_relocation.cmi abis/power64/abi_power64_relocation.cmi abis/riscv/abi_riscv_elf_header.cmi abis/riscv/abi_riscv_program_header_table.cmi abis/riscv/abi_riscv_relocation.cmi abis/riscv/abi_riscv_section_header_table.cmi abis/riscv/abi_riscv_serialisation.cmi abis/riscv/abi_riscv_symbol_table.cmi abis/riscv/abi_riscv.cmi abis/cheri_mips64/abi_cheri_mips64_capability.cmi abis/cheri_mips64/abi_cheri_mips64_dynamic.cmi abis/cheri_mips64/abi_cheri_mips64_elf_header.cmi abis/cheri_mips64/abi_cheri_mips64_relocation.cmi abis/cheri_mips64/abi_cheri_mips64.cmi gnu_extensions/gnu_ext_types_native_uint.cmi gnu_extensions/gnu_ext_section_header_table.cmi gnu_extensions/gnu_ext_dynamic.cmi gnu_extensions/gnu_ext_symbol_versioning.cmi gnu_extensions/gnu_ext_program_header_table.cmi gnu_extensions/gnu_ext_section_to_segment_mapping.cmi gnu_extensions/gnu_ext_note.cmi abis/abis.cmi adaptors/sail_interface.cmi adaptors/harness_interface.cmi elf_memory_image.cmi elf_memory_image_of_elf64_file.cmi command_line.cmi input_list.cmi linkable_list.cmi linker_script.cmi link.cmi load.cmi elf64_file_of_elf_memory_image.cmi test_image.cmi "build_zarith/"
- cp META.zarith "build_zarith/"/META
- mkdir -p "build_zarith/"
- ocamlfind ocamlopt -c -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -package num -package lem uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlopt -a -o "build_zarith/linksem.cmxa" -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot uint64_wrapper.cmx uint32_wrapper.cmx show.cmx endianness.cmx error.cmx ml_bindings.cmx missing_pervasives.cmx multimap.cmx default_printing.cmx byte_sequence_wrapper.cmx byte_sequence_impl.cmx filesystem.cmx filesystem_wrapper.cmx byte_sequence.cmx byte_pattern.cmx byte_pattern_extra.cmx archive.cmx elf_types_native_uint.cmx hex_printing.cmx string_table.cmx auxv.cmx elf_header.cmx elf_symbol_table.cmx elf_program_header_table.cmx elf_section_header_table.cmx elf_relocation.cmx elf_interpreted_segment.cmx elf_interpreted_section.cmx elf_note.cmx elf_file.cmx elf_dynamic.cmx dwarf_ctypes.cmx dwarf.cmx ldconfig.cmx abis/abi_classes.cmx memory_image.cmx memory_image_orderings.cmx abis/abi_utilities.cmx gnu_extensions/gnu_ext_abi.cmx abis/power64/abi_power64.cmx abis/power64/abi_power64_elf_header.cmx abis/power64/abi_power64_section_header_table.cmx abis/power64/abi_power64_dynamic.cmx abis/aarch64/abi_aarch64_le_elf_header.cmx abis/aarch64/abi_aarch64_symbol_table.cmx abis/aarch64/abi_aarch64_section_header_table.cmx abis/aarch64/abi_aarch64_program_header_table.cmx abis/aarch64/abi_aarch64_le_serialisation.cmx abis/aarch64/abi_aarch64_relocation.cmx abis/aarch64/abi_aarch64_le.cmx abstract_linker_script.cmx abis/amd64/abi_amd64_elf_header.cmx abis/amd64/abi_amd64_serialisation.cmx abis/amd64/abi_amd64_relocation.cmx abis/amd64/abi_amd64_program_header_table.cmx abis/amd64/abi_amd64_section_header_table.cmx abis/amd64/abi_amd64_symbol_table.cmx abis/amd64/abi_amd64.cmx abis/mips64/abi_mips64_dynamic.cmx abis/mips64/abi_mips64_elf_header.cmx abis/mips64/abi_mips64_relocation.cmx abis/mips64/abi_mips64_serialisation.cmx abis/mips64/abi_mips64_program_header_table.cmx abis/mips64/abi_mips64_section_header_table.cmx abis/mips64/abi_mips64_symbol_table.cmx abis/mips64/abi_mips64.cmx abis/x86/abi_x86_relocation.cmx abis/power64/abi_power64_relocation.cmx abis/riscv/abi_riscv_elf_header.cmx abis/riscv/abi_riscv_program_header_table.cmx abis/riscv/abi_riscv_relocation.cmx abis/riscv/abi_riscv_section_header_table.cmx abis/riscv/abi_riscv_serialisation.cmx abis/riscv/abi_riscv_symbol_table.cmx abis/riscv/abi_riscv.cmx abis/cheri_mips64/abi_cheri_mips64_capability.cmx abis/cheri_mips64/abi_cheri_mips64_dynamic.cmx abis/cheri_mips64/abi_cheri_mips64_elf_header.cmx abis/cheri_mips64/abi_cheri_mips64_relocation.cmx abis/cheri_mips64/abi_cheri_mips64.cmx gnu_extensions/gnu_ext_types_native_uint.cmx gnu_extensions/gnu_ext_section_header_table.cmx gnu_extensions/gnu_ext_dynamic.cmx gnu_extensions/gnu_ext_symbol_versioning.cmx gnu_extensions/gnu_ext_program_header_table.cmx gnu_extensions/gnu_ext_section_to_segment_mapping.cmx gnu_extensions/gnu_ext_note.cmx abis/abis.cmx adaptors/sail_interface.cmx adaptors/harness_interface.cmx elf_memory_image.cmx elf_memory_image_of_elf64_file.cmx command_line.cmx input_list.cmx linkable_list.cmx linker_script.cmx link.cmx load.cmx elf64_file_of_elf_memory_image.cmx test_image.cmx
- mv uint64_wrapper.cmi uint32_wrapper.cmi show.cmi endianness.cmi error.cmi ml_bindings.cmi missing_pervasives.cmi multimap.cmi default_printing.cmi byte_sequence_wrapper.cmi byte_sequence_impl.cmi filesystem.cmi filesystem_wrapper.cmi byte_sequence.cmi byte_pattern.cmi byte_pattern_extra.cmi archive.cmi elf_types_native_uint.cmi hex_printing.cmi string_table.cmi auxv.cmi elf_header.cmi elf_symbol_table.cmi elf_program_header_table.cmi elf_section_header_table.cmi elf_relocation.cmi elf_interpreted_segment.cmi elf_interpreted_section.cmi elf_note.cmi elf_file.cmi elf_dynamic.cmi dwarf_ctypes.cmi dwarf.cmi ldconfig.cmi abis/abi_classes.cmi memory_image.cmi memory_image_orderings.cmi abis/abi_utilities.cmi gnu_extensions/gnu_ext_abi.cmi abis/power64/abi_power64.cmi abis/power64/abi_power64_elf_header.cmi abis/power64/abi_power64_section_header_table.cmi abis/power64/abi_power64_dynamic.cmi abis/aarch64/abi_aarch64_le_elf_header.cmi abis/aarch64/abi_aarch64_symbol_table.cmi abis/aarch64/abi_aarch64_section_header_table.cmi abis/aarch64/abi_aarch64_program_header_table.cmi abis/aarch64/abi_aarch64_le_serialisation.cmi abis/aarch64/abi_aarch64_relocation.cmi abis/aarch64/abi_aarch64_le.cmi abstract_linker_script.cmi abis/amd64/abi_amd64_elf_header.cmi abis/amd64/abi_amd64_serialisation.cmi abis/amd64/abi_amd64_relocation.cmi abis/amd64/abi_amd64_program_header_table.cmi abis/amd64/abi_amd64_section_header_table.cmi abis/amd64/abi_amd64_symbol_table.cmi abis/amd64/abi_amd64.cmi abis/mips64/abi_mips64_dynamic.cmi abis/mips64/abi_mips64_elf_header.cmi abis/mips64/abi_mips64_relocation.cmi abis/mips64/abi_mips64_serialisation.cmi abis/mips64/abi_mips64_program_header_table.cmi abis/mips64/abi_mips64_section_header_table.cmi abis/mips64/abi_mips64_symbol_table.cmi abis/mips64/abi_mips64.cmi abis/x86/abi_x86_relocation.cmi abis/power64/abi_power64_relocation.cmi abis/riscv/abi_riscv_elf_header.cmi abis/riscv/abi_riscv_program_header_table.cmi abis/riscv/abi_riscv_relocation.cmi abis/riscv/abi_riscv_section_header_table.cmi abis/riscv/abi_riscv_serialisation.cmi abis/riscv/abi_riscv_symbol_table.cmi abis/riscv/abi_riscv.cmi abis/cheri_mips64/abi_cheri_mips64_capability.cmi abis/cheri_mips64/abi_cheri_mips64_dynamic.cmi abis/cheri_mips64/abi_cheri_mips64_elf_header.cmi abis/cheri_mips64/abi_cheri_mips64_relocation.cmi abis/cheri_mips64/abi_cheri_mips64.cmi gnu_extensions/gnu_ext_types_native_uint.cmi gnu_extensions/gnu_ext_section_header_table.cmi gnu_extensions/gnu_ext_dynamic.cmi gnu_extensions/gnu_ext_symbol_versioning.cmi gnu_extensions/gnu_ext_program_header_table.cmi gnu_extensions/gnu_ext_section_to_segment_mapping.cmi gnu_extensions/gnu_ext_note.cmi abis/abis.cmi adaptors/sail_interface.cmi adaptors/harness_interface.cmi elf_memory_image.cmi elf_memory_image_of_elf64_file.cmi command_line.cmi input_list.cmi linkable_list.cmi linker_script.cmi link.cmi load.cmi elf64_file_of_elf_memory_image.cmi test_image.cmi "build_zarith/"
- mv uint64_wrapper.cmx uint32_wrapper.cmx show.cmx endianness.cmx error.cmx ml_bindings.cmx missing_pervasives.cmx multimap.cmx default_printing.cmx byte_sequence_wrapper.cmx byte_sequence_impl.cmx filesystem.cmx filesystem_wrapper.cmx byte_sequence.cmx byte_pattern.cmx byte_pattern_extra.cmx archive.cmx elf_types_native_uint.cmx hex_printing.cmx string_table.cmx auxv.cmx elf_header.cmx elf_symbol_table.cmx elf_program_header_table.cmx elf_section_header_table.cmx elf_relocation.cmx elf_interpreted_segment.cmx elf_interpreted_section.cmx elf_note.cmx elf_file.cmx elf_dynamic.cmx dwarf_ctypes.cmx dwarf.cmx ldconfig.cmx abis/abi_classes.cmx memory_image.cmx memory_image_orderings.cmx abis/abi_utilities.cmx gnu_extensions/gnu_ext_abi.cmx abis/power64/abi_power64.cmx abis/power64/abi_power64_elf_header.cmx abis/power64/abi_power64_section_header_table.cmx abis/power64/abi_power64_dynamic.cmx abis/aarch64/abi_aarch64_le_elf_header.cmx abis/aarch64/abi_aarch64_symbol_table.cmx abis/aarch64/abi_aarch64_section_header_table.cmx abis/aarch64/abi_aarch64_program_header_table.cmx abis/aarch64/abi_aarch64_le_serialisation.cmx abis/aarch64/abi_aarch64_relocation.cmx abis/aarch64/abi_aarch64_le.cmx abstract_linker_script.cmx abis/amd64/abi_amd64_elf_header.cmx abis/amd64/abi_amd64_serialisation.cmx abis/amd64/abi_amd64_relocation.cmx abis/amd64/abi_amd64_program_header_table.cmx abis/amd64/abi_amd64_section_header_table.cmx abis/amd64/abi_amd64_symbol_table.cmx abis/amd64/abi_amd64.cmx abis/mips64/abi_mips64_dynamic.cmx abis/mips64/abi_mips64_elf_header.cmx abis/mips64/abi_mips64_relocation.cmx abis/mips64/abi_mips64_serialisation.cmx abis/mips64/abi_mips64_program_header_table.cmx abis/mips64/abi_mips64_section_header_table.cmx abis/mips64/abi_mips64_symbol_table.cmx abis/mips64/abi_mips64.cmx abis/x86/abi_x86_relocation.cmx abis/power64/abi_power64_relocation.cmx abis/riscv/abi_riscv_elf_header.cmx abis/riscv/abi_riscv_program_header_table.cmx abis/riscv/abi_riscv_relocation.cmx abis/riscv/abi_riscv_section_header_table.cmx abis/riscv/abi_riscv_serialisation.cmx abis/riscv/abi_riscv_symbol_table.cmx abis/riscv/abi_riscv.cmx abis/cheri_mips64/abi_cheri_mips64_capability.cmx abis/cheri_mips64/abi_cheri_mips64_dynamic.cmx abis/cheri_mips64/abi_cheri_mips64_elf_header.cmx abis/cheri_mips64/abi_cheri_mips64_relocation.cmx abis/cheri_mips64/abi_cheri_mips64.cmx gnu_extensions/gnu_ext_types_native_uint.cmx gnu_extensions/gnu_ext_section_header_table.cmx gnu_extensions/gnu_ext_dynamic.cmx gnu_extensions/gnu_ext_symbol_versioning.cmx gnu_extensions/gnu_ext_program_header_table.cmx gnu_extensions/gnu_ext_section_to_segment_mapping.cmx gnu_extensions/gnu_ext_note.cmx abis/abis.cmx adaptors/sail_interface.cmx adaptors/harness_interface.cmx elf_memory_image.cmx elf_memory_image_of_elf64_file.cmx command_line.cmx input_list.cmx linkable_list.cmx linker_script.cmx link.cmx load.cmx elf64_file_of_elf_memory_image.cmx test_image.cmx "build_zarith/"
- mv uint64_wrapper.cmt uint32_wrapper.cmt show.cmt endianness.cmt error.cmt ml_bindings.cmt missing_pervasives.cmt multimap.cmt default_printing.cmt byte_sequence_wrapper.cmt byte_sequence_impl.cmt filesystem.cmt filesystem_wrapper.cmt byte_sequence.cmt byte_pattern.cmt byte_pattern_extra.cmt archive.cmt elf_types_native_uint.cmt hex_printing.cmt string_table.cmt auxv.cmt elf_header.cmt elf_symbol_table.cmt elf_program_header_table.cmt elf_section_header_table.cmt elf_relocation.cmt elf_interpreted_segment.cmt elf_interpreted_section.cmt elf_note.cmt elf_file.cmt elf_dynamic.cmt dwarf_ctypes.cmt dwarf.cmt ldconfig.cmt abis/abi_classes.cmt memory_image.cmt memory_image_orderings.cmt abis/abi_utilities.cmt gnu_extensions/gnu_ext_abi.cmt abis/power64/abi_power64.cmt abis/power64/abi_power64_elf_header.cmt abis/power64/abi_power64_section_header_table.cmt abis/power64/abi_power64_dynamic.cmt abis/aarch64/abi_aarch64_le_elf_header.cmt abis/aarch64/abi_aarch64_symbol_table.cmt abis/aarch64/abi_aarch64_section_header_table.cmt abis/aarch64/abi_aarch64_program_header_table.cmt abis/aarch64/abi_aarch64_le_serialisation.cmt abis/aarch64/abi_aarch64_relocation.cmt abis/aarch64/abi_aarch64_le.cmt abstract_linker_script.cmt abis/amd64/abi_amd64_elf_header.cmt abis/amd64/abi_amd64_serialisation.cmt abis/amd64/abi_amd64_relocation.cmt abis/amd64/abi_amd64_program_header_table.cmt abis/amd64/abi_amd64_section_header_table.cmt abis/amd64/abi_amd64_symbol_table.cmt abis/amd64/abi_amd64.cmt abis/mips64/abi_mips64_dynamic.cmt abis/mips64/abi_mips64_elf_header.cmt abis/mips64/abi_mips64_relocation.cmt abis/mips64/abi_mips64_serialisation.cmt abis/mips64/abi_mips64_program_header_table.cmt abis/mips64/abi_mips64_section_header_table.cmt abis/mips64/abi_mips64_symbol_table.cmt abis/mips64/abi_mips64.cmt abis/x86/abi_x86_relocation.cmt abis/power64/abi_power64_relocation.cmt abis/riscv/abi_riscv_elf_header.cmt abis/riscv/abi_riscv_program_header_table.cmt abis/riscv/abi_riscv_relocation.cmt abis/riscv/abi_riscv_section_header_table.cmt abis/riscv/abi_riscv_serialisation.cmt abis/riscv/abi_riscv_symbol_table.cmt abis/riscv/abi_riscv.cmt abis/cheri_mips64/abi_cheri_mips64_capability.cmt abis/cheri_mips64/abi_cheri_mips64_dynamic.cmt abis/cheri_mips64/abi_cheri_mips64_elf_header.cmt abis/cheri_mips64/abi_cheri_mips64_relocation.cmt abis/cheri_mips64/abi_cheri_mips64.cmt gnu_extensions/gnu_ext_types_native_uint.cmt gnu_extensions/gnu_ext_section_header_table.cmt gnu_extensions/gnu_ext_dynamic.cmt gnu_extensions/gnu_ext_symbol_versioning.cmt gnu_extensions/gnu_ext_program_header_table.cmt gnu_extensions/gnu_ext_section_to_segment_mapping.cmt gnu_extensions/gnu_ext_note.cmt abis/abis.cmt adaptors/sail_interface.cmt adaptors/harness_interface.cmt elf_memory_image.cmt elf_memory_image_of_elf64_file.cmt command_line.cmt input_list.cmt linkable_list.cmt linker_script.cmt link.cmt load.cmt elf64_file_of_elf_memory_image.cmt test_image.cmt "build_zarith/"
- cp META.zarith "build_zarith/"/META
- mkdir -p "build_num/"
- ocamlfind ocamlc -c -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -package num -package lem -predicates nozarith uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlc -a -o "build_num/linksem.cma" -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot uint64_wrapper.cmo uint32_wrapper.cmo show.cmo endianness.cmo error.cmo ml_bindings.cmo missing_pervasives.cmo multimap.cmo default_printing.cmo byte_sequence_wrapper.cmo byte_sequence_impl.cmo filesystem.cmo filesystem_wrapper.cmo byte_sequence.cmo byte_pattern.cmo byte_pattern_extra.cmo archive.cmo elf_types_native_uint.cmo hex_printing.cmo string_table.cmo auxv.cmo elf_header.cmo elf_symbol_table.cmo elf_program_header_table.cmo elf_section_header_table.cmo elf_relocation.cmo elf_interpreted_segment.cmo elf_interpreted_section.cmo elf_note.cmo elf_file.cmo elf_dynamic.cmo dwarf_ctypes.cmo dwarf.cmo ldconfig.cmo abis/abi_classes.cmo memory_image.cmo memory_image_orderings.cmo abis/abi_utilities.cmo gnu_extensions/gnu_ext_abi.cmo abis/power64/abi_power64.cmo abis/power64/abi_power64_elf_header.cmo abis/power64/abi_power64_section_header_table.cmo abis/power64/abi_power64_dynamic.cmo abis/aarch64/abi_aarch64_le_elf_header.cmo abis/aarch64/abi_aarch64_symbol_table.cmo abis/aarch64/abi_aarch64_section_header_table.cmo abis/aarch64/abi_aarch64_program_header_table.cmo abis/aarch64/abi_aarch64_le_serialisation.cmo abis/aarch64/abi_aarch64_relocation.cmo abis/aarch64/abi_aarch64_le.cmo abstract_linker_script.cmo abis/amd64/abi_amd64_elf_header.cmo abis/amd64/abi_amd64_serialisation.cmo abis/amd64/abi_amd64_relocation.cmo abis/amd64/abi_amd64_program_header_table.cmo abis/amd64/abi_amd64_section_header_table.cmo abis/amd64/abi_amd64_symbol_table.cmo abis/amd64/abi_amd64.cmo abis/mips64/abi_mips64_dynamic.cmo abis/mips64/abi_mips64_elf_header.cmo abis/mips64/abi_mips64_relocation.cmo abis/mips64/abi_mips64_serialisation.cmo abis/mips64/abi_mips64_program_header_table.cmo abis/mips64/abi_mips64_section_header_table.cmo abis/mips64/abi_mips64_symbol_table.cmo abis/mips64/abi_mips64.cmo abis/x86/abi_x86_relocation.cmo abis/power64/abi_power64_relocation.cmo abis/riscv/abi_riscv_elf_header.cmo abis/riscv/abi_riscv_program_header_table.cmo abis/riscv/abi_riscv_relocation.cmo abis/riscv/abi_riscv_section_header_table.cmo abis/riscv/abi_riscv_serialisation.cmo abis/riscv/abi_riscv_symbol_table.cmo abis/riscv/abi_riscv.cmo abis/cheri_mips64/abi_cheri_mips64_capability.cmo abis/cheri_mips64/abi_cheri_mips64_dynamic.cmo abis/cheri_mips64/abi_cheri_mips64_elf_header.cmo abis/cheri_mips64/abi_cheri_mips64_relocation.cmo abis/cheri_mips64/abi_cheri_mips64.cmo gnu_extensions/gnu_ext_types_native_uint.cmo gnu_extensions/gnu_ext_section_header_table.cmo gnu_extensions/gnu_ext_dynamic.cmo gnu_extensions/gnu_ext_symbol_versioning.cmo gnu_extensions/gnu_ext_program_header_table.cmo gnu_extensions/gnu_ext_section_to_segment_mapping.cmo gnu_extensions/gnu_ext_note.cmo abis/abis.cmo adaptors/sail_interface.cmo adaptors/harness_interface.cmo elf_memory_image.cmo elf_memory_image_of_elf64_file.cmo command_line.cmo input_list.cmo linkable_list.cmo linker_script.cmo link.cmo load.cmo elf64_file_of_elf_memory_image.cmo test_image.cmo
- mv uint64_wrapper.cmi uint32_wrapper.cmi show.cmi endianness.cmi error.cmi ml_bindings.cmi missing_pervasives.cmi multimap.cmi default_printing.cmi byte_sequence_wrapper.cmi byte_sequence_impl.cmi filesystem.cmi filesystem_wrapper.cmi byte_sequence.cmi byte_pattern.cmi byte_pattern_extra.cmi archive.cmi elf_types_native_uint.cmi hex_printing.cmi string_table.cmi auxv.cmi elf_header.cmi elf_symbol_table.cmi elf_program_header_table.cmi elf_section_header_table.cmi elf_relocation.cmi elf_interpreted_segment.cmi elf_interpreted_section.cmi elf_note.cmi elf_file.cmi elf_dynamic.cmi dwarf_ctypes.cmi dwarf.cmi ldconfig.cmi abis/abi_classes.cmi memory_image.cmi memory_image_orderings.cmi abis/abi_utilities.cmi gnu_extensions/gnu_ext_abi.cmi abis/power64/abi_power64.cmi abis/power64/abi_power64_elf_header.cmi abis/power64/abi_power64_section_header_table.cmi abis/power64/abi_power64_dynamic.cmi abis/aarch64/abi_aarch64_le_elf_header.cmi abis/aarch64/abi_aarch64_symbol_table.cmi abis/aarch64/abi_aarch64_section_header_table.cmi abis/aarch64/abi_aarch64_program_header_table.cmi abis/aarch64/abi_aarch64_le_serialisation.cmi abis/aarch64/abi_aarch64_relocation.cmi abis/aarch64/abi_aarch64_le.cmi abstract_linker_script.cmi abis/amd64/abi_amd64_elf_header.cmi abis/amd64/abi_amd64_serialisation.cmi abis/amd64/abi_amd64_relocation.cmi abis/amd64/abi_amd64_program_header_table.cmi abis/amd64/abi_amd64_section_header_table.cmi abis/amd64/abi_amd64_symbol_table.cmi abis/amd64/abi_amd64.cmi abis/mips64/abi_mips64_dynamic.cmi abis/mips64/abi_mips64_elf_header.cmi abis/mips64/abi_mips64_relocation.cmi abis/mips64/abi_mips64_serialisation.cmi abis/mips64/abi_mips64_program_header_table.cmi abis/mips64/abi_mips64_section_header_table.cmi abis/mips64/abi_mips64_symbol_table.cmi abis/mips64/abi_mips64.cmi abis/x86/abi_x86_relocation.cmi abis/power64/abi_power64_relocation.cmi abis/riscv/abi_riscv_elf_header.cmi abis/riscv/abi_riscv_program_header_table.cmi abis/riscv/abi_riscv_relocation.cmi abis/riscv/abi_riscv_section_header_table.cmi abis/riscv/abi_riscv_serialisation.cmi abis/riscv/abi_riscv_symbol_table.cmi abis/riscv/abi_riscv.cmi abis/cheri_mips64/abi_cheri_mips64_capability.cmi abis/cheri_mips64/abi_cheri_mips64_dynamic.cmi abis/cheri_mips64/abi_cheri_mips64_elf_header.cmi abis/cheri_mips64/abi_cheri_mips64_relocation.cmi abis/cheri_mips64/abi_cheri_mips64.cmi gnu_extensions/gnu_ext_types_native_uint.cmi gnu_extensions/gnu_ext_section_header_table.cmi gnu_extensions/gnu_ext_dynamic.cmi gnu_extensions/gnu_ext_symbol_versioning.cmi gnu_extensions/gnu_ext_program_header_table.cmi gnu_extensions/gnu_ext_section_to_segment_mapping.cmi gnu_extensions/gnu_ext_note.cmi abis/abis.cmi adaptors/sail_interface.cmi adaptors/harness_interface.cmi elf_memory_image.cmi elf_memory_image_of_elf64_file.cmi command_line.cmi input_list.cmi linkable_list.cmi linker_script.cmi link.cmi load.cmi elf64_file_of_elf_memory_image.cmi test_image.cmi "build_num/"
- cp META.num "build_num/"/META
- mkdir -p "build_num/"
- ocamlfind ocamlopt -c -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -package num -package lem -predicates nozarith uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The str subdirectory has been
- automatically added to the search path, but you should add -I +str to the
- command-line to silence this alert (e.g. by adding str to the list of
- libraries in your dune file, or adding use_str to your _tags file for
- ocamlbuild, or using -package str for ocamlfind).
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "_none_", line 1:
- Alert ocaml_deprecated_auto_include: 
- OCaml's lib directory layout changed in 5.0. The unix subdirectory has been
- automatically added to the search path, but you should add -I +unix to the
- command-line to silence this alert (e.g. by adding unix to the list of
- libraries in your dune file, or adding use_unix to your _tags file for
- ocamlbuild, or using -package unix for ocamlfind).
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlopt -a -o "build_num/linksem.cmxa" -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot uint64_wrapper.cmx uint32_wrapper.cmx show.cmx endianness.cmx error.cmx ml_bindings.cmx missing_pervasives.cmx multimap.cmx default_printing.cmx byte_sequence_wrapper.cmx byte_sequence_impl.cmx filesystem.cmx filesystem_wrapper.cmx byte_sequence.cmx byte_pattern.cmx byte_pattern_extra.cmx archive.cmx elf_types_native_uint.cmx hex_printing.cmx string_table.cmx auxv.cmx elf_header.cmx elf_symbol_table.cmx elf_program_header_table.cmx elf_section_header_table.cmx elf_relocation.cmx elf_interpreted_segment.cmx elf_interpreted_section.cmx elf_note.cmx elf_file.cmx elf_dynamic.cmx dwarf_ctypes.cmx dwarf.cmx ldconfig.cmx abis/abi_classes.cmx memory_image.cmx memory_image_orderings.cmx abis/abi_utilities.cmx gnu_extensions/gnu_ext_abi.cmx abis/power64/abi_power64.cmx abis/power64/abi_power64_elf_header.cmx abis/power64/abi_power64_section_header_table.cmx abis/power64/abi_power64_dynamic.cmx abis/aarch64/abi_aarch64_le_elf_header.cmx abis/aarch64/abi_aarch64_symbol_table.cmx abis/aarch64/abi_aarch64_section_header_table.cmx abis/aarch64/abi_aarch64_program_header_table.cmx abis/aarch64/abi_aarch64_le_serialisation.cmx abis/aarch64/abi_aarch64_relocation.cmx abis/aarch64/abi_aarch64_le.cmx abstract_linker_script.cmx abis/amd64/abi_amd64_elf_header.cmx abis/amd64/abi_amd64_serialisation.cmx abis/amd64/abi_amd64_relocation.cmx abis/amd64/abi_amd64_program_header_table.cmx abis/amd64/abi_amd64_section_header_table.cmx abis/amd64/abi_amd64_symbol_table.cmx abis/amd64/abi_amd64.cmx abis/mips64/abi_mips64_dynamic.cmx abis/mips64/abi_mips64_elf_header.cmx abis/mips64/abi_mips64_relocation.cmx abis/mips64/abi_mips64_serialisation.cmx abis/mips64/abi_mips64_program_header_table.cmx abis/mips64/abi_mips64_section_header_table.cmx abis/mips64/abi_mips64_symbol_table.cmx abis/mips64/abi_mips64.cmx abis/x86/abi_x86_relocation.cmx abis/power64/abi_power64_relocation.cmx abis/riscv/abi_riscv_elf_header.cmx abis/riscv/abi_riscv_program_header_table.cmx abis/riscv/abi_riscv_relocation.cmx abis/riscv/abi_riscv_section_header_table.cmx abis/riscv/abi_riscv_serialisation.cmx abis/riscv/abi_riscv_symbol_table.cmx abis/riscv/abi_riscv.cmx abis/cheri_mips64/abi_cheri_mips64_capability.cmx abis/cheri_mips64/abi_cheri_mips64_dynamic.cmx abis/cheri_mips64/abi_cheri_mips64_elf_header.cmx abis/cheri_mips64/abi_cheri_mips64_relocation.cmx abis/cheri_mips64/abi_cheri_mips64.cmx gnu_extensions/gnu_ext_types_native_uint.cmx gnu_extensions/gnu_ext_section_header_table.cmx gnu_extensions/gnu_ext_dynamic.cmx gnu_extensions/gnu_ext_symbol_versioning.cmx gnu_extensions/gnu_ext_program_header_table.cmx gnu_extensions/gnu_ext_section_to_segment_mapping.cmx gnu_extensions/gnu_ext_note.cmx abis/abis.cmx adaptors/sail_interface.cmx adaptors/harness_interface.cmx elf_memory_image.cmx elf_memory_image_of_elf64_file.cmx command_line.cmx input_list.cmx linkable_list.cmx linker_script.cmx link.cmx load.cmx elf64_file_of_elf_memory_image.cmx test_image.cmx
- mv uint64_wrapper.cmi uint32_wrapper.cmi show.cmi endianness.cmi error.cmi ml_bindings.cmi missing_pervasives.cmi multimap.cmi default_printing.cmi byte_sequence_wrapper.cmi byte_sequence_impl.cmi filesystem.cmi filesystem_wrapper.cmi byte_sequence.cmi byte_pattern.cmi byte_pattern_extra.cmi archive.cmi elf_types_native_uint.cmi hex_printing.cmi string_table.cmi auxv.cmi elf_header.cmi elf_symbol_table.cmi elf_program_header_table.cmi elf_section_header_table.cmi elf_relocation.cmi elf_interpreted_segment.cmi elf_interpreted_section.cmi elf_note.cmi elf_file.cmi elf_dynamic.cmi dwarf_ctypes.cmi dwarf.cmi ldconfig.cmi abis/abi_classes.cmi memory_image.cmi memory_image_orderings.cmi abis/abi_utilities.cmi gnu_extensions/gnu_ext_abi.cmi abis/power64/abi_power64.cmi abis/power64/abi_power64_elf_header.cmi abis/power64/abi_power64_section_header_table.cmi abis/power64/abi_power64_dynamic.cmi abis/aarch64/abi_aarch64_le_elf_header.cmi abis/aarch64/abi_aarch64_symbol_table.cmi abis/aarch64/abi_aarch64_section_header_table.cmi abis/aarch64/abi_aarch64_program_header_table.cmi abis/aarch64/abi_aarch64_le_serialisation.cmi abis/aarch64/abi_aarch64_relocation.cmi abis/aarch64/abi_aarch64_le.cmi abstract_linker_script.cmi abis/amd64/abi_amd64_elf_header.cmi abis/amd64/abi_amd64_serialisation.cmi abis/amd64/abi_amd64_relocation.cmi abis/amd64/abi_amd64_program_header_table.cmi abis/amd64/abi_amd64_section_header_table.cmi abis/amd64/abi_amd64_symbol_table.cmi abis/amd64/abi_amd64.cmi abis/mips64/abi_mips64_dynamic.cmi abis/mips64/abi_mips64_elf_header.cmi abis/mips64/abi_mips64_relocation.cmi abis/mips64/abi_mips64_serialisation.cmi abis/mips64/abi_mips64_program_header_table.cmi abis/mips64/abi_mips64_section_header_table.cmi abis/mips64/abi_mips64_symbol_table.cmi abis/mips64/abi_mips64.cmi abis/x86/abi_x86_relocation.cmi abis/power64/abi_power64_relocation.cmi abis/riscv/abi_riscv_elf_header.cmi abis/riscv/abi_riscv_program_header_table.cmi abis/riscv/abi_riscv_relocation.cmi abis/riscv/abi_riscv_section_header_table.cmi abis/riscv/abi_riscv_serialisation.cmi abis/riscv/abi_riscv_symbol_table.cmi abis/riscv/abi_riscv.cmi abis/cheri_mips64/abi_cheri_mips64_capability.cmi abis/cheri_mips64/abi_cheri_mips64_dynamic.cmi abis/cheri_mips64/abi_cheri_mips64_elf_header.cmi abis/cheri_mips64/abi_cheri_mips64_relocation.cmi abis/cheri_mips64/abi_cheri_mips64.cmi gnu_extensions/gnu_ext_types_native_uint.cmi gnu_extensions/gnu_ext_section_header_table.cmi gnu_extensions/gnu_ext_dynamic.cmi gnu_extensions/gnu_ext_symbol_versioning.cmi gnu_extensions/gnu_ext_program_header_table.cmi gnu_extensions/gnu_ext_section_to_segment_mapping.cmi gnu_extensions/gnu_ext_note.cmi abis/abis.cmi adaptors/sail_interface.cmi adaptors/harness_interface.cmi elf_memory_image.cmi elf_memory_image_of_elf64_file.cmi command_line.cmi input_list.cmi linkable_list.cmi linker_script.cmi link.cmi load.cmi elf64_file_of_elf_memory_image.cmi test_image.cmi "build_num/"
- mv uint64_wrapper.cmx uint32_wrapper.cmx show.cmx endianness.cmx error.cmx ml_bindings.cmx missing_pervasives.cmx multimap.cmx default_printing.cmx byte_sequence_wrapper.cmx byte_sequence_impl.cmx filesystem.cmx filesystem_wrapper.cmx byte_sequence.cmx byte_pattern.cmx byte_pattern_extra.cmx archive.cmx elf_types_native_uint.cmx hex_printing.cmx string_table.cmx auxv.cmx elf_header.cmx elf_symbol_table.cmx elf_program_header_table.cmx elf_section_header_table.cmx elf_relocation.cmx elf_interpreted_segment.cmx elf_interpreted_section.cmx elf_note.cmx elf_file.cmx elf_dynamic.cmx dwarf_ctypes.cmx dwarf.cmx ldconfig.cmx abis/abi_classes.cmx memory_image.cmx memory_image_orderings.cmx abis/abi_utilities.cmx gnu_extensions/gnu_ext_abi.cmx abis/power64/abi_power64.cmx abis/power64/abi_power64_elf_header.cmx abis/power64/abi_power64_section_header_table.cmx abis/power64/abi_power64_dynamic.cmx abis/aarch64/abi_aarch64_le_elf_header.cmx abis/aarch64/abi_aarch64_symbol_table.cmx abis/aarch64/abi_aarch64_section_header_table.cmx abis/aarch64/abi_aarch64_program_header_table.cmx abis/aarch64/abi_aarch64_le_serialisation.cmx abis/aarch64/abi_aarch64_relocation.cmx abis/aarch64/abi_aarch64_le.cmx abstract_linker_script.cmx abis/amd64/abi_amd64_elf_header.cmx abis/amd64/abi_amd64_serialisation.cmx abis/amd64/abi_amd64_relocation.cmx abis/amd64/abi_amd64_program_header_table.cmx abis/amd64/abi_amd64_section_header_table.cmx abis/amd64/abi_amd64_symbol_table.cmx abis/amd64/abi_amd64.cmx abis/mips64/abi_mips64_dynamic.cmx abis/mips64/abi_mips64_elf_header.cmx abis/mips64/abi_mips64_relocation.cmx abis/mips64/abi_mips64_serialisation.cmx abis/mips64/abi_mips64_program_header_table.cmx abis/mips64/abi_mips64_section_header_table.cmx abis/mips64/abi_mips64_symbol_table.cmx abis/mips64/abi_mips64.cmx abis/x86/abi_x86_relocation.cmx abis/power64/abi_power64_relocation.cmx abis/riscv/abi_riscv_elf_header.cmx abis/riscv/abi_riscv_program_header_table.cmx abis/riscv/abi_riscv_relocation.cmx abis/riscv/abi_riscv_section_header_table.cmx abis/riscv/abi_riscv_serialisation.cmx abis/riscv/abi_riscv_symbol_table.cmx abis/riscv/abi_riscv.cmx abis/cheri_mips64/abi_cheri_mips64_capability.cmx abis/cheri_mips64/abi_cheri_mips64_dynamic.cmx abis/cheri_mips64/abi_cheri_mips64_elf_header.cmx abis/cheri_mips64/abi_cheri_mips64_relocation.cmx abis/cheri_mips64/abi_cheri_mips64.cmx gnu_extensions/gnu_ext_types_native_uint.cmx gnu_extensions/gnu_ext_section_header_table.cmx gnu_extensions/gnu_ext_dynamic.cmx gnu_extensions/gnu_ext_symbol_versioning.cmx gnu_extensions/gnu_ext_program_header_table.cmx gnu_extensions/gnu_ext_section_to_segment_mapping.cmx gnu_extensions/gnu_ext_note.cmx abis/abis.cmx adaptors/sail_interface.cmx adaptors/harness_interface.cmx elf_memory_image.cmx elf_memory_image_of_elf64_file.cmx command_line.cmx input_list.cmx linkable_list.cmx linker_script.cmx link.cmx load.cmx elf64_file_of_elf_memory_image.cmx test_image.cmx "build_num/"
- mv uint64_wrapper.cmt uint32_wrapper.cmt show.cmt endianness.cmt error.cmt ml_bindings.cmt missing_pervasives.cmt multimap.cmt default_printing.cmt byte_sequence_wrapper.cmt byte_sequence_impl.cmt filesystem.cmt filesystem_wrapper.cmt byte_sequence.cmt byte_pattern.cmt byte_pattern_extra.cmt archive.cmt elf_types_native_uint.cmt hex_printing.cmt string_table.cmt auxv.cmt elf_header.cmt elf_symbol_table.cmt elf_program_header_table.cmt elf_section_header_table.cmt elf_relocation.cmt elf_interpreted_segment.cmt elf_interpreted_section.cmt elf_note.cmt elf_file.cmt elf_dynamic.cmt dwarf_ctypes.cmt dwarf.cmt ldconfig.cmt abis/abi_classes.cmt memory_image.cmt memory_image_orderings.cmt abis/abi_utilities.cmt gnu_extensions/gnu_ext_abi.cmt abis/power64/abi_power64.cmt abis/power64/abi_power64_elf_header.cmt abis/power64/abi_power64_section_header_table.cmt abis/power64/abi_power64_dynamic.cmt abis/aarch64/abi_aarch64_le_elf_header.cmt abis/aarch64/abi_aarch64_symbol_table.cmt abis/aarch64/abi_aarch64_section_header_table.cmt abis/aarch64/abi_aarch64_program_header_table.cmt abis/aarch64/abi_aarch64_le_serialisation.cmt abis/aarch64/abi_aarch64_relocation.cmt abis/aarch64/abi_aarch64_le.cmt abstract_linker_script.cmt abis/amd64/abi_amd64_elf_header.cmt abis/amd64/abi_amd64_serialisation.cmt abis/amd64/abi_amd64_relocation.cmt abis/amd64/abi_amd64_program_header_table.cmt abis/amd64/abi_amd64_section_header_table.cmt abis/amd64/abi_amd64_symbol_table.cmt abis/amd64/abi_amd64.cmt abis/mips64/abi_mips64_dynamic.cmt abis/mips64/abi_mips64_elf_header.cmt abis/mips64/abi_mips64_relocation.cmt abis/mips64/abi_mips64_serialisation.cmt abis/mips64/abi_mips64_program_header_table.cmt abis/mips64/abi_mips64_section_header_table.cmt abis/mips64/abi_mips64_symbol_table.cmt abis/mips64/abi_mips64.cmt abis/x86/abi_x86_relocation.cmt abis/power64/abi_power64_relocation.cmt abis/riscv/abi_riscv_elf_header.cmt abis/riscv/abi_riscv_program_header_table.cmt abis/riscv/abi_riscv_relocation.cmt abis/riscv/abi_riscv_section_header_table.cmt abis/riscv/abi_riscv_serialisation.cmt abis/riscv/abi_riscv_symbol_table.cmt abis/riscv/abi_riscv.cmt abis/cheri_mips64/abi_cheri_mips64_capability.cmt abis/cheri_mips64/abi_cheri_mips64_dynamic.cmt abis/cheri_mips64/abi_cheri_mips64_elf_header.cmt abis/cheri_mips64/abi_cheri_mips64_relocation.cmt abis/cheri_mips64/abi_cheri_mips64.cmt gnu_extensions/gnu_ext_types_native_uint.cmt gnu_extensions/gnu_ext_section_header_table.cmt gnu_extensions/gnu_ext_dynamic.cmt gnu_extensions/gnu_ext_symbol_versioning.cmt gnu_extensions/gnu_ext_program_header_table.cmt gnu_extensions/gnu_ext_section_to_segment_mapping.cmt gnu_extensions/gnu_ext_note.cmt abis/abis.cmt adaptors/sail_interface.cmt adaptors/harness_interface.cmt elf_memory_image.cmt elf_memory_image_of_elf64_file.cmt command_line.cmt input_list.cmt linkable_list.cmt linker_script.cmt link.cmt load.cmt elf64_file_of_elf_memory_image.cmt test_image.cmt "build_num/"
- cp META.num "build_num/"/META
- ocamlfind ocamlc -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "main_elf" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "main_elf.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlopt -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "main_elf.opt" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml \
- abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml \
- elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "main_elf.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlc -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "main_link" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "main_link.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlopt -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "main_link.opt" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml \
- abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml \
- elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "main_link.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlc -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "copy_elf" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "copy_elf.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- ocamlfind ocamlopt -g -I adaptors -I abis -I abis/amd64 -I abis/power64 -I abis/aarch64 -I abis/x86 -I abis/mips64 -I abis/riscv -I abis/cheri_mips64 -I gnu_extensions -bin-annot -o "copy_elf.opt" -g \
- -package num -package lem -package unix -package str \
- uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
- byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml \
- abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml \
- elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml \
- "copy_elf.ml" \
- -linkpkg
- File "missing_pervasives.ml", lines 268-271, characters 48-2:
- 268 | ................................................((match (alist, blist, clist) with
- 269 |   | ([], [], []) -> []
- 270 |   | (x :: morex, y :: morey, z :: morez) -> let more_xyz = (zip3 morex morey morez) in (x, y, z) :: more_xyz
- 271 | ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], [], _::_)
- File "missing_pervasives.ml", line 494, characters 16-27:
- 494 |             let mapped_list = (f item)
-                       ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable mapped_list.
- File "archive.ml", line 29, characters 8-19:
- 29 |    (let magic_bytes = ([Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 96))) (* 0x60 *); Char.chr (Nat_big_num.to_int ( (Nat_big_num.of_int 10))) (* 0x0a *)]) in
-              ^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable magic_bytes.
- File "hex_printing.ml", lines 50-68, characters 3-4:
- 50 | ...((match xs with
- 51 |     | []       -> ""
- 52 |     | x::y::xs ->
- 53 |       let sx = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint x)) in
- 54 |       let sy = (unsafe_hex_string_of_natural 2 (Uint32_wrapper.to_bigint y)) in
- ...
- 65 |           "0" ^ sy)
- 66 |       in
- 67 |         sx ^ (" " ^ (sy ^ (" " ^ unsafe_hex_string_of_uc_list xs)))
- 68 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::[]
- File "elf_file.ml", line 151, characters 10-18:
- 151 |       let segs_zip  = (Lem_list.list_combine ef.elf64_file_program_header_table ef.elf64_file_interpreted_segments) in
-                 ^^^^^^^^
- Warning 26 [unused-var]: unused variable segs_zip.
- File "elf_file.ml", line 608, characters 6-10:
- 608 |   let segs = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 627, characters 6-10:
- 627 |   let segs = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 685, characters 6-10:
- 685 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 707, characters 8-11:
- 707 |    (let hdr     = (f3.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 709, characters 6-10:
- 709 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 732, characters 8-11:
- 732 |    (let hdr     = (ef.elf32_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 733, characters 6-9:
- 733 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 746, characters 8-11:
- 746 |    (let hdr     = (ef.elf64_file_header) in
-               ^^^
- Warning 26 [unused-var]: unused variable hdr.
- File "elf_file.ml", line 747, characters 6-9:
- 747 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 762, characters 6-10:
- 762 |   let segs    = (f3.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 785, characters 6-10:
- 785 |   let segs    = (f3.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 809, characters 6-10:
- 809 |   let segs    = (ef.elf32_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 832, characters 6-10:
- 832 |   let segs    = (ef.elf64_file_interpreted_segments) in
-             ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 855, characters 6-9:
- 855 |   let sht     = (ef.elf32_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 871, characters 6-9:
- 871 |   let sht     = (ef.elf64_file_section_header_table) in
-             ^^^
- Warning 26 [unused-var]: unused variable sht.
- File "elf_file.ml", line 997, characters 8-12:
- 997 |     let segs   = (f3.elf32_file_interpreted_segments) in bind (bytes_of_elf32_file f3) (fun bs0 -> bind (get_elf32_file_symbol_table f3) (fun symtab -> bind (get_elf32_file_symbol_string_table f3) (fun strtab -> bind (Elf_symbol_table.get_elf32_symbol_image_address symtab strtab) (fun strs ->
-               ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "elf_file.ml", line 1030, characters 8-12:
- 1030 |     let segs   = (f3.elf64_file_interpreted_segments) in bind (bytes_of_elf64_file f3) (fun bs0 -> bind (get_elf64_file_symbol_table f3) (fun (symtab,strtab) -> bind (
-                ^^^^
- Warning 26 [unused-var]: unused variable segs.
- File "dwarf.ml", lines 1531-1534, characters 6-9:
- 1531 | ......((match xs with
- 1532 |            x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1)))
- 1533 |                        xs'
- 1534 |        )).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "dwarf.ml", lines 4548-4552, characters 3-4:
- 4548 | ...((match (xs,lens) with
- 4549 |   | ([],[]) -> []
- 4550 |   | ([x],[len]) -> [x]
- 4551 |   | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x ::  pad_row xs' lens'
- 4552 |   ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ([], _::_)
- File "dwarf.ml", lines 5217-5221, characters 3-4:
- 5217 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with
- 5218 |   | (_, Some (AV_addr n)) -> Some n
- 5219 |   | (Some (AV_addr n), _) -> Some n    
- 5220 |   | (None,None) -> None
- 5221 |   )).......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some
-    (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-    AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-    AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _),
- Some
-   (AV_block (_, _)|AV_constantN (_, _)|AV_constant_SLEB128 _|
-   AV_constant_ULEB128 _|AV_exprloc (_, _)|AV_flag _|AV_ref _|AV_ref_addr _|
-   AV_ref_sig8 _|AV_sec_offset _|AV_string _|AV_strp _))
- File "dwarf.ml", lines 5269-5278, characters 2-3:
- 5269 | ..(match find_attribute_value "DW_AT_location" die1 with
- 5270 |   | Some (AV_exprloc( n, bs)) -> location bs
- 5271 |   | Some (AV_block( n, bs)) -> location bs
- 5272 |   (* while for a location list, we take the associated pc range from
- 5273 |   each element of the list *)
- 5274 |   | Some (AV_sec_offset n) ->
- 5275 |       let (_,llis) = (find_location_list dloc n) in
- 5276 |       Some (interpret_location_list base_address1 llis)
- 5277 |   | None -> None
- 5278 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (AV_addr _|AV_constantN (_, _)|AV_constant_SLEB128 _|AV_constant_ULEB128 _|
-   AV_flag _|AV_ref _|AV_ref_addr _|AV_ref_sig8 _|AV_string _|AV_strp _)
- File "dwarf.ml", line 2592, characters 8-11:
- 2592 |    (let ppd ()=  (pp_pos die1.die_offset) (*pp_die c cuh str true 0 false die ^ "\n"*) in
-                ^^^
- Warning 26 [unused-var]: unused variable ppd.
- File "dwarf.ml", line 2631, characters 12-62:
- 2631 |      | Some (((cu_spec,parents_spec,die_spec) as cupdie_spec)) -> 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie_spec.
- File "dwarf.ml", line 2824, characters 6-12:
- 2824 |   let offset = (pp_pos die1.die_offset) in 
-              ^^^^^^
- Warning 26 [unused-var]: unused variable offset.
- File "dwarf.ml", line 3893, characters 12-42:
- 3893 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3898, characters 13-43:
- 3898 | let pp_ud (((((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry), (line:int), (subprogram_name:string)) : unpacked_decl) : string= 
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 3906, characters 18-48:
- 3906 | let pp_ufe_brief (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= 
-                          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ufe.
- File "dwarf.ml", line 4713, characters 6-20:
- 4713 |   let final_location = (Nat_big_num.add fde1.fde_initial_location_address fde1.fde_address_range) in
-              ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable final_location.
- File "dwarf.ml", line 4889, characters 15-22:
- 4889 |            let cupdie' = (cu,(die1::parents),die') in
-                       ^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 4890, characters 15-21:
- 4890 |            let mname' = (find_name_of_die d.d_str die') in
-                       ^^^^^^
- Warning 26 [unused-var]: unused variable mname'.
- File "dwarf.ml", line 4906, characters 7-9:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-               ^^
- Warning 26 [unused-var]: unused variable cu.
- File "dwarf.ml", line 4906, characters 10-17:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                  ^^^^^^^
- Warning 26 [unused-var]: unused variable parents.
- File "dwarf.ml", line 4906, characters 18-22:
- 4906 |   let (cu,parents,die1) = cupdie1 in
-                          ^^^^
- Warning 26 [unused-var]: unused variable die1.
- File "dwarf.ml", line 4919, characters 117-168:
- 4919 |      CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,mdata_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),mdata_member_location))members)) mmembers)))
-                                                                                                                             ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable am.
- File "dwarf.ml", line 5372, characters 14-82:
- 5372 |            | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] ->
-                      ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x'.
- File "dwarf.ml", line 5390, characters 12-67:
- 5390 |        (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) ->
-                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable x.
- File "dwarf.ml", line 6042, characters 13-47:
- 6042 |       | Some (((cu',parents',die') as cupdie')) ->
-                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6084, characters 17-51:
- 6084 |           | Some (((cu',parents',die') as cupdie')) ->
-                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable cupdie'.
- File "dwarf.ml", line 6103, characters 8-9:
- 6103 |     let c = (p_context_of_d d) in
-                ^
- Warning 26 [unused-var]: unused variable c.
- File "dwarf.ml", line 6395, characters 15-49:
- 6395 |        | Some (((ufe,line,subprogram_name) as ud):unpacked_decl) ->
-                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable ud.
- File "memory_image_orderings.ml", line 56, characters 8-27:
- 56 |       | (ElfSegment(x1), _) -> (-1)
-              ^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "memory_image_orderings.ml", line 114, characters 10-28:
- 114 |         | (AbiFeature(_), _) -> (-1)
-                 ^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "gnu_extensions/gnu_ext_abi.ml", lines 43-50, characters 33-18:
- 43 | .................................((match unmod.elf64_ident with
- 44 |                 i0 :: i1 :: i2 :: i3  :: i4  :: i5  :: i6  ::
- 45 |                 _  :: _  :: i9 :: i10 :: i11 :: i12 :: i13 :: i14 :: i15 :: []
- 46 |                     -> [i0; i1; i2; i3; i4; i5; i6;
- 47 |                         Uint32_wrapper.of_bigint elf_osabi_gnu;
- 48 |                         Uint32_wrapper.of_bigint( (Nat_big_num.of_int 1));
- 49 |                         i9; i10; i11; i12; i13; i14; i15]
- 50 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- _::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_::_
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 322-344, characters 2-3:
- 322 | ..(match maybe_dt_versym with
- 323 |     | Some (_, Address dt_versym) ->
- 324 |       let dt_versym = (Ml_bindings.nat_big_num_of_uint64 dt_versym) in
- 325 |       let maybe_versym_scn = (Lem_list.list_find_opt (fun scn -> Nat_big_num.equal
- 326 |         scn.elf64_section_addr dt_versym
- ...
- 341 |       return (Some versyms)))
- 342 |     | None ->
- 343 |       return None
- 344 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 352-355, characters 146-7:
- 352 | ..................................................................................................................................................(match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- 354 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verdef_table: DT_VERDEF is defined, but DT_VERDEFNUM isn't"
- 355 |       ).....................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 349-386, characters 2-3:
- 349 | ..(match maybe_dt_verdef with
- 350 |     | Some (_, Address dt_verdef) ->
- 351 |       let dt_verdef = (Ml_bindings.nat_big_num_of_uint64 dt_verdef) in
- 352 |       let maybe_dt_verdefnum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verdefnum) dyns) in bind (match maybe_dt_verdefnum with
- 353 |         | Some (_, Numeric dt_verdefnum) -> return dt_verdefnum
- ...
- 383 |       return (Some verdef_table))))))
- 384 |     | None ->
- 385 |       return None
- 386 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 394-397, characters 148-7:
- 394 | ....................................................................................................................................................(match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- 396 |         | None -> Error.fail "obtain_gnu_ext_elf64_interpreted_verneed_table: DT_VERNEED is defined, but DT_VERNEEDNUM isn't"
- 397 |       )......................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "gnu_extensions/gnu_ext_symbol_versioning.ml", lines 391-427, characters 2-3:
- 391 | ..(match maybe_dt_verneed with
- 392 |     | Some (_, Address dt_verneed) ->
- 393 |       let dt_verneed = (Ml_bindings.nat_big_num_of_uint64 dt_verneed) in
- 394 |       let maybe_dt_verneednum = (Lem_list.list_find_opt (fun (tag, _) -> Nat_big_num.equal tag Gnu_ext_dynamic.elf_dt_gnu_verneednum) dyns) in bind (match maybe_dt_verneednum with
- 395 |         | Some (_, Numeric dt_verneednum) -> return dt_verneednum
- ...
- 424 |       return (Some vernaux_table))))))
- 425 |     | None ->
- 426 |       return None
- 427 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "abis/abis.ml", lines 596-605, characters 12-13:
- 596 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 597 |                 (None, _) -> None
- 598 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 599 |                     if amd64_reloc_needs_got_slot symref rr maybe_def then
- 600 |                         (*let _ = errln ("Saw a via-GOT symbol reference: to `" ^ symref.ref.ref_symname ^ "' coming from linkable " ^ (show i) ^ " (" ^
- 601 |                             fname ^ "), logically from section " ^ (show rr.ref_src_scn)) in *)
- 602 |                         Some (symref.ref.ref_symname, maybe_def)
- 603 |                     else None
- 604 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 605 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", lines 662-680, characters 12-13:
- 662 | ............(match (symref.maybe_reloc, symref.maybe_def_bound_to) with
- 663 |                 (None, _) -> None
- 664 |                 | (Some rr, Some(ApplyReloc, maybe_def)) ->
- 665 |                     if amd64_reloc_needs_plt_slot symref rr maybe_def ref_is_statically_linked
- 666 |                     then
- ...
- 677 |                         Some(symref.ref.ref_symname, maybe_def)
- 678 |                     else None
- 679 |                 | (Some rr, Some(makePIC0, maybe_def)) -> failwith "FIXME: PIC support please"
- 680 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, None)
- File "abis/abis.ml", line 574, characters 9-15:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                ^^^^^^
- Warning 26 [unused-var]: unused variable fnames.
- File "abis/abis.ml", line 574, characters 17-27:
- 574 |     let (fnames, input_imgs) = (List.split input_fnames_and_imgs)
-                        ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable input_imgs.
- File "abis/abis.ml", line 932, characters 35-38:
- 932 |                ;    length1 = (let len = (Nat_big_num.mul( (Nat_big_num.of_int 16)) total_n_plt_entries) in
-                                          ^^^
- Warning 26 [unused-var]: unused variable len.
- File "abis/abis.ml", line 1213, characters 24-32:
- 1213 |                     let got_addr = ((match got_el.startpos with Some addr -> addr | None -> failwith "GOT has no addr at reloc time" ))
-                                ^^^^^^^^
- Warning 26 [unused-var]: unused variable got_addr.
- File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35:
- 198 |                 let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with
-                           ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable reloc_as_triple.
- File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41:
- 209 |                 let retrieved_reloc_sites = (Multimap.lookupBy0 
-                           ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable retrieved_reloc_sites.
- File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42:
- 233 |                 let all_annotations_length = (List.length all_annotations_list)
-                           ^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable all_annotations_length.
- File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102:
- 382 |                  * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size)
-                                                                                        ^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable range_len_matches_sec.
- File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43:
- 384 |                 let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1))
-                           ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable sec_matches_element_len.
- File "command_line.ml", lines 181-204, characters 19-19:
- 181 | ...................(state1 :: more) s:(command_state)list= 
- 182 |      (let chars = (Xstring.explode s) 
- 183 |     in
- 184 |     let spec = ((match chars with 
- 185 |         '-' :: 'l' :: more -> Libname(Xstring.implode more)
- ...
- 201 |          ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in 
- 202 |             (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) 
- 203 |             ))
- 204 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 207-215, characters 16-19:
- 207 | ................(state1 :: more):(command_state)list=  ({
- 208 |            input_units = (state1.input_units)
- 209 |          ; link_options = (state1.link_options)
- 210 |          ; current_input_options = (state1.current_input_options)
- 211 |          ; current_group = ((match state1.current_group with
- 212 |                 None -> Some []
- 213 |                 | _ -> failwith "cannot nest groups"
- 214 |             ))
- 215 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "command_line.ml", lines 218-226, characters 14-19:
- 218 | ..............(state1 :: more):(command_state)list=  ({
- 219 |            input_units =  (List.rev_append (List.rev state1.input_units) ((match state1.current_group with 
- 220 |                 Some l -> [Group(l)]
- 221 |                 | None -> failwith "end group without start group"
- 222 |             )))
- 223 |          ; link_options = (state1.link_options)
- 224 |          ; current_input_options = (state1.current_input_options)
- 225 |          ; current_group = None
- 226 |          } :: more)
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- []
- File "input_list.ml", line 269, characters 9-10:
- 269 |        | _ -> failwith "impossible expanded input item"
-                ^
- Warning 11 [redundant-case]: this match case is unused.
- File "input_list.ml", lines 277-313, characters 12-13:
- 277 | ............(match input with 
- 278 |                 File(spec, options)
- 279 |                     -> (match spec with
- 280 |                         Filename(str)
- 281 |                             -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs 
- ...
- 310 |                         )))) group_with_file_lists)
- 311 |                     in
- 312 |                     elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add))
- 313 |             )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- BuiltinControlScript
- File "input_list.ml", line 224, characters 42-47:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                 ^^^^^
- Warning 26 [unused-var]: unused variable names.
- File "input_list.ml", line 224, characters 49-53:
- 224 |                                 else let (names, seqs) = (List.split not_elf) in 
-                                                        ^^^^
- Warning 26 [unused-var]: unused variable seqs.
- File "linkable_list.ml", lines 83-93, characters 13-10:
- 83 | .............((match it with
- 84 |         (fname1, Reloc(seq), origin) ->
- 85 |             let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e ->
- 86 |             return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts))
- 87 |         | (fname1, Shared(seq), origin) ->
- ...
- 90 |         | (fname1, Script(seq), origin) ->
- 91 |             (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*)
- 92 |             fail "unsupported input item"
- 93 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (_, ControlScript, _)
- File "linkable_list.ml", line 298, characters 8-14:
- 298 |     let refstr = ("`"
-               ^^^^^^
- Warning 26 [unused-var]: unused variable refstr.
- File "linkable_list.ml", line 390, characters 8-23:
- 390 |     let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) 
-               ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable und_ref_triples.
- File "linker_script.ml", lines 327-343, characters 147-5:
- 327 | ...................................................................................................................................................(match comp_el with
- 328 |           IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) ->
- 329 |                 let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr)
- 330 |                 in
- 331 |                 (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^
- ...
- 340 |                 ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size),  List.rev_append (List.rev addr_list) [aligned_next_free])
- 341 |         (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*)
- 342 |         | ProvideSymbol(pol, name1, spec) -> (next_free_addr,  List.rev_append (List.rev addr_list) [next_free_addr])
- 343 |     )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", lines 380-389, characters 40-6:
- 380 | ........................................((match name1 with
- 381 |       "ldata-segment" -> (match user_data_segment_start with
- 382 |         None -> default
- 383 |         | Some addr -> (* fun _ -> *) addr
- 384 |         )
- 385 |     | "text-segment" -> (match user_text_segment_start with
- 386 |         None -> default
- 387 |         | Some addr -> (* fun _ -> *) addr
- 388 |         )
- 389 |     ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- ""
- File "linker_script.ml", line 970, characters 10-18:
- 970 |         | OnlyIfRo ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", line 978, characters 10-18:
- 978 |         | OnlyIfRw ->
-                 ^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1298-1306, characters 12-13:
- 1298 | ............(match (acc_ynm, new_ynm) with
- 1299 |                 (None, None) -> None
- 1300 |                 | (None, Some x) -> Some x
- 1301 |                 | (Some x, None) -> Some x
- 1302 |                 | (Some true, Some false) -> Some true
- 1303 |                 | (Some true, Some true) -> Some true
- 1304 |                 | (Some false, Some false) -> Some false
- 1305 |                 | (Some true, Some false) -> Some true
- 1306 |             )............
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1305, characters 18-41:
- 1305 |                 | (Some true, Some false) -> Some true
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1312-1320, characters 12-13:
- 1312 | ............(match (acc_ynm, new_ynm) with
- 1313 |                 (None, None) -> None
- 1314 |                 | (None, Some x) -> Some x
- 1315 |                 | (Some x, None) -> Some x
- 1316 |                 | (Some true, Some false) -> Some false
- 1317 |                 | (Some true, Some true) -> Some true
- 1318 |                 | (Some false, Some false) -> Some false
- 1319 |                 | (Some true, Some false) -> Some false
- 1320 |             )............................................................................................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some false, Some true)
- File "linker_script.ml", line 1319, characters 18-41:
- 1319 |                 | (Some true, Some false) -> Some false
-                          ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 1562-1777, characters 40-45:
- 1562 | ........................................(match tag with
- 1563 |                                             (* If it's a section, we discard it.
- 1564 |                                              * We will add a new section record at the end. (FIXME)  *)
- 1565 |                                             | FileFeature(ElfSection(idx1, isec1)) -> None
- 1566 |                                             (* If it's a symbol def, we propagate it.
- ...
- 1774 |                                                          }
- 1775 |                                                     ))
- 1776 |                                                 ) (* match maybe_reloc *)
- 1777 |                                             )................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _)
- File "linker_script.ml", lines 1409-1849, characters 54-18:
- 1409 | ......................................................((match comp_el with
- 1410 |                     | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) ->
- 1411 |                         (* We want to get the input section as a byte pattern *)
- 1412 |                         (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string
- 1413 |                             ^ "' from file `" ^ irec.fname
- ...
- 1846 |                             SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx)
- 1847 |                             )])
- 1848 |                         )
- 1849 |                 ))........................
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Hole _
- File "linker_script.ml", line 2448, characters 10-11:
- 2448 |         | _ -> acc
-                  ^
- Warning 11 [redundant-case]: this match case is unused.
- File "linker_script.ml", lines 2483-2505, characters 55-10:
- 2483 | .......................................................((match input with
- 2484 |             InputSection(irec) ->
- 2485 |                 (* HACK: simulates GNU linker, but this logic ought to go elsewhere *)
- 2486 |                 if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None
- 2487 |                 else
- ...
- 2502 |                      && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags)
- 2503 |                         then place_after_data
- 2504 |                 else place_after_text
- 2505 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Common (_, _, _, {def_syment=_; _ })
- File "linker_script.ml", lines 2650-2663, characters 46-18:
- 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with
- 2651 |                     | (_, [], None) -> (*let _ = errln "no" in *)
- 2652 |                         (((iref_idx, iref, iref_item), maybe_idef), None)
- 2653 |                     | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*)
- 2654 |                         (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def))
- ...
- 2660 |                         (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def))
- 2661 |                     | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*)
- 2662 |                         failwith "ambiguous symbol binding in linker control script"
- 2663 |                 ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- (Some _, [], Some _)
- File "linker_script.ml", line 1085, characters 24-43:
- 1085 |                     let acc_with_output_sec = (flush_output_sec cur_output_sec)
-                                ^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable acc_with_output_sec.
- File "linker_script.ml", line 1403, characters 20-29:
- 1403 |                 let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> (
-                            ^^^^^^^^^
- Warning 26 [unused-var]: unused variable make_line.
- File "linker_script.ml", line 1506, characters 40-60:
- 1506 |                                     let included_global_defs = (let x2 = 
-                                                ^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable included_global_defs.
- File "linker_script.ml", line 1908, characters 21-38:
- 1908 |                 (let section_tags_bare = (List.filter (fun (maybe_range, tag) ->
-                             ^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable section_tags_bare.
- File "linker_script.ml", line 2143, characters 44-49:
- 2143 |                                         let size2 = (Nat_big_num.sub_nat end_addr start_addr)
-                                                    ^^^^^
- Warning 26 [unused-var]: unused variable size2.
- File "linker_script.ml", line 2170, characters 24-38:
- 2170 |                     let endpos_option2 = (data_segment_endpos option2)
-                                ^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable endpos_option2.
- File "linker_script.ml", line 2208, characters 24-47:
- 2208 |                     let count_sections_in_image = (fun img2 -> (
-                                ^^^^^^^^^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable count_sections_in_image.
- File "linker_script.ml", line 2480, characters 13-28:
- 2480 |          let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in
-                     ^^^^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable place_after_rel.
- File "linker_script.ml", line 2707, characters 8-20:
- 2707 |     let discard_line = (fun i -> ((match i with
-                ^^^^^^^^^^^^
- Warning 26 [unused-var]: unused variable discard_line.
- File "link.ml", lines 326-330, characters 8-9:
- 326 | ........(match range_tag1 with
- 327 |             FileFeature(ElfSection(idx1, isec1)) ->
- 328 |                 if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *)
- 329 |                 then Some (el_name, range_tag1) else None
- 330 |         )
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- FileFeature
-   (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|
-   ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ }))
- File "link.ml", lines 645-673, characters 42-30:
- 645 | ..........................................((match x.maybe_def_bound_to with
- 646 |                                 Some(ApplyReloc, Some(bound_def)) ->
- 647 |                                     (* Here we are mapping
- 648 |                                      * *from* the definition found in an input object during resolution (bound_def)
- 649 |                                      * *to* the corresponding symbol in the output image, now that we've built it.
- ...
- 670 |                                 | Some(LeaveReloc, _) ->
- 671 |                                     (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *)
- 672 |                                     failwith "internal error: applying reloc that is not to be applied"
- 673 |                             ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some (ChangeRelocTo _, _)
- File "link.ml", lines 990-993, characters 8-10:
- 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with
- 991 |             None -> a.guess_entry_point output_image
- 992 |             | Some(Command_line.EntryAddress(x)) -> Some x
- 993 |         ))
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _|
-   ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _|
-   LdataSegmentStart _)
- File "load.ml", lines 278-292, characters 2-3:
- 278 | ..(match maybe_pltgot_offset with
- 279 |     | Some (_, Address pltgot_offset) ->
- 280 |       let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in
- 281 |       let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in
- 282 |       (* The second entry contains a linker-specific value. FreeBSD's rtld-elf
- ...
- 289 |     | None ->
- 290 |       let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in
- 291 |       img2
- 292 |   ).
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 371-374, characters 19-4:
- 371 | ...................((match maybe_got_offset with
- 372 |     | Some (_, Address got) -> got
- 373 |     | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic"
- 374 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 382-402, characters 31-4:
- 382 | ...............................((match maybe_local_gotno with
- 383 |     | Some (_, Numeric local_gotno) ->
- 384 |       (* The first entry is reserved to hold the address of the entry point in
- 385 |          the dynamic linker to call when lazy resolving text symbols. The second
- 386 |          entry is reserved by DSOs linked with GNU's ld to hold the base address
- ...
- 399 |     | None ->
- 400 |       let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in
- 401 |       (img2, got_addr)
- 402 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 408-411, characters 20-4:
- 408 | ....................((match maybe_symtab_addr with
- 409 |     | Some (_, Address symtab_addr) -> symtab_addr
- 410 |     | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic"
- 411 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 415-418, characters 15-4:
- 415 | ...............((match maybe_gotsym with
- 416 |     | Some (_, Numeric gotsym) -> gotsym
- 417 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic"
- 418 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 422-425, characters 17-4:
- 422 | .................((match maybe_symtabno with
- 423 |     | Some (_, Numeric symtabno) -> symtabno
- 424 |     | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic"
- 425 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 435-438, characters 24-4:
- 435 | ........................((match maybe_cap_relocs with
- 436 |     | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr
- 437 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic"
- 438 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _|
-   Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _))
- File "load.ml", lines 442-445, characters 21-4:
- 442 | .....................((match maybe_cap_relocssz with
- 443 |     | Some (_, Numeric cap_relocssz) -> cap_relocssz
- 444 |     | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic"
- 445 |   ))...
- Warning 8 [partial-match]: this pattern-matching is not exhaustive.
- Here is an example of a case that is not matched:
- Some
-   (_,
-   (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _|
-   Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _))
- File "load.ml", line 524, characters 8-18:
- 524 |    (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple ->
-               ^^^^^^^^^^
- Warning 26 [unused-var]: unused variable symtab_scn.
- File "load.ml", line 528, characters 8-17:
- 528 |     let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in
-               ^^^^^^^^^
- Warning 26 [unused-var]: unused variable sym_value.
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8/src'
-> compiled  linksem.0.8
Processing 24/24: [linksem: make install]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8)
- make -C src install
- make[1]: Entering directory '/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8/src'
- OCAMLPATH is 
- lem.mk:13: MAKECMDGOALS is install
- CAML_LD_LIBRARY_PATH=/home/opam/.opam/5.0/lib/stublibs:/home/opam/.opam/5.0/lib/ocaml/stublibs:/home/opam/.opam/5.0/lib/ocaml
- OCAML_TOPLEVEL_PATH=/home/opam/.opam/5.0/lib/toplevel
- fatal: not a git repository (or any parent up to mount point /)
- Stopping at filesystem boundary (GIT_DISCOVERY_ACROSS_FILESYSTEM not set).
- Makefile:11: warning: overriding recipe for target 'clean'
- no_ocamlbuild.mk:116: warning: ignoring old recipe for target 'clean'
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib linksem
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/linksem/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "0.8" linksem META
- Installed /home/opam/.opam/5.0/lib/linksem/META
- touch /home/opam/.opam/5.0/lib/linksem/META
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib linksem_zarith
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/linksem_zarith/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "0.8" linksem_zarith \
-   build_zarith/META \
-   build_zarith/linksem.cma build_zarith/linksem.cmxa \
-   build_zarith/linksem.a\
-   build_zarith/*.cmi \
-   build_zarith/*.cmx \
-   build_zarith/*.cmt \
-   uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
-   byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml \
-   abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml \
-   elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/test_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf64_file_of_elf_memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/load.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/link.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linker_script.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linkable_list.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/input_list.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/command_line.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image_of_elf64_file.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/harness_interface.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/sail_interface.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abis.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_note.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_symbol_versioning.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_types_native_uint.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_capability.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_x86_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abstract_linker_script.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_abi.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_utilities.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image_orderings.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_classes.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ldconfig.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf_ctypes.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_file.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_note.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_section.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_segment.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/auxv.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/string_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/hex_printing.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_types_native_uint.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/archive.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern_extra.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_impl.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/default_printing.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/multimap.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/missing_pervasives.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ml_bindings.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/error.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/endianness.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/show.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint32_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint64_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint64_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint32_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/test_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/string_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/show.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/sail_interface.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/multimap.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ml_bindings.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/missing_pervasives.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image_orderings.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/load.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linker_script.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linkable_list.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/link.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ldconfig.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/input_list.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/hex_printing.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/harness_interface.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_types_native_uint.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_symbol_versioning.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_note.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_abi.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/error.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/endianness.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_types_native_uint.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_note.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_segment.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_section.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_file.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf_ctypes.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/default_printing.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/command_line.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_impl.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern_extra.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/auxv.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/archive.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abstract_linker_script.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abis.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_x86_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_utilities.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_classes.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_capability.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint64_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint32_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/test_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/string_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/show.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/sail_interface.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/multimap.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ml_bindings.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/missing_pervasives.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image_orderings.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/load.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linker_script.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linkable_list.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/link.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ldconfig.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/input_list.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/hex_printing.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/harness_interface.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_types_native_uint.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_symbol_versioning.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_note.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_abi.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/error.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/endianness.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_types_native_uint.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_note.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_segment.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_section.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_file.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf_ctypes.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/default_printing.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/command_line.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_impl.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern_extra.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/auxv.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/archive.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abstract_linker_script.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abis.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_x86_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_utilities.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_classes.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_capability.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint64_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/uint32_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/test_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/string_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/show.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/sail_interface.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/multimap.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ml_bindings.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/missing_pervasives.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image_orderings.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/load.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linker_script.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linkable_list.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/link.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/ldconfig.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/input_list.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/hex_printing.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/harness_interface.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_types_native_uint.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_symbol_versioning.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_note.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/gnu_ext_abi.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/filesystem.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/error.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/endianness.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_types_native_uint.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_note.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_segment.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_interpreted_section.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_file.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf_ctypes.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/dwarf.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/default_printing.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/command_line.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence_impl.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_sequence.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern_extra.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/byte_pattern.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/auxv.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/archive.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abstract_linker_script.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abis.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_x86_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_utilities.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_riscv.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_power64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_mips64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_classes.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64_capability.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_cheri_mips64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_amd64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/abi_aarch64_le.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linksem.a
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linksem.cmxa
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/linksem.cma
- Installed /home/opam/.opam/5.0/lib/linksem_zarith/META
- touch /home/opam/.opam/5.0/lib/linksem_zarith/META
- ocamlfind remove -destdir /home/opam/.opam/5.0/lib linksem_num
- ocamlfind: [WARNING] No such file: /home/opam/.opam/5.0/lib/linksem_num/META
- ocamlfind install -destdir /home/opam/.opam/5.0/lib -patch-version "0.8" linksem_num \
-   build_num/META \
-   build_num/linksem.cma build_num/linksem.cmxa \
-   build_num/linksem.a\
-   build_num/*.cmi \
-   build_num/*.cmx \
-   build_num/*.cmt \
-   uint64_wrapper.ml uint32_wrapper.ml show.ml endianness.ml error.ml ml_bindings.ml missing_pervasives.ml multimap.ml default_printing.ml byte_sequence_wrapper.ml byte_sequence_impl.ml filesystem.ml filesystem_wrapper.ml \
-   byte_sequence.ml byte_pattern.ml byte_pattern_extra.ml archive.ml elf_types_native_uint.ml hex_printing.ml string_table.ml auxv.ml elf_header.ml elf_symbol_table.ml elf_program_header_table.ml elf_section_header_table.ml elf_relocation.ml elf_interpreted_segment.ml elf_interpreted_section.ml elf_note.ml elf_file.ml elf_dynamic.ml dwarf_ctypes.ml dwarf.ml ldconfig.ml \
-   abis/abi_classes.ml memory_image.ml memory_image_orderings.ml abis/abi_utilities.ml gnu_extensions/gnu_ext_abi.ml abis/power64/abi_power64.ml abis/power64/abi_power64_elf_header.ml abis/power64/abi_power64_section_header_table.ml abis/power64/abi_power64_dynamic.ml abis/aarch64/abi_aarch64_le_elf_header.ml abis/aarch64/abi_aarch64_symbol_table.ml abis/aarch64/abi_aarch64_section_header_table.ml abis/aarch64/abi_aarch64_program_header_table.ml abis/aarch64/abi_aarch64_le_serialisation.ml abis/aarch64/abi_aarch64_relocation.ml abis/aarch64/abi_aarch64_le.ml abstract_linker_script.ml abis/amd64/abi_amd64_elf_header.ml abis/amd64/abi_amd64_serialisation.ml abis/amd64/abi_amd64_relocation.ml abis/amd64/abi_amd64_program_header_table.ml abis/amd64/abi_amd64_section_header_table.ml abis/amd64/abi_amd64_symbol_table.ml abis/amd64/abi_amd64.ml abis/mips64/abi_mips64_dynamic.ml abis/mips64/abi_mips64_elf_header.ml abis/mips64/abi_mips64_relocation.ml abis/mips64/abi_mips64_serialisation.ml abis/mips64/abi_mips64_program_header_table.ml abis/mips64/abi_mips64_section_header_table.ml abis/mips64/abi_mips64_symbol_table.ml abis/mips64/abi_mips64.ml abis/x86/abi_x86_relocation.ml abis/power64/abi_power64_relocation.ml abis/riscv/abi_riscv_elf_header.ml abis/riscv/abi_riscv_program_header_table.ml abis/riscv/abi_riscv_relocation.ml abis/riscv/abi_riscv_section_header_table.ml abis/riscv/abi_riscv_serialisation.ml abis/riscv/abi_riscv_symbol_table.ml abis/riscv/abi_riscv.ml abis/cheri_mips64/abi_cheri_mips64_capability.ml abis/cheri_mips64/abi_cheri_mips64_dynamic.ml abis/cheri_mips64/abi_cheri_mips64_elf_header.ml abis/cheri_mips64/abi_cheri_mips64_relocation.ml abis/cheri_mips64/abi_cheri_mips64.ml gnu_extensions/gnu_ext_types_native_uint.ml gnu_extensions/gnu_ext_section_header_table.ml gnu_extensions/gnu_ext_dynamic.ml gnu_extensions/gnu_ext_symbol_versioning.ml gnu_extensions/gnu_ext_program_header_table.ml gnu_extensions/gnu_ext_section_to_segment_mapping.ml gnu_extensions/gnu_ext_note.ml abis/abis.ml adaptors/sail_interface.ml adaptors/harness_interface.ml \
-   elf_memory_image.ml elf_memory_image_of_elf64_file.ml command_line.ml input_list.ml linkable_list.ml linker_script.ml link.ml load.ml elf64_file_of_elf_memory_image.ml test_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/test_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf64_file_of_elf_memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/load.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/link.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/linker_script.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/linkable_list.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/input_list.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/command_line.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image_of_elf64_file.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/harness_interface.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/sail_interface.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abis.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_note.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_to_segment_mapping.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_symbol_versioning.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_types_native_uint.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_capability.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_x86_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abstract_linker_script.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_serialisation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_abi.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_utilities.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image_orderings.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_classes.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/ldconfig.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf_ctypes.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_dynamic.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_file.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_note.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_section.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_segment.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_relocation.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_section_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_program_header_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_symbol_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_header.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/auxv.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/string_table.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/hex_printing.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_types_native_uint.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/archive.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern_extra.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_impl.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/default_printing.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/multimap.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/missing_pervasives.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/ml_bindings.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/error.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/endianness.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/show.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint32_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint64_wrapper.ml
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint64_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint32_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/test_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/string_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/show.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/sail_interface.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/multimap.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/ml_bindings.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/missing_pervasives.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image_orderings.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/load.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/linker_script.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/linkable_list.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/link.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/ldconfig.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/input_list.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/hex_printing.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/harness_interface.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_types_native_uint.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_symbol_versioning.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_note.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_abi.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/error.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/endianness.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_types_native_uint.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_note.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image_of_elf64_file.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_segment.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_section.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_file.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf64_file_of_elf_memory_image.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf_ctypes.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/default_printing.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/command_line.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_wrapper.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_impl.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern_extra.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/auxv.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/archive.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abstract_linker_script.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abis.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_x86_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_utilities.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_classes.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_dynamic.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_capability.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_symbol_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_section_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_relocation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_program_header_table.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_serialisation.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_elf_header.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le.cmt
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint64_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint32_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/test_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/string_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/show.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/sail_interface.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/multimap.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/ml_bindings.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/missing_pervasives.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image_orderings.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/load.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/linker_script.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/linkable_list.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/link.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/ldconfig.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/input_list.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/hex_printing.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/harness_interface.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_types_native_uint.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_symbol_versioning.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_note.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_abi.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/error.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/endianness.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_types_native_uint.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_note.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image_of_elf64_file.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_segment.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_section.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_file.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf64_file_of_elf_memory_image.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf_ctypes.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/default_printing.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/command_line.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_wrapper.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_impl.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern_extra.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/auxv.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/archive.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abstract_linker_script.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abis.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_x86_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_utilities.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_classes.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_dynamic.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_capability.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_symbol_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_section_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_relocation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_program_header_table.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_serialisation.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_elf_header.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le.cmx
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint64_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/uint32_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/test_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/string_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/show.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/sail_interface.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/multimap.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/ml_bindings.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/missing_pervasives.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image_orderings.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/load.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/linker_script.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/linkable_list.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/link.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/ldconfig.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/input_list.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/hex_printing.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/harness_interface.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_types_native_uint.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_symbol_versioning.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_note.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/gnu_ext_abi.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/filesystem.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/error.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/endianness.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_types_native_uint.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_note.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image_of_elf64_file.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_segment.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_interpreted_section.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_file.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/elf64_file_of_elf_memory_image.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf_ctypes.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/dwarf.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/default_printing.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/command_line.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_wrapper.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence_impl.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_sequence.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern_extra.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/byte_pattern.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/auxv.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/archive.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abstract_linker_script.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abis.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_x86_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_utilities.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_riscv.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_power64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_mips64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_classes.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_dynamic.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64_capability.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_cheri_mips64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_amd64.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_symbol_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_section_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_relocation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_program_header_table.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_serialisation.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le_elf_header.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/abi_aarch64_le.cmi
- Installed /home/opam/.opam/5.0/lib/linksem_num/linksem.a
- Installed /home/opam/.opam/5.0/lib/linksem_num/linksem.cmxa
- Installed /home/opam/.opam/5.0/lib/linksem_num/linksem.cma
- Installed /home/opam/.opam/5.0/lib/linksem_num/META
- touch /home/opam/.opam/5.0/lib/linksem_num/META
- make[1]: Leaving directory '/home/opam/.opam/5.0/.opam-switch/build/linksem.0.8/src'
-> installed linksem.0.8
Done.
# Run eval $(opam env) to update the current shell environment
2024-03-16 21:30.30 ---> saved as "2d7153e0df8a4394f78cce89448ba124b95cab72a016b476168e428422fde4dd"
Job succeeded