Building on fall (from freebsd-ocaml-4.14) 2023-08-28 01:48.51 ---> using "57eeeabfec88366322a66f228a693df277d348dc99f1cc2a63749102c5e1e405" 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/local/bin/opam-2.1 /usr/local/bin/opam")) 2023-08-28 01:48.51 ---> using "c7a3b8a79e4580fd5e468d5c28badd9ec07439a60faac9d106d1bceb471fee5f" 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 cc7acce8a53547ea15a80a427fd7b5bc24b8dfbe")) 2023-08-28 01:48.51 ---> using "7f1e55003515778409723f79848191c0702eaa6efac34a9a243ab96060b45f02" from cache /: (run (shell "rm -rf ~/.opam && opam init -ya --bare ~/opam-repository")) No configuration file found, using 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: /usr/home/opam/.profile is already up-to-date. [NOTE] Make sure that /usr/home/opam/.profile is well sourced in your ~/.bashrc. 2023-08-28 01:48.51 ---> using "ed18bfc10c7a2f6e57cb47a995b4f27ad5d9a8f84ce9c993025c2baf08f93f5c" from cache /: (run (cache (opam-archives (target /usr/home/opam/.opam/download-cache))) (network host) (shell "opam switch create --repositories=default 'default' 'ocaml-base-compiler.4.14.1'")) <><> Installing new switch packages <><><><><><><><><><><><><><><><><><><><><><> Switch invariant: ["ocaml-base-compiler" {= "4.14.1"}] <><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><> -> installed base-bigarray.base -> installed base-threads.base -> installed base-unix.base -> installed ocaml-options-vanilla.1 -> retrieved ocaml-base-compiler.4.14.1 (https://github.com/ocaml/ocaml/archive/4.14.1.tar.gz) -> installed ocaml-base-compiler.4.14.1 -> installed ocaml-config.2 -> installed ocaml.4.14.1 Done. # Run eval $(opam env --switch=default) to update the current shell environment 2023-08-28 01:48.52 ---> using "e1aadb5e86a196246aaaeda46523b059e93855e1115bbd4fa3eb24c9d81d80cf" from cache /: (run (network host) (shell "opam update --depexts")) [WARNING] Unknown update command for bsd, skipping system update 2023-08-28 01:48.52 ---> using "c57f28f27ce4100774ebc2ba4b99498213623c9512b1cb8c314fdbf89a62a60e" from cache /: (run (cache (opam-archives (target /usr/home/opam/.opam/download-cache))) (network host) (shell "\ \nopam remove -y \"sail_output.0.15\"\ \nopam install -vy \"sail_output.0.15\"\ \nres=$?\ \nif [ $res = 31 ]; then\ \n if opam show -f x-ci-accept-failures: \"sail_output.0.15\" | grep -q '\"freebsd\"'; 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")) [NOTE] sail_output.0.15 is not installed. Nothing to do. The following actions will be performed: - install dune 3.10.0 [required by sail_output] - install conf-gmp 4 [required by libsail] - install conf-pkg-config 3 [required by conf-zlib] - install conf-findutils 1 [required by lem] - install ocamlfind 1.9.6 [required by linksem, lem, ott] - install seq base [required by yojson] - install ocamlbuild 0.14.2 [required by lem, linksem] - install stdlib-shims 0.3.0 [required by ocamlgraph] - install pprint 20220103 [required by libsail] - install pp 1.1.2 [required by dune-private-libs] - install ordering 3.10.0 [required by dyn, stdune] - install menhirSdk 20230608 [required by menhir] - install menhirLib 20230608 [required by menhir] - install csexp 1.5.2 [required by dune-private-libs] - install cppo 1.6.9 [required by yojson] - install conf-zlib 1 [required by libsail] - install zarith 1.13 [required by lem] - install num 1.4 [required by lem] - install ocamlgraph 2.0.0 [required by ott] - install dyn 3.10.0 [required by dune-private-libs] - install menhir 20230608 [required by libsail] - install yojson 2.1.0 [required by libsail] - install lem 2022-12-10 [required by libsail] - install ott 0.33 [required by libsail] - install stdune 3.10.0 [required by dune-private-libs] - install linksem 0.8 [required by libsail] - install dune-private-libs 3.10.0 [required by dune-site] - install dune-site 3.10.0 [required by libsail] - install libsail 0.15 [required by sail_output] - install sail_output 0.15 ===== 30 to install ===== The following system packages will first need to be installed: gmp <><> Handling external dependencies <><><><><><><><><><><><><><><><><><><><><><> Let opam run your package manager to install the required system packages? (answer 'n' for other options) [Y/n] y + /usr/local/bin/sudo "pkg" "install" "-y" "gmp" - Updating FreeBSD repository catalogue... - [fall] Fetching packagesite.pkg: ... - ....... done - Processing entries: - ... - .. - .. - .. - . done - FreeBSD repository update completed. 33870 packages processed. - All repositories are up to date. - The following 1 package(s) will be affected (of 0 checked): - - New packages to be INSTALLED: - gmp: 6.2.1 - - Number of packages to be installed: 1 - - The process will require 3 MiB more space. - 475 KiB to be downloaded. - [fall] [1/1] Fetching gmp-6.2.1.pkg: .......... done - Checking integrity... done (0 conflicting) - [fall] [1/1] Installing gmp-6.2.1... - [fall] [1/1] Extracting gmp-6.2.1: .......... done <><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><> Processing 5/90: Processing 6/90: Processing 7/90: Processing 8/90: [conf-findutils: sh find . -name .] -> retrieved dune.3.10.0 (cached) Processing 9/90: [conf-findutils: sh find . -name .] - + find . -name . - . -> compiled conf-findutils.1 Processing 9/90: Processing 10/90: [conf-gmp: sh] -> installed conf-findutils.1 Processing 11/90: [conf-gmp: sh] -> retrieved csexp.1.5.2 (cached) Processing 12/90: [conf-gmp: sh] -> retrieved cppo.1.6.9 (cached) Processing 13/90: [conf-gmp: sh] -> retrieved dune-site.3.10.0 (cached) Processing 14/90: [conf-gmp: sh] -> retrieved dyn.3.10.0 (cached) Processing 15/90: [conf-gmp: sh] -> retrieved lem.2022-12-10 (cached) Processing 16/90: [conf-gmp: sh] - + cc -c -I/usr/local/include test.c -> compiled conf-gmp.4 Processing 16/90: Processing 17/90: [conf-pkg-config: pkg-config] -> installed conf-gmp.4 Processing 18/90: [conf-pkg-config: pkg-config] - usage: pkgconf [OPTIONS] [LIBRARIES] - - basic options: - - --help this message - --about print pkgconf version and license to stdout - --version print supported pkg-config version to stdout - --atleast-pkgconfig-version check whether or not pkgconf is compatible - with a specified pkg-config version - --errors-to-stdout print all errors on stdout instead of stderr - --print-errors ensure all errors are printed - --short-errors be less verbose about some errors - --silence-errors explicitly be silent about errors - --list-all list all known packages - --list-package-names list all known package names - --simulate simulate walking the calculated dependency graph - --no-cache do not cache already seen packages when - walking the dependency graph - --log-file=filename write an audit log to a specified file - --with-path=path adds a directory to the search path - --define-prefix override the prefix variable with one that is guessed based on - the location of the .pc file - --dont-define-prefix do not override the prefix variable under any circumstances - --prefix-variable=varname sets the name of the variable that pkgconf considers - to be the package prefix - --relocate=path relocates a path and exits (mostly for testsuite) - --dont-relocate-paths disables path relocation support - - cross-compilation personality support: - - --personality=triplet|filename sets the personality to 'triplet' or a file named 'filename' - --dump-personality dumps details concerning selected personality - - checking specific pkg-config database entries: - - --atleast-version require a specific version of a module - --exact-version require an exact version of a module - --max-version require a maximum version of a module - --exists check whether or not a module exists - --uninstalled check whether or not an uninstalled module will be used - --no-uninstalled never use uninstalled modules when satisfying dependencies - --no-provides do not use 'provides' rules to resolve dependencies - --maximum-traverse-depth maximum allowed depth for dependency graph - --static be more aggressive when computing dependency graph - (for static linking) - --shared use a simplified dependency graph (usually default) - --pure optimize a static dependency graph as if it were a normal - dependency graph - --env-only look only for package entries in PKG_CONFIG_PATH - --ignore-conflicts ignore 'conflicts' rules in modules - --validate validate specific .pc files for correctness - - querying specific pkg-config database fields: - - --define-variable=varname=value define variable 'varname' as 'value' - --variable=varname print specified variable entry to stdout - --cflags print required CFLAGS to stdout - --cflags-only-I print required include-dir CFLAGS to stdout - --cflags-only-other print required non-include-dir CFLAGS to stdout - --libs print required linker flags to stdout - --libs-only-L print required LDPATH linker flags to stdout - --libs-only-l print required LIBNAME linker flags to stdout - --libs-only-other print required other linker flags to stdout - --print-requires print required dependency frameworks to stdout - --print-requires-private print required dependency frameworks for static - linking to stdout - --print-provides print provided dependencies to stdout - --print-variables print all known variables in module to stdout - --digraph print entire dependency graph in graphviz 'dot' format - --keep-system-cflags keep -I/usr/include entries in cflags output - --keep-system-libs keep -L/usr/lib entries in libs output - --path show the exact filenames for any matching .pc files - --modversion print the specified module's version to stdout - --internal-cflags do not filter 'internal' cflags from output - - filtering output: - - --msvc-syntax print translatable fragments in MSVC syntax - --fragment-filter=types filter output fragments to the specified types - - report bugs to <https://github.com/pkgconf/pkgconf/issues/new>. -> compiled conf-pkg-config.3 Processing 18/90: Processing 19/90: [dune: ocaml 1] -> installed conf-pkg-config.3 Processing 20/90: [dune: ocaml 1] -> retrieved linksem.0.8 (cached) Processing 21/90: [dune: ocaml 1] -> retrieved libsail.0.15 (cached) Processing 22/90: [dune: ocaml 1] -> retrieved menhir.20230608 (cached) Processing 23/90: [dune: ocaml 1] -> retrieved menhirLib.20230608 (cached) Processing 24/90: [dune: ocaml 1] -> retrieved menhirSdk.20230608 (cached) Processing 25/90: [dune: ocaml 1] -> retrieved num.1.4 (cached) Processing 26/90: [dune: ocaml 1] -> retrieved ocamlbuild.0.14.2 (cached) Processing 27/90: [dune: ocaml 1] -> retrieved ocamlfind.1.9.6 (cached) Processing 28/90: [dune: ocaml 1] -> retrieved ocamlgraph.2.0.0 (cached) Processing 29/90: [dune: ocaml 1] -> retrieved ordering.3.10.0 (cached) Processing 30/90: [dune: ocaml 1] -> retrieved ott.0.33 (cached) Processing 31/90: [dune: ocaml 1] -> retrieved pp.1.1.2 (cached) Processing 32/90: [dune: ocaml 1] -> retrieved pprint.20220103 (cached) Processing 33/90: [dune: ocaml 1] Processing 34/90: [dune: ocaml 1] -> retrieved stdlib-shims.0.3.0 (cached) Processing 35/90: [dune: ocaml 1] -> retrieved dune-private-libs.3.10.0 (cached) Processing 36/90: [dune: ocaml 1] -> retrieved stdune.3.10.0 (cached) Processing 37/90: [dune: ocaml 1] -> retrieved yojson.2.1.0 (cached) -> retrieved zarith.1.13 (cached) -> retrieved sail_output.0.15 (cached) + /usr/home/opam/.opam/default/bin/ocaml "boot/bootstrap.ml" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune.3.10.0) - ocamlc -output-complete-exe -w -24 -g -o .duneboot.exe -I boot unix.cma boot/libs.ml boot/duneboot.ml - ./.duneboot.exe -j 1 - Processing 37/90: [dune: ./_boot/dune.exe build] + /usr/home/opam/.opam/default/.opam-switch/build/dune.3.10.0/./_boot/dune.exe "build" "dune.install" "--release" "--profile" "dune-bootstrap" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune.3.10.0) -> compiled dune.3.10.0 Processing 38/90: [conf-zlib: pkg-config zlib] -> installed dune.3.10.0 Processing 39/90: [conf-zlib: pkg-config zlib] + /usr/local/bin/pkg-config "zlib" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/conf-zlib.1) -> compiled conf-zlib.1 Processing 40/90: [cppo: dune build] -> installed conf-zlib.1 Processing 41/90: [cppo: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "cppo" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/cppo.1.6.9) -> compiled cppo.1.6.9 Processing 42/90: [csexp: dune build] -> installed cppo.1.6.9 Processing 43/90: [csexp: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "csexp" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/csexp.1.5.2) -> compiled csexp.1.5.2 Processing 44/90: [menhirLib: dune build] -> installed csexp.1.5.2 Processing 45/90: [menhirLib: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "menhirLib" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/menhirLib.20230608) - (cd _build/default/lib/pack && ./pack.exe) - Creating menhirLib.ml... - Creating menhirLib.mli... -> compiled menhirLib.20230608 Processing 46/90: [menhirSdk: dune build] -> installed menhirLib.20230608 Processing 47/90: [menhirSdk: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "menhirSdk" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/menhirSdk.20230608) -> compiled menhirSdk.20230608 Processing 48/90: [ocamlbuild: gmake configure.make] -> installed menhirSdk.20230608 Processing 49/90: [ocamlbuild: gmake configure.make] + /usr/local/bin/gmake "-f" "configure.make" "all" "OCAMLBUILD_PREFIX=/usr/home/opam/.opam/default" "OCAMLBUILD_BINDIR=/usr/home/opam/.opam/default/bin" "OCAMLBUILD_LIBDIR=/usr/home/opam/.opam/default/lib" "OCAMLBUILD_MANDIR=/usr/home/opam/.opam/default/man" "OCAML_NATIVE=true" "OCAML_NATIVE_TOOLS=true" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2) - (echo "# This file was generated from configure.make"; \ - echo ;\ - echo "OCAML_PREFIX="; \ - echo "OCAML_BINDIR=/usr/home/opam/.opam/default/bin"; \ - echo "OCAML_LIBDIR=/usr/home/opam/.opam/default/lib/ocaml"; \ - echo "OCAML_MANDIR=/usr/home/opam/.opam/default/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=/usr/home/opam/.opam/default"; \ - echo "BINDIR=/usr/home/opam/.opam/default/bin"; \ - echo "LIBDIR=/usr/home/opam/.opam/default/lib"; \ - echo "MANDIR=/usr/home/opam/.opam/default/man"; \ - ) > Makefile.config - (echo "(* This file was generated from ../configure.make *)"; \ - echo ;\ - echo 'let bindir = "/usr/home/opam/.opam/default/bin"'; \ - echo 'let libdir = "/usr/home/opam/.opam/default/lib"'; \ - echo 'let ocaml_libdir = "/usr/home/opam/.opam/default/lib/ocaml"'; \ - echo 'let libdir_abs = "/usr/home/opam/.opam/default/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.2"'; \ - ) > src/ocamlbuild_config.ml Processing 49/90: [ocamlbuild: gmake check-if-preinstalled] + /usr/local/bin/gmake "check-if-preinstalled" "all" "opam-install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2) - if test -d /usr/home/opam/.opam/default/lib/ocaml/ocamlbuild; then\ - >&2 echo "ERROR: Preinstalled ocamlbuild detected at"\ - "/usr/home/opam/.opam/default/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 - /usr/local/bin/gmake ocamlbuild.install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - rm -f ocamlbuild.install - touch ocamlbuild.install - /usr/local/bin/gmake install-bin-opam - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - 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 - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - /usr/local/bin/gmake install-lib-opam - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - echo 'lib: [' >> ocamlbuild.install - /usr/local/bin/gmake install-lib-basics-opam - gmake[3]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - 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 - gmake[3]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - /usr/local/bin/gmake install-lib-byte-opam - gmake[3]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - 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 - gmake[3]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - /usr/local/bin/gmake install-lib-native-opam - gmake[3]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - 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 - gmake[3]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - /usr/local/bin/gmake install-man-opam - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - echo 'man: [' >> ocamlbuild.install - echo ' "man/ocamlbuild.1" {"man1/ocamlbuild.1"}' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - /usr/local/bin/gmake install-doc-opam - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - echo 'doc: [' >> ocamlbuild.install - echo ' "LICENSE"' >> ocamlbuild.install - echo ' "Changes"' >> ocamlbuild.install - echo ' "Readme.md"' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlbuild.0.14.2' -> compiled ocamlbuild.0.14.2 Processing 50/90: [menhir: dune build] -> installed ocamlbuild.0.14.2 Processing 51/90: [menhir: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "menhir" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/menhir.20230608) - (cd _build/default/lib/pack && ./pack.exe) - Creating menhirLib.ml... - Creating menhirLib.mli... - (cd _build/default/src/stage2 && .bin/menhir --exn-carries-state --no-pager --require-aliases --strict parser.mly --compare-errors parserMessages.auto.messages --compare-errors parserMessages.messages) > _build/default/src/stage2/parserMessages.check - Read 101 sample input sentences and 101 error messages. - Read 101 sample input sentences and 48 error messages. - (cd _build/default && src/stage2/.bin/menhir --exn-carries-state --no-pager --require-aliases --strict -lg 1 -la 1 -lc 1 -v src/stage2/parser.mly --base src/stage2/parser --infer-read-reply src/stage2/parser__mock.mli.inferred) - Grammar has 56 nonterminal symbols, among which 1 start symbols. - Grammar has 37 terminal symbols. - Grammar has 129 productions. - Built an LR(0) automaton with 194 states. - The grammar is not SLR(1) -- 5 states have a conflict. - The construction mode is no-pager. - Built an LR(1) automaton with 298 states. - One shift/reduce conflict was silently solved. - Extra reductions on error were added in 40 states. - Priority played a role in 0 of these states. - 152 out of 298 states have a default reduction. - 102 out of 298 states are represented. - 44 out of 96 symbols keep track of their start position. - 41 out of 96 symbols keep track of their end position. - The StackLang code contains 3973 instructions in 267 blocks. - The StackLang code comprises 5 mutually recursive groups. - (cd _build/default/src/stage2 && .bin/menhir --exn-carries-state --no-pager --require-aliases --strict parser.mly --compile-errors parserMessages.messages) > _build/default/src/stage2/parserMessages.ml - Read 101 sample input sentences and 48 error messages. -> compiled menhir.20230608 [ocamlfind: patch] applying 0001-Harden-test-for-OCaml-5.patch Processing 52/90: [ocamlfind: patch] -> installed menhir.20230608 Processing 53/90: [ocamlfind: patch] Processing 53/90: [ocamlfind: ./configure] + /usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6/./configure "-bindir" "/usr/home/opam/.opam/default/bin" "-sitelib" "/usr/home/opam/.opam/default/lib" "-mandir" "/usr/home/opam/.opam/default/man" "-config" "/usr/home/opam/.opam/default/lib/findlib.conf" "-no-custom" "-no-camlp4" (CWD=/usr/home/opam/.opam/default/.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... - Querying installation: META list not found - make install will double-check installed META files - Configuring libraries... - unix: found - dynlink: found - bigarray: found - 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 - labltk: not present (normal since 4.02) - native dynlink: found - camlp4: disabled - bytes: found, installing fake library - Configuration for stdlib written to site-lib-src/stdlib/META - Configuration for unix written to site-lib-src/unix/META - Configuration for dynlink written to site-lib-src/dynlink/META - Configuration for bigarray written to site-lib-src/bigarray/META - Configuration for compiler-libs written to site-lib-src/compiler-libs/META - Configuration for ocamldoc written to site-lib-src/ocamldoc/META - Configuration for threads written to site-lib-src/threads/META - Configuration for str written to site-lib-src/str/META - Configuration for bytes written to site-lib-src/bytes/META - Detecting compiler arguments: - (extractor built) - ok - - About the OCAML core installation: - Standard library: /usr/home/opam/.opam/default/lib/ocaml - Binaries: /usr/home/opam/.opam/default/bin - Manual pages: /usr/home/opam/.opam/default/man - Multi-threading type: posix - The directory of site-specific packages will be - site-lib: /usr/home/opam/.opam/default/lib - The configuration file is written to: - findlib config file: /usr/home/opam/.opam/default/lib/findlib.conf - Software will be installed: - Libraries: in <site-lib>/findlib - Binaries: /usr/home/opam/.opam/default/bin - Manual pages: /usr/home/opam/.opam/default/man - topfind script: /usr/home/opam/.opam/default/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 53/90: [ocamlfind: gmake all] + /usr/local/bin/gmake "all" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6) - for p in findlib; do ( cd src/$p; /usr/local/bin/gmake all ) || exit; done - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.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@' '/usr/home/opam/.opam/default/lib/findlib.conf' | \ - ../../tools/patch '@STDLIB@' '/usr/home/opam/.opam/default/lib/ocaml' | \ - sed -e 's;@AUTOLINK@;true;g' \ - -e 's;@SYSTEM@;freebsd;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@' '/usr/home/opam/.opam/default/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 - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6/src/findlib' - /usr/local/bin/gmake all-config - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat findlib.conf.in | \ - tools/patch '@SITELIB@' '/usr/home/opam/.opam/default/lib' | \ - tools/patch '@FINDLIB_PATH@' '/usr/home/opam/.opam/default/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 - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' Processing 53/90: [ocamlfind: gmake opt] + /usr/local/bin/gmake "opt" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6) - for p in findlib; do ( cd src/$p; /usr/local/bin/gmake opt ) || exit; done - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.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 - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6/src/findlib' -> compiled ocamlfind.1.9.6 Processing 54/90: [ordering: rm] Processing 55/90: [ordering: rm] [ocamlfind: gmake install] Processing 55/90: [ordering: dune build] [ocamlfind: gmake install] - if [ "1" -eq 1 ]; then \ - for x in camlp4 dbm graphics labltk num ocamlbuild; do \ - if [ -f "/usr/home/opam/.opam/default/lib/$x/META" ]; then \ - if ! grep -Fq '[distributed with Ocaml]' "//usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/bin" - install -d "/usr/home/opam/.opam/default/man" - /usr/local/bin/gmake install-config - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - install -d "`dirname \"/usr/home/opam/.opam/default/lib/findlib.conf\"`" - test -f "/usr/home/opam/.opam/default/lib/findlib.conf" || install -c findlib.conf "/usr/home/opam/.opam/default/lib/findlib.conf" - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - for p in findlib; do ( cd src/$p; /usr/local/bin/gmake install ); done - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6/src/findlib' - install -d "/usr/home/opam/.opam/default/lib/findlib" - install -d "/usr/home/opam/.opam/default/bin" - test 1 -eq 0 || install -d "/usr/home/opam/.opam/default/lib/ocaml" - test 1 -eq 0 || install -c topfind "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/lib/findlib/" - f="ocamlfind"; { test -f ocamlfind_opt && f="ocamlfind_opt"; }; \ - install -c $f "/usr/home/opam/.opam/default/bin/ocamlfind" - # the following "if" block is only needed for 4.00beta2 - if [ 1 -eq 0 -a -f "/usr/home/opam/.opam/default/lib/ocaml/compiler-libs/topdirs.cmi" ]; then \ - cd "/usr/home/opam/.opam/default/lib/ocaml/compiler-libs/"; \ - install -c topdirs.cmi toploop.cmi "/usr/home/opam/.opam/default/lib/findlib/"; \ - fi - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6/src/findlib' - /usr/local/bin/gmake install-meta - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - for x in bigarray bytes compiler-libs dynlink ocamldoc stdlib str threads unix ; do install -d "/usr/home/opam/.opam/default/lib/$x"; install -c site-lib-src/$x/META "/usr/home/opam/.opam/default/lib/$x/META.tmp" && mv "/usr/home/opam/.opam/default/lib/$x/META.tmp" "/usr/home/opam/.opam/default/lib/$x/META"; done - install -d "/usr/home/opam/.opam/default/lib/findlib"; install -c Makefile.packages "/usr/home/opam/.opam/default/lib/findlib/Makefile.packages" - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - test ! -f 'site-lib-src/num-top/META' || { cd src/findlib; /usr/local/bin/gmake install-num-top; } - test ! -f 'site-lib-src/camlp4/META' || install -c tools/safe_camlp4 "/usr/home/opam/.opam/default/bin" - /usr/local/bin/gmake install-doc - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' - install -d "/usr/home/opam/.opam/default/man/man1" "/usr/home/opam/.opam/default/man/man3" "/usr/home/opam/.opam/default/man/man5" - install -c doc/ref-man/ocamlfind.1 "/usr/home/opam/.opam/default/man/man1" - install -c doc/ref-man/META.5 doc/ref-man/site-lib.5 doc/ref-man/findlib.conf.5 "/usr/home/opam/.opam/default/man/man5" - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ocamlfind.1.9.6' -> installed ocamlfind.1.9.6 Processing 55/90: [ordering: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "ordering" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ordering.3.10.0) -> compiled ordering.3.10.0 Processing 56/90: [num: gmake] -> installed ordering.3.10.0 Processing 57/90: [num: gmake] + /usr/local/bin/gmake (CWD=/usr/home/opam/.opam/default/.opam-switch/build/num.1.4) - /usr/local/bin/gmake -C src all - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/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 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c int_misc.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c int_misc.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c nat.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c nat.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c big_int.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c big_int.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c arith_flags.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c arith_flags.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c ratio.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c ratio.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c num.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c num.ml - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c arith_status.mli - ocamlc -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -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 - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c int_misc.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c nat.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c big_int.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c arith_flags.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c ratio.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -c num.ml - ocamlopt -w +a-4-9-41-42-44-45-48 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -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 -warn-error A -bin-annot -g -safe-string -strict-sequence -strict-formats -I . -shared -o nums.cmxs nums.cmxa - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/src' - /usr/local/bin/gmake -C toplevel all - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/toplevel' - ocamlc -I ../src -I +compiler-libs -w +a-4-9-41-42-44-45-48 -warn-error A -safe-string -strict-sequence -strict-formats -c num_top_printers.mli - ocamlc -I ../src -I +compiler-libs -w +a-4-9-41-42-44-45-48 -warn-error A -safe-string -strict-sequence -strict-formats -c num_top_printers.ml - ocamlc -I ../src -I +compiler-libs -w +a-4-9-41-42-44-45-48 -warn-error A -safe-string -strict-sequence -strict-formats -c num_top.mli - ocamlc -I ../src -I +compiler-libs -w +a-4-9-41-42-44-45-48 -warn-error A -safe-string -strict-sequence -strict-formats -c num_top.ml - ocamlc -I ../src -I +compiler-libs -w +a-4-9-41-42-44-45-48 -warn-error A -safe-string -strict-sequence -strict-formats -a -o num_top.cma num_top_printers.cmo num_top.cmo - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/toplevel' -> compiled num.1.4 Processing 58/90: [pp: dune build] Processing 59/90: [pp: dune build] [num: ocamlfind remove] - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/num/META - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/num-top/META Processing 59/90: [pp: dune build] [num: gmake install] - /usr/local/bin/gmake -C src install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/src' - install -d /usr/home/opam/.opam/default/lib/ocaml - sed -e 's/%%VERSION%%/1.4/g' META.in > META - ocamlfind install num META - Installed /usr/home/opam/.opam/default/lib/num/META - rm -f META - install -m 644 nums.cma libnums.a big_int.cmi nat.cmi num.cmi ratio.cmi arith_status.cmi big_int.mli nat.mli num.mli ratio.mli arith_status.mli big_int.cmti nat.cmti num.cmti ratio.cmti arith_status.cmti nums.cmxa nums.a int_misc.cmx nat.cmx big_int.cmx arith_flags.cmx ratio.cmx num.cmx arith_status.cmx nums.cmxs /usr/home/opam/.opam/default/lib/ocaml - install -d /usr/home/opam/.opam/default/lib/ocaml/stublibs - install dllnums.so /usr/home/opam/.opam/default/lib/ocaml/stublibs - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/src' - /usr/local/bin/gmake -C toplevel install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/toplevel' - sed -e 's/%%VERSION%%/1.4/g' META.in > META - ocamlfind install num-top META num_top.cma num_top.cmi num_top_printers.cmi - Installed /usr/home/opam/.opam/default/lib/num-top/num_top_printers.cmi - Installed /usr/home/opam/.opam/default/lib/num-top/num_top.cmi - Installed /usr/home/opam/.opam/default/lib/num-top/num_top.cma - Installed /usr/home/opam/.opam/default/lib/num-top/META - rm -f META - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/num.1.4/toplevel' -> installed num.1.4 Processing 59/90: [pp: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "pp" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/pp.1.1.2) -> compiled pp.1.1.2 Processing 60/90: [pprint: dune build] -> installed pp.1.1.2 Processing 61/90: [pprint: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "pprint" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/pprint.20220103) -> compiled pprint.20220103 Processing 62/90: [dyn: rm] -> installed pprint.20220103 Processing 63/90: [dyn: rm] + /bin/rm "-rf" "vendor/csexp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dyn.3.10.0) + /bin/rm "-rf" "vendor/pp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dyn.3.10.0) Processing 63/90: [dyn: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "dyn" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dyn.3.10.0) -> compiled dyn.3.10.0 Processing 65/90: [stdlib-shims: dune build] -> installed dyn.3.10.0 Processing 66/90: [stdlib-shims: dune build] -> installed seq.base Processing 67/90: [stdlib-shims: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "stdlib-shims" "-j" "1" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/stdlib-shims.0.3.0) -> compiled stdlib-shims.0.3.0 Processing 68/90: [stdune: rm] -> installed stdlib-shims.0.3.0 Processing 69/90: [stdune: rm] + /bin/rm "-rf" "vendor/csexp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/stdune.3.10.0) + /bin/rm "-rf" "vendor/pp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/stdune.3.10.0) Processing 69/90: [stdune: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "stdune" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/stdune.3.10.0) -> compiled stdune.3.10.0 Processing 70/90: [ocamlgraph: dune build] -> installed stdune.3.10.0 Processing 71/90: [ocamlgraph: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "ocamlgraph" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ocamlgraph.2.0.0) -> compiled ocamlgraph.2.0.0 Processing 72/90: [dune-private-libs: rm] -> installed ocamlgraph.2.0.0 Processing 73/90: [dune-private-libs: rm] + /bin/rm "-rf" "vendor/csexp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-private-libs.3.10.0) + /bin/rm "-rf" "vendor/pp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-private-libs.3.10.0) Processing 73/90: [dune-private-libs: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "dune-private-libs" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-private-libs.3.10.0) -> compiled dune-private-libs.3.10.0 Processing 74/90: [ott: gmake world] -> installed dune-private-libs.3.10.0 Processing 75/90: [ott: gmake world] + /usr/local/bin/gmake "world" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33) - cd src; /usr/local/bin/gmake install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33/src' - ocamllex grammar_lexer.mll - 374 states, 16439 transitions, table size 68000 bytes - 3397 additional bytes used for bindings - ocamlyacc -v grammar_parser.mly - 2 rules never reduced - ocamldep location.ml types.ml auxl.ml merge.ml global_option.ml grammar_lexer.ml grammar_parser.mli grammar_parser.ml version.ml grammar_pp.ml parse_table.ml glr.ml new_term_parser.ml term_parser.ml dependency.ml bounds.ml context_pp.ml quotient_rules.ml grammar_typecheck.ml transform.ml substs_pp.ml subrules_pp.ml embed_pp.ml defns.ml ln_transform.ml coq_induct.ml system_pp.ml lex_menhir_pp.ml align.ml main.ml align.mli bounds.mli coq_induct.mli defns.mli dependency.mli embed_pp.mli grammar_typecheck.mli merge.mli subrules_pp.mli substs_pp.mli system_pp.mli lex_menhir_pp.mli transform.mli term_parser.mli > .depend - mkdir ../bin - /usr/local/bin/gmake opt - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33/src' - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c location.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c types.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c auxl.ml - File "auxl.ml", lines 405-412, characters 7-19: - 405 | .......( match hse with - 406 | | Hom_index _ | Hom_terminal _ -> [] - 407 | | Hom_string s -> - 408 | let strs = Str.split (Str.regexp "[ \t]+") s in - 409 | let ntrs_hom = List.filter (fun st -> List.mem st defined_ntrs) strs in - 410 | if promote - 411 | then List.map (promote_ntr xd) ntrs_hom - 412 | else ntrs_hom ). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Hom_ln_free_index (_, _) - File "auxl.ml", lines 467-471, characters 7-59: - 467 | .......( match hse with - 468 | | Hom_index _ | Hom_terminal _ -> [] - 469 | | Hom_string s -> - 470 | let strs = Str.split (Str.regexp "[ \t]+") s in - 471 | List.filter (fun st -> List.mem st defined_mvrs) strs ). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Hom_ln_free_index (_, _) - File "auxl.ml", lines 1839-1854, characters 4-42: - 1839 | ....( match stre with - 1840 | | Struct_md mvr -> "metavar def: "^mvr - 1841 | | Struct_rs ntrs -> "rule def: "^(String.concat " " ntrs) - 1842 | | Struct_srs xs -> "subrule def: "^ - 1843 | (String.concat " " - ... - 1851 | | Struct_axs xs -> "aux def: "^ - 1852 | (String.concat " " xs) - 1853 | | Struct_fun_or_defnclass s -> "fundefn_class def: "^s - 1854 | | Struct_embed (_,h,_) -> "embed: "^h) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Struct_crs _ - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c location.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c types.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c merge.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c merge.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c global_option.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c grammar_parser.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c grammar_parser.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c grammar_lexer.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c version.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c grammar_pp.ml - File "grammar_pp.ml", lines 1875-2131, characters 6-25: - 1875 | ......( match m with - 1876 | | Lex _ | Menhir _ -> Auxl.errorm m "pp_mse" - 1877 | | Ascii ao -> - 1878 | pp_auxfn m xd f ^ ""^pp_LPAREN ^ "" - 1879 | ^ pp_ntlist - ... - 2128 | else - 2129 | ( "(flat_map (fun "^pat_fun^" => "^pp_body^ pat_fun_end ^ ") " - 2130 | ^ de1i.de1_compound_id - 2131 | ^ ")", [], [] ) ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _) - (However, some guarded clause may match this value.) - File "grammar_pp.ml", lines 4022-4025, characters 16-45: - 4022 | ................(match hse with - 4023 | | Hom_string _ -> arity_of_homspec hs' - 4024 | | Hom_index i -> max (1+i) (arity_of_homspec hs') - 4025 | | Hom_terminal _ -> arity_of_homspec hs') - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Hom_ln_free_index (_, _) - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c parse_table.ml - File "parse_table.ml", line 914, characters 42-56: - 914 | prod_action = (fun [r] -> r); - ^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_ - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c glr.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c new_term_parser.ml - File "new_term_parser.ml", lines 150-177, characters 10-30: - 150 | ..........(function - 151 | | "[" -> "lbrac" - 152 | | "]" -> "rbrac" - 153 | | "!" -> "excl" - 154 | | "\"" -> "doublequote" - ... - 174 | | "}" -> "rcurly" - 175 | | "|" -> "bar" - 176 | | "~" -> "tilde" - 177 | | "-" -> "minus") - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - "" - File "new_term_parser.ml", lines 289-290, characters 14-18: - 289 | ..............[Res_char c; Res_charl l] = - 290 | Res_charl (c::l).. - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_char _::Res_charl _::_::_ - File "new_term_parser.ml", lines 292-293, characters 20-46: - 292 | ....................[Res_char c; Res_charl l] = - 293 | Res_string (Auxl.string_of_char_list (c::l)).. - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_char _::Res_charl _::_::_ - File "new_term_parser.ml", line 295, characters 14-58: - 295 | let res_stlil [Res_stli a; Res_stlil b] = Res_stlil (a::b);; - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stli _::Res_stlil _::_::_ - File "new_term_parser.ml", lines 342-346, characters 67-66: - 342 | ...................................................................function - 343 | [] -> [] - 344 | | Res_ignore::rl -> process_prod_res rl - 345 | | Res_ste ste::rl -> ste::process_prod_res rl - 346 | | Res_st st::rl -> Ste_st (dummy_loc, st)::process_prod_res rl - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Res_none|Res_stli _|Res_stlil _|Res_char _|Res_charl _|Res_string _| - Res_int _|Res_si _|Res_sil _)::_ - File "new_term_parser.ml", line 382, characters 14-42: - 382 | (fun [Res_stlil x] -> elc x); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stlil _::_::_ - File "new_term_parser.ml", line 401, characters 8-42: - 401 | (fun [Res_stli x]-> Res_stlil [x]); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stli _::_::_ - File "new_term_parser.ml", line 416, characters 16-51: - 416 | (fun [x; _; y] -> res_stlil [x; y]) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_::_::_ - File "new_term_parser.ml", lines 463-467, characters 26-65: - 463 | ..........................(fun [Res_stli (Stli_single (_, es1)); - 464 | _; - 465 | Res_int n'; - 466 | Res_stli (Stli_single (_, es2))] -> - 467 | process_dot_listform_res es1 n' es2). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stli (Stli_single (_, _))::_::Res_int _::Res_stli (Stli_single (_, _)):: - _::_ - File "new_term_parser.ml", lines 476-482, characters 26-65: - 476 | ..........................(fun [Res_stli (Stli_single (_, es1)); - 477 | _; - 478 | _; - 479 | Res_int n'; - 480 | _; - 481 | Res_stli (Stli_single (_, es2))] -> - 482 | process_dot_listform_res es1 n' es2) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stli (Stli_single (_, _))::_::_::Res_int _::_:: - Res_stli (Stli_single (_, _))::_::_ - File "new_term_parser.ml", lines 488-500, characters 18-53: - 488 | ..................(fun [_; Res_stli (Stli_single (_, es)); _; _; Res_string ivr; - 489 | _] -> - 490 | let es'' = - 491 | List.map - 492 | (Merge.abstract_indexvar_symterm_element ivr 0) - ... - 497 | stl_elements = es''; - 498 | stl_loc = dummy_loc} - 499 | in - 500 | Res_stli (Stli_listform stlb)). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_stli (Stli_single (_, _))::_::_::Res_string _::_::_::_ - File "new_term_parser.ml", lines 508-523, characters 18-53: - 508 | ..................(fun [_; Res_stli (Stli_single (_, es)); _; _; Res_string ivr; - 509 | _; - 510 | _; Res_string ivr'; - 511 | _] -> - 512 | let es'' = - ... - 520 | let stlb = {stl_bound = b; - 521 | stl_elements = es''; - 522 | stl_loc = dummy_loc} in - 523 | Res_stli (Stli_listform stlb)). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_stli (Stli_single (_, _))::_::_::Res_string _::_::_::Res_string _::_:: - _::_ - File "new_term_parser.ml", lines 536-557, characters 18-53: - 536 | ..................(fun [_; Res_stli (Stli_single (_, es)); _; _; Res_string ivr; - 537 | _; - 538 | _; - 539 | Res_string lower; - 540 | _; - ... - 554 | let stlb = {stl_bound = b; - 555 | stl_elements = es''; - 556 | stl_loc = dummy_loc} in - 557 | Res_stli (Stli_listform stlb)). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_stli (Stli_single (_, _))::_::_::Res_string _::_::_::Res_string _::_:: - Res_int _::_::Res_si _::_::_::_ - File "new_term_parser.ml", line 560, characters 18-53: - 560 | (fun [Res_stli x] -> Res_stlil [x])); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_stli _::_::_ - File "new_term_parser.ml", line 574, characters 24-59: - 574 | (fun [x; _; y] -> res_stlil [x; y])); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_::_::_ - File "new_term_parser.ml", line 603, characters 15-44: - 603 | (fun (_::rl) -> build_res rl) in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "new_term_parser.ml", line 609, characters 15-44: - 609 | (fun (_::rl) -> build_res rl) in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "new_term_parser.ml", line 628, characters 12-29: - 628 | (fun [_; x] -> x) - ^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_::_ - File "new_term_parser.ml", lines 638-639, characters 13-63: - 638 | .............(fun [_; Res_sil l] -> - 639 | Res_st (St_nonterm (dummy_loc, ntr, (nt', l)))). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_sil _::_::_ - File "new_term_parser.ml", lines 649-653, characters 18-55: - 649 | ..................(fun [_; Res_sil l] -> - 650 | Res_st (St_nontermsub (dummy_loc, - 651 | ntl, - 652 | Auxl.promote_ntr xd ntr, - 653 | (nt', l)))). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_sil _::_::_ - File "new_term_parser.ml", lines 664-665, characters 6-59: - 664 | ......(fun [_; Res_sil x] -> - 665 | Res_ste (Ste_metavar (dummy_loc, name, (mvr, x)))) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_sil _::_::_ - File "new_term_parser.ml", line 695, characters 14-100: - 695 | (fun (_::Res_string s::_) -> Res_ste (Ste_metavar (dummy_loc, mvd.mvd_name, (s, [])))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _:: - (Res_ignore|Res_none|Res_st _|Res_ste _|Res_stli _|Res_stlil _|Res_char _| - Res_charl _|Res_int _|Res_si _|Res_sil _)::_ - File "new_term_parser.ml", lines 703-707, characters 16-68: - 703 | ................(fun [_; Res_string s] -> - 704 | if is_tm s then - 705 | raise Reject_parse - 706 | else - 707 | Res_ste (Ste_var (dummy_loc, mvd.mvd_name, s))). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_string _::_::_ - File "new_term_parser.ml", lines 710-711, characters 16-66: - 710 | ................(fun [_; Res_string s] -> - 711 | Res_ste (Ste_var (dummy_loc, mvd.mvd_name, s))). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_string _::_::_ - File "new_term_parser.ml", lines 715-719, characters 16-23: - 715 | ................(fun [((Res_ste (Ste_var (_, _, s))) as x)] -> - 716 | if is_tm s then - 717 | raise Reject_parse - 718 | else - 719 | x) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_ste (Ste_var (_, _, _))::_::_ - File "new_term_parser.ml", line 742, characters 6-41: - 742 | (fun [Res_char c] -> Res_charl [c]); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_char _::_::_ - File "new_term_parser.ml", line 748, characters 6-68: - 748 | (fun [Res_charl s] -> Res_string (Auxl.string_of_char_list s)); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_charl _::_::_ - File "new_term_parser.ml", line 761, characters 6-53: - 761 | (fun [Res_si s; Res_sil sl] -> Res_sil (s::sl)); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_si _::Res_sil _::_::_ - File "new_term_parser.ml", line 767, characters 6-73: - 767 | (fun [Res_charl l] -> Res_si (Si_num (Auxl.string_of_char_list l))); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_charl _::_::_ - File "new_term_parser.ml", line 771, characters 6-24: - 771 | (fun [rsi] -> rsi); - ^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_ - File "new_term_parser.ml", line 794, characters 6-47: - 794 | (fun [Res_charl c] -> Res_charl ('_'::c)); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_charl _::_::_ - File "new_term_parser.ml", line 796, characters 6-48: - 796 | (fun [Res_charl c] -> Res_charl ('\''::c)); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_charl _::_::_ - File "new_term_parser.ml", line 831, characters 6-52: - 831 | (fun [Res_string s] -> Res_si (Si_var (s, 0))); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_string _::_::_ - File "new_term_parser.ml", line 835, characters 6-53: - 835 | (fun [Res_string s] -> Res_si (Si_var (s, -1))); - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Res_string _::_::_ - File "new_term_parser.ml", lines 846-847, characters 13-61: - 846 | .............(fun [_; Res_sil x] -> - 847 | Res_st (St_nonterm (dummy_loc, "", (nt, x)))). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::Res_sil _::_::_ - File "new_term_parser.ml", line 858, characters 13-27: - 858 | (fun [x] -> x); - ^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - _::_::_ - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c term_parser.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c term_parser.ml - File "term_parser.ml", lines 1139-1172, characters 2-11: - 1139 | ..let Ascii oldopts = pp_ascii_opts_default in - 1140 | let opts = Ascii {oldopts with ppa_colour = !Auxl.colour} in - 1141 | let sts = parse_complete lookup ntr concrete s in - 1142 | let sts = transform sts in - 1143 | match sts with - ... - 1169 | begin - 1170 | report_error (Some l) (sstart ^ concat "" intermed); - 1171 | St_uninterpreted(l, "multiple parses") - 1172 | end - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq - {coq_quantified_vars_from_de=_; coq_non_local_hyp_defn=_; - coq_non_local_hyp_defn_vars=_; coq_list_types=_; - coq_list_aux_defns={defined=_; newly_defined=_}; - coq_library={contents=(_, _)}; coq_locally_nameless=_; _ }| - Isa {isa_library={contents=(_, _)}; _ }|Hol {hol_library={contents=(_, _)}}| - Lem {lem_library={contents=(_, _)}}| - Twf {twf_current_defn=_; twf_library={contents=(_, _)}}|Tex _| - Caml {caml_library={contents=(_, _)}; _ }| - Lex {ppm_caml_opts={caml_library={contents=(_, _)}; _ }; _ }| - Menhir {ppm_caml_opts={caml_library={contents=(_, _)}; _ }; _ }) - File "term_parser.ml", line 1222, characters 25-54: - 1222 | List.map (fun (Ntp.Gtp.Res_st s) -> s) res - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Res_ignore|Res_none|Res_ste _|Res_stli _|Res_stlil _|Res_char _|Res_charl _| - Res_string _|Res_int _|Res_si _|Res_sil _) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c dependency.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c dependency.ml - File "dependency.ml", lines 571-579, characters 2-74: - 571 | ..match m with - 572 | | Isa io when io.ppi_isa_primrec -> isa_primrec_collapse m xd funcs - 573 | | Isa io when not io.ppi_isa_primrec -> isa_fun_collapse m xd funcs - 574 | | Hol _ -> hol_collapse m xd funcs - 575 | | Lem _ -> lem_collapse m xd funcs - 576 | | Coq _ -> coq_collapse m xd funcs - 577 | | Twf _ -> twf_collapse m xd funcs - 578 | | Caml _ -> caml_collapse m xd funcs - 579 | | Tex _ | Ascii _ -> Auxl.error None "internal: collapse of Tex-Ascii\n" - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Isa _|Lex _|Menhir _) - (However, some guarded clause may match this value.) - File "dependency.ml", lines 584-714, characters 2-53: - 584 | ..match m with - 585 | | Tex _ | Ascii _ -> Auxl.error None "internal: print of Tex-Ascii\n" - 586 | | Isa io -> - 587 | let print_lemma block = - 588 | if ( List.exists - ... - 711 | (* (List.map (fun (_,((h1,h2,h3),s,_)) -> h1 ^ "FOO1" ^ h2 ^ "FOO2"^ h3 ^ "FOO3"^s) block))*) - 712 | (List.map (fun (_,((h1,h2,h3),s,_)) -> h1 ^ h2 ^ h3 ^ s ^ " end\n") block)) - 713 | ^ "\n") in - 714 | String.concat "" (List.map print_block sorting) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Lex _|Menhir _) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c bounds.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c bounds.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c context_pp.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c quotient_rules.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c grammar_typecheck.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c grammar_typecheck.ml - File "grammar_typecheck.ml", lines 54-56, characters 4-82: - 54 | ....match (xs,keys) with - 55 | | ([],[]) -> None - 56 | | (x::xs, key::keys) -> if (List.mem key keys) then Some x else helper xs keys. - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - ([], _::_) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c transform.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c transform.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c substs_pp.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c substs_pp.ml - File "substs_pp.ml", lines 333-336, characters 10-11: - 333 | ..........(match m with - 334 | | Caml _ -> Grammar_pp.pp_nt_or_mv_root_ty m xd ntmvr ^ " list" - 335 | | Lem _ -> "list " ^Grammar_pp.pp_nt_or_mv_root_ty m xd ntmvr - 336 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _|Hol _|Twf _|Ascii _|Tex _|Lex _|Menhir _) - File "substs_pp.ml", lines 1400-1412, characters 3-4: - 1400 | ...(match m with - 1401 | | Caml _ -> - 1402 | "(" - 1403 | ^ Grammar_pp.pp_nt_or_mv_root_ty m xd subst.sb_that - 1404 | ^ "*" ^ Grammar_pp.pp_nontermroot_ty m xd subst.sb_this - ... - 1409 | ^ Grammar_pp.pp_nt_or_mv_root_ty m xd subst.sb_that - 1410 | ^ "*" ^ Grammar_pp.pp_nontermroot_ty m xd subst.sb_this - 1411 | ^ ")" - 1412 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _|Hol _|Twf _|Ascii _|Tex _|Lex _|Menhir _) - File "substs_pp.ml", lines 1747-1876, characters 3-8: - 1747 | ...( match m with - 1748 | | Ascii _ | Tex _ | Lex _ | Menhir _ -> Auxl.error (Some p.prod_loc) "pp_fv_symterm_list_body" - 1749 | | Isa io when io.ppi_isa_primrec -> - 1750 | let args = - 1751 | String.concat "_" - ... - 1873 | ("(flat_map (fun (pat_:"^de1i.de1_coq_type_of_pattern^") => match pat_ with " ^ de1i.de1_pattern ^ " => "^pp_body^" end) " - 1874 | ^ de1i.de1_compound_id - 1875 | ^ ")"), funcs - 1876 | ).. - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _|Twf _) - (However, some guarded clause may match this value.) - File "substs_pp.ml", lines 2030-2033, characters 5-6: - 2030 | .....(match m with - 2031 | | Caml _ -> Grammar_pp.pp_nt_or_mv_root_ty m xd fv.fv_that ^ " list" - 2032 | | Lem _ -> " list " ^ Grammar_pp.pp_nt_or_mv_root_ty m xd fv.fv_that - 2033 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _|Hol _|Twf _|Ascii _|Tex _|Lex _|Menhir _) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c subrules_pp.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c subrules_pp.ml - File "subrules_pp.ml", lines 167-368, characters 8-2: - 167 | ........( match m with - 168 | | Isa io when io.ppi_isa_primrec -> - 169 | let typ = - 170 | Auxl.the (Grammar_pp.pp_elements - 171 | m xd ((Si_punct "_")::sie) elbu.elb_es true false true true) ^ " list" in - ... - 365 | [ " %{ TWELF NOT IMPLEMENTED }%"], deps, [] - 366 | | Tex _ | Ascii _ | Lex _ | Menhir _ -> Auxl.errorm m "pp_subelement" - 367 | - 368 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Coq _|Isa _) - (However, some guarded clause may match this value.) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c embed_pp.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c embed_pp.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c defns.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c defns.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c ln_transform.ml - File "ln_transform.ml", lines 1057-1067, characters 4-7: - 1057 | ....match mse with - 1058 | | Empty -> - 1059 | "0",[] - 1060 | | MetaVarExp mv -> - 1061 | "1",[] (* FZ is this correct in the general case? *) - ... - 1064 | | Aux (f1,nt1) -> - 1065 | let name = arity_name f1 (Auxl.promote_ntr xd_transformed (Auxl.primary_ntr_of_ntr xd_transformed (fst nt1))) in - 1066 | name ^ " " ^ Grammar_pp.pp_nonterm m xd_transformed nt1, - 1067 | [name] - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (NonTermExp _|MetaVarListExp (_, _)|NonTermListExp (_, _)|AuxList (_, _, _)) - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c coq_induct.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c coq_induct.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c system_pp.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c system_pp.ml - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c lex_menhir_pp.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c lex_menhir_pp.ml - File "lex_menhir_pp.ml", lines 274-285, characters 10-11: - 274 | ..........(match ocamllex_hom_opt, ocamllex_remove_hom with - 275 | | Some ocamllex_hom, false -> - 276 | Some (token_name_of mvd.mvd_name, mvd.mvd_name, TK_metavar(ocaml_type, Some ocamllex_hom, ocamllex_of_string_hom_opt)) - 277 | | None, false -> - 278 | (* hack: default to ocamllex-remove *) - ... - 282 | Auxl.error (Some mvd.mvd_loc) ("ocamllex output: both ocamllex and ocamllex-remove hom for "^mvd.mvd_name^"\n") - 283 | | None, true -> - 284 | Some (token_name_of mvd.mvd_name, mvd.mvd_name, TK_metavar(ocaml_type, None, ocamllex_of_string_hom_opt)) - 285 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Some _, true) - File "lex_menhir_pp.ml", line 281, characters 12-36: - 281 | | Some ocamllex_hom, false -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 11 [redundant-case]: this match case is unused. - File "lex_menhir_pp.ml", lines 331-335, characters 13-42: - 331 | .............(match ocaml_type with - 332 | | "string" -> "" - 333 | | "int" -> "int_of_string" - 334 | | "float" -> "float_of_string" - 335 | | "bool" -> "bool_of_string") - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - "" - ocamlfind ocamlc -package str -package ocamlgraph -linkpkg -g -dtypes -c align.mli - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c align.ml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -c main.ml - sed -e 's/__VERSION__/0.33/' \ - -e '/__DATE__/r tmp_date.txt' \ - -e '/__DATE__/d' <version_src.tex >version.tex - echo Makefile location.cmx types.cmx auxl.cmx merge.cmx global_option.cmx grammar_lexer.cmx grammar_parser.cmx version.cmx grammar_pp.cmx parse_table.cmx glr.cmx new_term_parser.cmx term_parser.cmx dependency.cmx bounds.cmx context_pp.cmx quotient_rules.cmx grammar_typecheck.cmx transform.cmx substs_pp.cmx subrules_pp.cmx embed_pp.cmx defns.cmx ln_transform.cmx coq_induct.cmx system_pp.cmx lex_menhir_pp.cmx align.cmx main.cmx align.cmi bounds.cmi coq_induct.cmi defns.cmi dependency.cmi embed_pp.cmi grammar_typecheck.cmi merge.cmi subrules_pp.cmi substs_pp.cmi system_pp.cmi lex_menhir_pp.cmi transform.cmi term_parser.cmi version.tex - Makefile location.cmx types.cmx auxl.cmx merge.cmx global_option.cmx grammar_lexer.cmx grammar_parser.cmx version.cmx grammar_pp.cmx parse_table.cmx glr.cmx new_term_parser.cmx term_parser.cmx dependency.cmx bounds.cmx context_pp.cmx quotient_rules.cmx grammar_typecheck.cmx transform.cmx substs_pp.cmx subrules_pp.cmx embed_pp.cmx defns.cmx ln_transform.cmx coq_induct.cmx system_pp.cmx lex_menhir_pp.cmx align.cmx main.cmx align.cmi bounds.cmi coq_induct.cmi defns.cmi dependency.cmi embed_pp.cmi grammar_typecheck.cmi merge.cmi subrules_pp.cmi substs_pp.cmi system_pp.cmi lex_menhir_pp.cmi transform.cmi term_parser.cmi version.tex - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -v - The OCaml native-code compiler, version 4.14.1 - Standard library directory: /usr/home/opam/.opam/default/lib/ocaml - ocamlfind ocamlopt -package str -package ocamlgraph -linkpkg -w y -g -dtypes -unsafe -inline 9 -o ott.opt location.cmx types.cmx auxl.cmx merge.cmx global_option.cmx grammar_lexer.cmx grammar_parser.cmx version.cmx grammar_pp.cmx parse_table.cmx glr.cmx new_term_parser.cmx term_parser.cmx dependency.cmx bounds.cmx context_pp.cmx quotient_rules.cmx grammar_typecheck.cmx transform.cmx substs_pp.cmx subrules_pp.cmx embed_pp.cmx defns.cmx ln_transform.cmx coq_induct.cmx system_pp.cmx lex_menhir_pp.cmx align.cmx main.cmx - ln -s -f ott.opt ott - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33/src' - cp ./ott ../bin/ott - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33/src' Processing 75/90: [ott: gmake ott.install] + /usr/local/bin/gmake "ott.install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/ott.0.33) - cp ott.install.nodoc ott.install - echo "doc : [" >> ott.install - echo "\"README.md\" { \"README.md\" }" >> ott.install - echo "\"LICENCE\" { \"LICENSE\" }" >> ott.install - echo "\"built_doc/top2.pdf\" { \"doc/ott_manual.pdf\" }" >> ott.install - echo "\"built_doc/top2.html\" { \"doc/ott_manual.html\" }" >> ott.install - echo "\"built_doc/top2001.png\"" "\"built_doc/top2002.png\"" "\"built_doc/top2003.png\"" "\"built_doc/top2004.png\"" "\"built_doc/top2005.png\"" "\"built_doc/top2006.png\"" "\"built_doc/top2007.png\"" "\"built_doc/top2008.png\"" "\"built_doc/top2009.png\"" "\"built_doc/top2010.png\"" "\"built_doc/top2011.png\"" "\"built_doc/top2012.png\"" "\"built_doc/top2013.png\"" "\"built_doc/top2014.png\"" "\"built_doc/top2015.png\"" "\"built_doc/top2016.png\"" "\"built_doc/top2017.png\"" "\"built_doc/top2018.png\"" "\"built_doc/top2019.png\"" "\"built_doc/top2020.png\"" "\"built_doc/top2021.png\"" "\"built_doc/top2022.png\"" "\"built_doc/top2023.png\"" "\"built_doc/top2024.png\"" "\"built_doc/top2025.png\"" "\"built_doc/top2026.png\"" "\"built_doc/top2027.png\"" "\"built_doc/top2028.png\"" "\"built_doc/top2029.png\"" "\"built_doc/top2030.png\"" "\"built_doc/top2031.png\"" "\"built_doc/top2032.png\"" "\"built_doc/top2033.png\"" "\"built_doc/top2034.png\"" "\"built_doc/top2035.png\"" "\"built_doc/top2036.png\"" "\"built_doc/top2037.png\"" >> ott.install - echo "]" >> ott.install -> compiled ott.0.33 Processing 76/90: [dune-site: rm] -> installed ott.0.33 Processing 77/90: [dune-site: rm] + /bin/rm "-rf" "vendor/csexp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-site.3.10.0) + /bin/rm "-rf" "vendor/pp" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-site.3.10.0) Processing 77/90: [dune-site: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "dune-site" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/dune-site.3.10.0) -> compiled dune-site.3.10.0 Processing 78/90: [yojson: dune build] -> installed dune-site.3.10.0 Processing 79/90: [yojson: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "yojson" "-j" "1" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/yojson.2.1.0) -> compiled yojson.2.1.0 Processing 80/90: [zarith: sh] -> installed yojson.2.1.0 Processing 81/90: [zarith: sh] + /bin/sh "-exc" "LDFLAGS=\"$LDFLAGS -L/usr/local/lib\" CFLAGS=\"$CFLAGS -I/usr/local/include\" ./configure" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/zarith.1.13) - + LDFLAGS=' -L/usr/local/lib' CFLAGS=' -I/usr/local/include' ./configure - binary ocaml: found in /usr/home/opam/.opam/default/bin - binary ocamlc: found in /usr/home/opam/.opam/default/bin - binary ocamldep: found in /usr/home/opam/.opam/default/bin - binary ocamlmklib: found in /usr/home/opam/.opam/default/bin - binary ocamldoc: found in /usr/home/opam/.opam/default/bin - binary ocamlopt: found in /usr/home/opam/.opam/default/bin - checking compilation with ocamlc -O3 -Wall -Wextra -I/usr/local/include: working - include caml/mlvalues.h: found - library dynlink.cmxa: found - binary ocamlfind: found in /usr/home/opam/.opam/default/bin - OCaml's word size is 64 - package gmp: found - OCaml supports -bin-annot to produce documentation - - detected configuration: - - native-code: yes - dynamic linking: yes - defines: -DHAS_GMP - includes: -I/usr/home/opam/.opam/default/lib/ocaml -I/usr/local/include - libraries: -L/usr/local/lib -lgmp - linker options: -L/usr/local/lib - C options: -O3 -Wall -Wextra -I/usr/local/include - installation path: /usr/home/opam/.opam/default/lib - installation method findlib - - configuration successful! - now type "make" to build - then type "make install" or "sudo make install" to install Processing 81/90: [zarith: gmake] + /usr/local/bin/gmake (CWD=/usr/home/opam/.opam/default/.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 -L/usr/local/lib -lgmp -L/usr/local/lib - ocamlc -ccopt "-I/usr/home/opam/.opam/default/lib/ocaml -I/usr/local/include -DHAS_GMP -O3 -Wall -Wextra -I/usr/local/include" -c caml_z.c - ocamlmklib -g -failsafe -o zarith caml_z.o -L/usr/local/lib -lgmp -L/usr/local/lib - 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 -L/usr/local/lib -lgmp -L/usr/local/lib - ocamlopt -shared -o zarith.cmxs -I . zarith.cmxa -linkall -> compiled zarith.1.13 Processing 82/90: [zarith: gmake install] + /usr/local/bin/gmake "install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/zarith.1.13) - ocamlfind install -destdir "/usr/home/opam/.opam/default/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 /usr/home/opam/.opam/default/lib/zarith/big_int_Z.cmti - Installed /usr/home/opam/.opam/default/lib/zarith/q.cmti - Installed /usr/home/opam/.opam/default/lib/zarith/z.cmti - Installed /usr/home/opam/.opam/default/lib/zarith/zarith.a - Installed /usr/home/opam/.opam/default/lib/zarith/big_int_Z.mli - Installed /usr/home/opam/.opam/default/lib/zarith/q.mli - Installed /usr/home/opam/.opam/default/lib/zarith/zarith.h - Installed /usr/home/opam/.opam/default/lib/zarith/zarith.cmxs - Installed /usr/home/opam/.opam/default/lib/zarith/big_int_Z.cmx - Installed /usr/home/opam/.opam/default/lib/zarith/q.cmx - Installed /usr/home/opam/.opam/default/lib/zarith/z.cmx - Installed /usr/home/opam/.opam/default/lib/zarith/zarith_version.cmx - Installed /usr/home/opam/.opam/default/lib/zarith/zarith.cmxa - Installed /usr/home/opam/.opam/default/lib/zarith/z.mli - Installed /usr/home/opam/.opam/default/lib/zarith/zarith_top.cma - Installed /usr/home/opam/.opam/default/lib/zarith/big_int_Z.cmi - Installed /usr/home/opam/.opam/default/lib/zarith/q.cmi - Installed /usr/home/opam/.opam/default/lib/zarith/z.cmi - Installed /usr/home/opam/.opam/default/lib/zarith/libzarith.a - Installed /usr/home/opam/.opam/default/lib/zarith/zarith.cma - Installed /usr/home/opam/.opam/default/lib/stublibs/dllzarith.so - Installed /usr/home/opam/.opam/default/lib/stublibs/dllzarith.so.owner - ocamlfind: [WARNING] You have installed DLLs but the directory /usr/home/opam/.opam/default/lib/stublibs is not mentioned in ld.conf - Installed /usr/home/opam/.opam/default/lib/zarith/META -> installed zarith.1.13 Processing 83/90: [lem: gmake] + /usr/local/bin/gmake "INSTALL_DIR=/usr/home/opam/.opam/default" (CWD=/usr/home/opam/.opam/default/.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=\"/usr/home/opam/.opam/default/share/lem\" >> src/share_directory.ml - /usr/local/bin/gmake -C src all - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.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 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 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 "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 "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 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 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 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 "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 "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 - /usr/home/opam/.opam/default/bin/ocamllex.opt -q lexer.mll - ocamlfind ocamldep -package zarith -modules lexer.ml > lexer.ml.depends - /usr/home/opam/.opam/default/bin/ocamlyacc parser.mly - + /usr/home/opam/.opam/default/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 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 version.cmx version.ml - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o main.cmx main.ml - 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 - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.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 - /usr/local/bin/gmake -C library - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/library' - /usr/local/bin/gmake -C .. build-lem - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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=\"/usr/home/opam/.opam/default/share/lem\" >> src/share_directory.ml - /usr/local/bin/gmake -C src all - gmake[3]: Entering directory '/usr/home/opam/.opam/default/.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 - gmake[3]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/src' - ln -sf src/main.native lem - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.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 - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/library' - /usr/local/bin/gmake ocaml-libs - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10' - /usr/local/bin/gmake -C ocaml-lib all - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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 - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/ocaml-lib' - /usr/local/bin/gmake -C library ocaml-lib-tests - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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 - \n\n\n - *************************************************** - * Testing lem_basic_classes - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_bool - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_either - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_function_extra - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_list - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_list_extra - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_machine_word - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_map - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_map_extra - ***************************************************\n - find_insert_1: ok - find_insert_2: ok - \n\n\n - *************************************************** - * Testing lem_maybe - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_num - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_num_extra - ***************************************************\n - integerOfString_test_1: ok - integerOfString_test_2: ok - \n\n\n - *************************************************** - * Testing lem_relation - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_set - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_set_extra - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_sorting - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_string - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_string_extra - ***************************************************\n - 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 - \n\n\n - *************************************************** - * Testing lem_tuple - ***************************************************\n - fst_1: ok - fst_2: ok - snd_1: ok - snd_2: ok - curry_1: ok - uncurry_1: ok - swap_1: ok - \n\n\n - *************************************************** - * Testing lem_word - ***************************************************\n - 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 - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/library' - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10' -> compiled lem.2022-12-10 Processing 84/90: [lem: gmake install] + /usr/local/bin/gmake "INSTALL_DIR=/usr/home/opam/.opam/default" "install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10) - mkdir -p /usr/home/opam/.opam/default/bin - rm -f /usr/home/opam/.opam/default/bin/lem - cp src/main.native /usr/home/opam/.opam/default/bin/lem - rm -rf /usr/home/opam/.opam/default/share/lem - mkdir -p /usr/home/opam/.opam/default/share/lem/library - cp library/*.lem /usr/home/opam/.opam/default/share/lem/library - cp library/*_constants /usr/home/opam/.opam/default/share/lem/library - /usr/local/bin/gmake -C ocaml-lib install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.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 - /usr/local/bin/gmake /usr/home/opam/.opam/default/lib/lem_zarith/META - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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 /usr/home/opam/.opam/default/lib lem_zarith - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/lem_zarith/META - ocamlfind install -destdir /usr/home/opam/.opam/default/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 /usr/home/opam/.opam/default/lib/lem_zarith/vector.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_machine_word.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_pervasives_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_pervasives.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_function.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/either.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_map_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_big_num.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_maybe_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pmap.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_num.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_list_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_maybe.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_basic_classes.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/xstring.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_bool.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_debug.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_string.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pset.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/bit.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_assert_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_tuple.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pset.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_relation.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/bit.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_word.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_list.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set_helpers.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_string_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/xstring.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_big_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_show.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pmap.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_map.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_either.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_num_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_function_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_show_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_sorting.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_word.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set_helpers.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_list.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/bit.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_relation.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_string_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_set_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_either.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_num_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_function_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_map.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_show.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/nat_big_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_show_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_sorting.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/vector.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/either.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_function.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_pervasives.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_machine_word.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_pervasives_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/vector.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational_impl.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/big_int_impl.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational_impl.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/big_int_impl.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/rational_impl.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/big_int_impl.mli - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pmap.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_maybe_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_map_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_debug.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_bool.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_basic_classes.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/xstring.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_maybe.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_list_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_tuple.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_assert_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/pset.cmi - Installed /usr/home/opam/.opam/default/lib/lem_zarith/lem_string.cmx - Installed /usr/home/opam/.opam/default/lib/lem_zarith/extract.a - Installed /usr/home/opam/.opam/default/lib/lem_zarith/extract.cmxa - Installed /usr/home/opam/.opam/default/lib/lem_zarith/extract.cma - Installed /usr/home/opam/.opam/default/lib/lem_zarith/META - touch /usr/home/opam/.opam/default/lib/lem_zarith/META - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.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 - /usr/local/bin/gmake /usr/home/opam/.opam/default/lib/lem_num/META - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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 /usr/home/opam/.opam/default/lib lem_num - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/lem_num/META - ocamlfind install -destdir /usr/home/opam/.opam/default/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 /usr/home/opam/.opam/default/lib/lem_num/xstring.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_sorting.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_tuple.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_map_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_pervasives.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/either.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_maybe.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_big_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_debug.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set_helpers.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_assert_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/vector.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_bool.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/rational.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_machine_word.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_basic_classes.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_function_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/bit.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_either.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_relation.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_map.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_list_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_num.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_maybe_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/bit.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/rational.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/pmap.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_show.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_show_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_string.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/vector.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_string_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_function.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/xstring.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_num_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/pset.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_list.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_pervasives_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_word.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/bit.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_maybe_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_show.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/rational.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/pmap.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_show_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_string.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/big_int_impl.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/rational_impl.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/big_int_impl.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/rational_impl.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/big_int_impl.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/rational_impl.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_big_num.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_list.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_word.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_pervasives_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/xstring.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/pset.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_num_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_function.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_string_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_map_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_tuple.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_sorting.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/pset.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_bool.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/vector.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_assert_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_set_helpers.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_debug.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_maybe.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/either.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_big_num.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_pervasives.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_function_extra.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_basic_classes.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_machine_word.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/pmap.mli - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_list_extra.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_relation.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_map.cmx - Installed /usr/home/opam/.opam/default/lib/lem_num/lem_either.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/nat_num.cmi - Installed /usr/home/opam/.opam/default/lib/lem_num/extract.a - Installed /usr/home/opam/.opam/default/lib/lem_num/extract.cmxa - Installed /usr/home/opam/.opam/default/lib/lem_num/extract.cma - Installed /usr/home/opam/.opam/default/lib/lem_num/META - touch /usr/home/opam/.opam/default/lib/lem_num/META - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/ocaml-lib' - /usr/local/bin/gmake /usr/home/opam/.opam/default/lib/lem/META - gmake[2]: Entering directory '/usr/home/opam/.opam/default/.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 /usr/home/opam/.opam/default/lib lem - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/lem/META - ocamlfind install -destdir /usr/home/opam/.opam/default/lib -patch-version "" lem META - Installed /usr/home/opam/.opam/default/lib/lem/META - touch /usr/home/opam/.opam/default/lib/lem/META - gmake[2]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/ocaml-lib' - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/lem.2022-12-10/ocaml-lib' - cp -R coq-lib /usr/home/opam/.opam/default/share/lem - cp -R hol-lib /usr/home/opam/.opam/default/share/lem - cp -R isabelle-lib /usr/home/opam/.opam/default/share/lem -> installed lem.2022-12-10 Processing 85/90: [linksem: gmake] + /usr/local/bin/gmake (CWD=/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8) - /usr/local/bin/gmake -C src - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8/src' - OCAMLPATH is - lem.mk:13: MAKECMDGOALS is - OCAML_TOPLEVEL_PATH=/usr/home/opam/.opam/default/lib/toplevel - CAML_LD_LIBRARY_PATH=/usr/home/opam/.opam/default/lib/stublibs:/usr/home/opam/.opam/default/lib/ocaml/stublibs:/usr/home/opam/.opam/default/lib/ocaml - fatal: not a git repository (or any of the parent directories): .git - 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 "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/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 "/usr/home/opam/.opam/default/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 "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 -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 "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 -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 "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 -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 "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 -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. - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8/src' -> compiled linksem.0.8 Processing 86/90: [linksem: gmake install] + /usr/local/bin/gmake "install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8) - /usr/local/bin/gmake -C src install - gmake[1]: Entering directory '/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8/src' - OCAMLPATH is - lem.mk:13: MAKECMDGOALS is install - OCAML_TOPLEVEL_PATH=/usr/home/opam/.opam/default/lib/toplevel - CAML_LD_LIBRARY_PATH=/usr/home/opam/.opam/default/lib/stublibs:/usr/home/opam/.opam/default/lib/ocaml/stublibs:/usr/home/opam/.opam/default/lib/ocaml - fatal: not a git repository (or any of the parent directories): .git - Makefile:11: warning: overriding recipe for target 'clean' - no_ocamlbuild.mk:116: warning: ignoring old recipe for target 'clean' - ocamlfind remove -destdir /usr/home/opam/.opam/default/lib linksem - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/linksem/META - ocamlfind install -destdir /usr/home/opam/.opam/default/lib -patch-version "0.8" linksem META - Installed /usr/home/opam/.opam/default/lib/linksem/META - touch /usr/home/opam/.opam/default/lib/linksem/META - ocamlfind remove -destdir /usr/home/opam/.opam/default/lib linksem_zarith - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/linksem_zarith/META - ocamlfind install -destdir /usr/home/opam/.opam/default/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 /usr/home/opam/.opam/default/lib/linksem_zarith/test_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf64_file_of_elf_memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/load.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/link.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linker_script.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linkable_list.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/input_list.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/command_line.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image_of_elf64_file.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/harness_interface.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/sail_interface.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abis.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_note.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_symbol_versioning.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_types_native_uint.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_capability.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_x86_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abstract_linker_script.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_abi.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_utilities.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image_orderings.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_classes.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ldconfig.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf_ctypes.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_file.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_note.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_section.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_segment.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/auxv.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/string_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/hex_printing.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_types_native_uint.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/archive.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern_extra.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_impl.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/default_printing.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/multimap.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/missing_pervasives.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ml_bindings.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/error.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/endianness.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/show.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint32_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint64_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint64_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint32_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/test_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/string_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/show.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/sail_interface.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/multimap.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ml_bindings.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/missing_pervasives.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image_orderings.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/load.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linker_script.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linkable_list.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/link.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ldconfig.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/input_list.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/hex_printing.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/harness_interface.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_types_native_uint.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_symbol_versioning.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_note.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_abi.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/error.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/endianness.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_types_native_uint.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_note.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_segment.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_section.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_file.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf_ctypes.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/default_printing.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/command_line.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_impl.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern_extra.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/auxv.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/archive.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abstract_linker_script.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abis.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_x86_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_utilities.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_classes.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_capability.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint64_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint32_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/test_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/string_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/show.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/sail_interface.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/multimap.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ml_bindings.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/missing_pervasives.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image_orderings.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/load.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linker_script.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linkable_list.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/link.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ldconfig.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/input_list.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/hex_printing.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/harness_interface.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_types_native_uint.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_symbol_versioning.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_note.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_abi.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/error.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/endianness.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_types_native_uint.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_note.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_segment.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_section.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_file.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf_ctypes.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/default_printing.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/command_line.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_impl.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern_extra.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/auxv.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/archive.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abstract_linker_script.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abis.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_x86_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_utilities.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_classes.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_capability.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint64_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/uint32_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/test_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/string_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/show.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/sail_interface.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/multimap.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ml_bindings.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/missing_pervasives.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image_orderings.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/load.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linker_script.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linkable_list.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/link.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/ldconfig.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/input_list.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/hex_printing.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/harness_interface.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_types_native_uint.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_symbol_versioning.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_note.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/gnu_ext_abi.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/filesystem.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/error.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/endianness.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_types_native_uint.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_note.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_segment.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_interpreted_section.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_file.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf_ctypes.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/dwarf.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/default_printing.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/command_line.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence_impl.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_sequence.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern_extra.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/byte_pattern.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/auxv.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/archive.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abstract_linker_script.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abis.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_x86_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_utilities.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_riscv.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_power64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_mips64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_classes.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64_capability.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_cheri_mips64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_amd64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/abi_aarch64_le.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linksem.a - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linksem.cmxa - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/linksem.cma - Installed /usr/home/opam/.opam/default/lib/linksem_zarith/META - touch /usr/home/opam/.opam/default/lib/linksem_zarith/META - ocamlfind remove -destdir /usr/home/opam/.opam/default/lib linksem_num - ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/default/lib/linksem_num/META - ocamlfind install -destdir /usr/home/opam/.opam/default/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 /usr/home/opam/.opam/default/lib/linksem_num/test_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf64_file_of_elf_memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/load.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/link.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/linker_script.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/linkable_list.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/input_list.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/command_line.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image_of_elf64_file.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/harness_interface.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/sail_interface.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abis.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_note.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_to_segment_mapping.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_symbol_versioning.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_types_native_uint.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_capability.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_x86_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abstract_linker_script.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_serialisation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_abi.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_utilities.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image_orderings.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_classes.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/ldconfig.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf_ctypes.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_dynamic.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_file.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_note.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_section.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_segment.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_relocation.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_section_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_program_header_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_symbol_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_header.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/auxv.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/string_table.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/hex_printing.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_types_native_uint.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/archive.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern_extra.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_impl.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/default_printing.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/multimap.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/missing_pervasives.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/ml_bindings.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/error.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/endianness.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/show.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint32_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint64_wrapper.ml - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint64_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint32_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/test_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/string_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/show.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/sail_interface.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/multimap.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/ml_bindings.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/missing_pervasives.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image_orderings.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/load.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/linker_script.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/linkable_list.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/link.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/ldconfig.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/input_list.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/hex_printing.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/harness_interface.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_types_native_uint.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_symbol_versioning.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_note.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_abi.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/error.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/endianness.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_types_native_uint.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_note.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image_of_elf64_file.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_segment.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_section.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_file.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf64_file_of_elf_memory_image.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf_ctypes.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/default_printing.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/command_line.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_wrapper.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_impl.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern_extra.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/auxv.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/archive.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abstract_linker_script.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abis.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_x86_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_utilities.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_classes.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_dynamic.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_capability.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_symbol_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_section_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_relocation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_program_header_table.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_serialisation.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_elf_header.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le.cmt - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint64_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint32_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/test_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/string_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/show.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/sail_interface.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/multimap.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/ml_bindings.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/missing_pervasives.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image_orderings.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/load.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/linker_script.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/linkable_list.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/link.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/ldconfig.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/input_list.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/hex_printing.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/harness_interface.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_types_native_uint.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_symbol_versioning.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_note.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_abi.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/error.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/endianness.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_types_native_uint.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_note.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image_of_elf64_file.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_segment.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_section.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_file.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf64_file_of_elf_memory_image.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf_ctypes.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/default_printing.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/command_line.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_wrapper.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_impl.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern_extra.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/auxv.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/archive.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abstract_linker_script.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abis.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_x86_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_utilities.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_classes.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_dynamic.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_capability.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_symbol_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_section_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_relocation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_program_header_table.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_serialisation.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_elf_header.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le.cmx - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint64_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/uint32_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/test_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/string_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/show.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/sail_interface.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/multimap.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/ml_bindings.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/missing_pervasives.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image_orderings.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/load.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/linker_script.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/linkable_list.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/link.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/ldconfig.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/input_list.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/hex_printing.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/harness_interface.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_types_native_uint.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_symbol_versioning.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_note.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/gnu_ext_abi.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/filesystem.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/error.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/endianness.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_types_native_uint.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_note.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image_of_elf64_file.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_segment.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_interpreted_section.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_file.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/elf64_file_of_elf_memory_image.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf_ctypes.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/dwarf.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/default_printing.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/command_line.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_wrapper.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence_impl.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_sequence.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern_extra.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/byte_pattern.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/auxv.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/archive.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abstract_linker_script.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abis.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_x86_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_utilities.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_riscv.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_power64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_mips64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_classes.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_dynamic.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64_capability.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_cheri_mips64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_amd64.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_symbol_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_section_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_relocation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_program_header_table.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_serialisation.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le_elf_header.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/abi_aarch64_le.cmi - Installed /usr/home/opam/.opam/default/lib/linksem_num/linksem.a - Installed /usr/home/opam/.opam/default/lib/linksem_num/linksem.cmxa - Installed /usr/home/opam/.opam/default/lib/linksem_num/linksem.cma - Installed /usr/home/opam/.opam/default/lib/linksem_num/META - touch /usr/home/opam/.opam/default/lib/linksem_num/META - gmake[1]: Leaving directory '/usr/home/opam/.opam/default/.opam-switch/build/linksem.0.8/src' -> installed linksem.0.8 Processing 87/90: [libsail: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "libsail" "-j" "1" "--promote-install-files=false" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/libsail.0.15) - (cd _build/default/src/lib && /usr/home/opam/.opam/default/bin/ott -sort false -generate_aux_rules true -o ast.lem -picky_multiple_parses true ../../language/sail.ott) - Ott version 0.33 distribution of Mon 16 Jan 15:32:01 GMT 2023 - (cd _build/default/src/lib && /usr/home/opam/.opam/default/bin/ott -sort false -generate_aux_rules true -o jib.lem -picky_multiple_parses true ../../language/jib.ott) - Ott version 0.33 distribution of Mon 16 Jan 15:32:01 GMT 2023 Processing 87/90: [libsail: dune install] + /usr/home/opam/.opam/default/bin/dune "install" "-p" "libsail" "--create-install-files" "libsail" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/libsail.0.15) -> compiled libsail.0.15 -> installed libsail.0.15 Processing 89/90: [sail_output: dune build] + /usr/home/opam/.opam/default/bin/dune "build" "-p" "sail_output" "-j" "1" "--promote-install-files=false" "@install" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/sail_output.0.15) Processing 89/90: [sail_output: dune install] + /usr/home/opam/.opam/default/bin/dune "install" "-p" "sail_output" "--create-install-files" "sail_output" (CWD=/usr/home/opam/.opam/default/.opam-switch/build/sail_output.0.15) -> compiled sail_output.0.15 -> installed sail_output.0.15 Done. 2023-08-28 02:15.40 ---> saved as "1f8705aefe18b0df895cba5954fb3e87b453b56759e78a0863e47c1b64c5e3e8" Job succeeded