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


Building on summer

(from freebsd-ocaml-5.0)
2023-09-17 13:56.25 ---> using "b0ee167c73857b60ecf6c06eff6bbe96857a02ac84fefd2b9807cb2eea16bf97" 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-09-17 13:56.25 ---> using "58da31f76f3dd28576bb2b11a05c1473a2cbc0bc8e959f83414ab7001888e94f" 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 b61304c6db353e679a36720d8b914b029d6fbc0c"))
2023-09-17 13:56.26 ---> using "8d3da13405344b39e752afb838c3c735052c4eec4b16365a8f42fa332f48db13" 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-09-17 13:56.26 ---> using "8116be61a4c735c894d82723f81082e77bc159c30ffe9a35227f19965692cf33" from cache

/: (run (cache (opam-archives (target /usr/home/opam/.opam/download-cache)))
        (network host)
        (shell "opam switch create --repositories=default '4.14.1' '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  (cached)
-> installed ocaml-base-compiler.4.14.1
-> installed ocaml-config.2
-> installed ocaml.4.14.1
Done.
# Run eval $(opam env --switch=4.14.1) to update the current shell environment
2023-09-17 13:56.26 ---> using "d74ca11c81cb94850460e040b430ca34af571abb56e8a7a8f872c85baa4c4e5d" from cache

/: (run (network host)
        (shell "opam update --depexts"))
[WARNING] Unknown update command for bsd, skipping system update
2023-09-17 13:56.26 ---> using "c0b3aedd2094499d94806c83a2a6d025c18f903b4e4191cfd35f3ee66a43d1bd" from cache

/: (run (cache (opam-archives (target /usr/home/opam/.opam/download-cache)))
        (network host)
        (shell  "\
               \nopam remove -y \"sail.0.16\"\
               \nopam install -vy \"sail.0.16\"\
               \nres=$?\
               \nif [ $res = 31 ]; then\
               \n    if opam show -f x-ci-accept-failures: \"sail.0.16\" | 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.0.16 is not installed.

Nothing to do.
The following actions will be performed:
  - install conf-findutils     1          [required by lem]
  - install dune               3.10.0     [required by sail]
  - 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 conf-gmp           4          [required by libsail]
  - install conf-pkg-config    3          [required by conf-zlib]
  - install stdlib-shims       0.3.0      [required by ocamlgraph]
  - install sail_manifest      0.16       [required by sail]
  - install result             1.5        [required by linenoise]
  - install pprint             20230830   [required by libsail]
  - install pp                 1.2.0      [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 base64             3.5.1
  - install num                1.4        [required by lem]
  - install base-bytes         base
  - install zarith             1.13       [required by lem]
  - install conf-zlib          1          [required by libsail]
  - install ocamlgraph         2.1.0      [required by ott]
  - install linenoise          1.4.0      [required by sail]
  - 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 omd                1.3.2
  - 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.16       [required by sail]
  - install sail_smt_backend   0.16
  - install sail_output        0.16
  - install sail_ocaml_backend 0.16
  - install sail_lem_backend   0.16
  - install sail_latex_backend 0.16
  - install sail_doc_backend   0.16
  - install sail_coq_backend   0.16
  - install sail_c_backend     0.16
  - install sail               0.16
===== 44 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...
- [summer] Fetching packagesite.pkg: .......... done
- Processing entries: .
- ..
- ..
- ..
- ..
- . done
- FreeBSD repository update completed. 33871 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.
- [summer] [1/1] Fetching gmp-6.2.1.pkg: .......... done
- Checking integrity... done (0 conflicting)
- [summer] [1/1] Installing gmp-6.2.1...
- [summer] [1/1] Extracting gmp-6.2.1: .......... done

<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
Processing  2/132:
Processing  3/132:
Processing  4/132:
Processing  5/132:
Processing  6/132:
Processing  7/132:
Processing  8/132:
Processing  9/132: [conf-findutils: sh find . -name .]
Processing 10/132: [conf-findutils: sh find . -name .] [conf-gmp: sh]
Processing 11/132: [conf-findutils: sh find . -name .] [conf-gmp: sh] [conf-pkg-config: pkg-config]
- + find . -name .
- .
-> compiled  conf-findutils.1
Processing 11/132: [conf-gmp: sh] [conf-pkg-config: pkg-config]
-> installed conf-findutils.1
Processing 12/132: [conf-gmp: sh] [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 12/132: [conf-gmp: sh]
-> installed conf-pkg-config.3
Processing 13/132: [conf-gmp: sh]
Processing 14/132: [conf-gmp: sh] [conf-zlib: pkg-config zlib]
-> retrieved csexp.1.5.2  (cached)
Processing 15/132: [conf-gmp: sh] [conf-zlib: pkg-config zlib]
-> compiled  conf-zlib.1
Processing 15/132: [conf-gmp: sh]
-> installed conf-zlib.1
Processing 16/132: [conf-gmp: sh]
- + cc -c -I/usr/local/include test.c
-> compiled  conf-gmp.4
Processing 16/132:
-> installed conf-gmp.4
Processing 17/132:
-> retrieved cppo.1.6.9  (cached)
Processing 18/132:
-> retrieved base64.3.5.1  (cached)
Processing 19/132:
-> retrieved dune.3.10.0  (cached)
Processing 20/132:
Processing 21/132: [dune: ocaml 15]
-> retrieved dyn.3.10.0  (cached)
Processing 22/132: [lem.2022-12-10: http] [dune: ocaml 15]
-> retrieved dune-site.3.10.0  (cached)
Processing 23/132: [lem.2022-12-10: http] [libsail.0.16: http] [dune: ocaml 15]
Processing 23/132: [libsail.0.16: http] [dune: ocaml 15]
-> retrieved dune-private-libs.3.10.0  (cached)
Processing 24/132: [libsail.0.16: http] [dune: ocaml 15]
-> retrieved linenoise.1.4.0  (cached)
Processing 25/132: [libsail.0.16: http] [linksem.0.8: http] [dune: ocaml 15]
-> retrieved lem.2022-12-10  (https://github.com/rems-project/lem/archive/2022-12-10.tar.gz)
Processing 26/132: [libsail.0.16: http] [linksem.0.8: http] [dune: ocaml 15]
Processing 26/132: [linksem.0.8: http] [dune: ocaml 15]
-> retrieved menhir.20230608  (cached)
Processing 27/132: [linksem.0.8: http] [dune: ocaml 15]
Processing 27/132: [dune: ocaml 15]
-> retrieved menhirLib.20230608  (cached)
Processing 28/132: [dune: ocaml 15]
-> retrieved linksem.0.8  (https://github.com/rems-project/linksem/archive/0.8.tar.gz)
Processing 29/132: [dune: ocaml 15]
-> retrieved menhirSdk.20230608  (cached)
Processing 30/132: [dune: ocaml 15]
-> retrieved num.1.4  (cached)
Processing 31/132: [dune: ocaml 15]
-> retrieved libsail.0.16  (https://github.com/rems-project/sail/releases/download/0.16/sail-0.16.tbz)
Processing 32/132: [dune: ocaml 15]
-> retrieved ocamlfind.1.9.6  (cached)
Processing 33/132: [omd.1.3.2: http] [dune: ocaml 15]
[ocamlfind: patch] applying 0001-Harden-test-for-OCaml-5.patch
Processing 34/132: [omd.1.3.2: http] [dune: ocaml 15] [ocamlfind: patch]
Processing 34/132: [dune: ocaml 15] [ocamlfind: patch]
Processing 34/132: [dune: ocaml 15] [ocamlfind: ./configure]
-> retrieved ocamlgraph.2.1.0  (cached)
Processing 35/132: [dune: ocaml 15] [ocamlfind: ./configure]
-> retrieved omd.1.3.2  (https://github.com/ocaml/omd/releases/download/1.3.2/omd-1.3.2.tbz)
Processing 36/132: [ott.0.33: http] [dune: ocaml 15] [ocamlfind: ./configure]
- 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/4.14.1/lib/ocaml
-     Binaries:              /usr/home/opam/.opam/4.14.1/bin
-     Manual pages:          /usr/home/opam/.opam/4.14.1/man
-     Multi-threading type:  posix
- The directory of site-specific packages will be
-     site-lib:              /usr/home/opam/.opam/4.14.1/lib
- The configuration file is written to:
-     findlib config file:   /usr/home/opam/.opam/4.14.1/lib/findlib.conf
- Software will be installed:
-     Libraries:             in <site-lib>/findlib
-     Binaries:              /usr/home/opam/.opam/4.14.1/bin
-     Manual pages:          /usr/home/opam/.opam/4.14.1/man
-     topfind script:        /usr/home/opam/.opam/4.14.1/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 36/132: [ott.0.33: http] [dune: ocaml 15] [ocamlfind: gmake all]
-> retrieved ocamlbuild.0.14.2  (cached)
Processing 37/132: [ott.0.33: http] [dune: ocaml 15] [ocamlfind: gmake all]
Processing 38/132: [ott.0.33: http] [dune: ocaml 15] [ocamlbuild: gmake configure.make] [ocamlfind: gmake all]
-> retrieved pp.1.2.0  (cached)
Processing 39/132: [ott.0.33: http] [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake configure.make] [ocamlfind: gmake all]
- (echo "# This file was generated from configure.make"; \
- echo ;\
- echo "OCAML_PREFIX="; \
- echo "OCAML_BINDIR=/usr/home/opam/.opam/4.14.1/bin"; \
- echo "OCAML_LIBDIR=/usr/home/opam/.opam/4.14.1/lib/ocaml"; \
- echo "OCAML_MANDIR=/usr/home/opam/.opam/4.14.1/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/4.14.1"; \
- echo "BINDIR=/usr/home/opam/.opam/4.14.1/bin"; \
- echo "LIBDIR=/usr/home/opam/.opam/4.14.1/lib"; \
- echo "MANDIR=/usr/home/opam/.opam/4.14.1/man"; \
- ) > Makefile.config
- (echo "(* This file was generated from ../configure.make *)"; \
- echo ;\
- echo 'let bindir = "/usr/home/opam/.opam/4.14.1/bin"'; \
- echo 'let libdir = "/usr/home/opam/.opam/4.14.1/lib"'; \
- echo 'let ocaml_libdir = "/usr/home/opam/.opam/4.14.1/lib/ocaml"'; \
- echo 'let libdir_abs = "/usr/home/opam/.opam/4.14.1/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 39/132: [ott.0.33: http] [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
Processing 39/132: [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
-> retrieved ordering.3.10.0  (cached)
Processing 40/132: [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
-> retrieved ott.0.33  (https://github.com/ott-lang/ott/archive/0.33.tar.gz)
Processing 41/132: [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
-> retrieved result.1.5  (cached)
Processing 42/132: [pprint.20230830: http] [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
Processing 42/132: [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake all]
- for p in findlib; do ( cd src/$p; /usr/local/bin/gmake all ) || exit; done
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib/findlib.conf' | \
-          ../../tools/patch '@STDLIB@' '/usr/home/opam/.opam/4.14.1/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/4.14.1/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/4.14.1/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- /usr/local/bin/gmake all-config
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlfind.1.9.6'
- USE_CYGPATH="0"; \
- export USE_CYGPATH; \
- cat findlib.conf.in | \
-      tools/patch '@SITELIB@' '/usr/home/opam/.opam/4.14.1/lib' | \
- 		 tools/patch '@FINDLIB_PATH@' '/usr/home/opam/.opam/4.14.1/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/4.14.1/.opam-switch/build/ocamlfind.1.9.6'
Processing 42/132: [dune: ocaml 15] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
- ocamlc -output-complete-exe -w -24 -g -o .duneboot.exe -I boot unix.cma boot/libs.ml boot/duneboot.ml
- ./.duneboot.exe -j 15
- 

Processing 42/132: [dune: ./_boot/dune.exe build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
-> retrieved pprint.20230830  (https://github.com/fpottier/pprint/archive/20230830.tar.gz)
Processing 43/132: [dune: ./_boot/dune.exe build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
-> compiled  dune.3.10.0
Processing 43/132: [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
-> installed dune.3.10.0
Processing 44/132: [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 45/132: [base64: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 46/132: [base64: dune build] [cppo: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 47/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 48/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 49/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt]
Processing 50/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm]
Processing 51/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pp: dune build]
Processing 52/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pp: dune build] [pprint: dune build]
Processing 53/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pp: dune build] [pprint: dune build] [result: dune build]
-> compiled  pp.1.2.0
Processing 53/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pprint: dune build] [result: dune build]
-> installed pp.1.2.0
Processing 54/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [menhirSdk: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pprint: dune build] [result: dune build]
-> compiled  menhirSdk.20230608
Processing 54/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pprint: dune build] [result: dune build]
-> installed menhirSdk.20230608
Processing 55/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: rm] [pprint: dune build] [result: dune build]
Processing 55/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhirLib: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
- (cd _build/default/lib/pack && ./pack.exe)
- Creating menhirLib.ml...
- Creating menhirLib.mli...
-> compiled  menhirLib.20230608
Processing 55/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> installed menhirLib.20230608
Processing 56/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
Processing 57/132: [base64: dune build] [cppo: dune build] [csexp: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> compiled  csexp.1.5.2
Processing 57/132: [base64: dune build] [cppo: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> installed csexp.1.5.2
Processing 58/132: [base64: dune build] [cppo: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> compiled  cppo.1.6.9
Processing 58/132: [base64: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> installed cppo.1.6.9
Processing 59/132: [base64: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> compiled  base64.3.5.1
Processing 59/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
-> installed base64.3.5.1
Processing 60/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake opt] [ordering: dune build] [pprint: dune build] [result: dune build]
- for p in findlib; do ( cd src/$p; /usr/local/bin/gmake opt ) || exit; done
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
-> compiled  ocamlfind.1.9.6
Processing 60/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ordering: dune build] [pprint: dune build] [result: dune build]
Processing 61/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ordering: dune build] [pprint: dune build] [result: dune build] [ocamlfind: gmake install]
-> compiled  ordering.3.10.0
Processing 61/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [pprint: dune build] [result: dune build] [ocamlfind: gmake install]
-> compiled  result.1.5
Processing 61/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [pprint: dune build] [ocamlfind: gmake install]
-> compiled  pprint.20230830
Processing 61/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake install]
-> retrieved sail_c_backend.0.16  (cached)
Processing 62/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [ocamlfind: gmake install]
- if [ "1" -eq 1 ]; then \
-     for x in camlp4 dbm graphics labltk num ocamlbuild; do \
-       if [ -f "/usr/home/opam/.opam/4.14.1/lib/$x/META" ]; then \
-         if ! grep -Fq '[distributed with Ocaml]' "//usr/home/opam/.opam/4.14.1/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/4.14.1/bin"
- install -d "/usr/home/opam/.opam/4.14.1/man"
- /usr/local/bin/gmake install-config
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlfind.1.9.6'
- install -d "`dirname \"/usr/home/opam/.opam/4.14.1/lib/findlib.conf\"`"
- test -f "/usr/home/opam/.opam/4.14.1/lib/findlib.conf" || install -c findlib.conf "/usr/home/opam/.opam/4.14.1/lib/findlib.conf"
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- install -d "/usr/home/opam/.opam/4.14.1/lib/findlib"
- install -d "/usr/home/opam/.opam/4.14.1/bin"
- test 1 -eq 0 || install -d "/usr/home/opam/.opam/4.14.1/lib/ocaml"
- test 1 -eq 0 || install -c topfind "/usr/home/opam/.opam/4.14.1/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/4.14.1/lib/findlib/"
- f="ocamlfind"; { test -f ocamlfind_opt && f="ocamlfind_opt"; }; \
- install -c $f "/usr/home/opam/.opam/4.14.1/bin/ocamlfind"
- # the following "if" block is only needed for 4.00beta2
- if [ 1 -eq 0 -a -f "/usr/home/opam/.opam/4.14.1/lib/ocaml/compiler-libs/topdirs.cmi" ]; then \
-     cd "/usr/home/opam/.opam/4.14.1/lib/ocaml/compiler-libs/"; \
-     install -c topdirs.cmi toploop.cmi "/usr/home/opam/.opam/4.14.1/lib/findlib/"; \
- fi
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlfind.1.9.6/src/findlib'
- /usr/local/bin/gmake install-meta
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib/$x"; install -c site-lib-src/$x/META "/usr/home/opam/.opam/4.14.1/lib/$x/META.tmp" && mv "/usr/home/opam/.opam/4.14.1/lib/$x/META.tmp" "/usr/home/opam/.opam/4.14.1/lib/$x/META"; done
- install -d "/usr/home/opam/.opam/4.14.1/lib/findlib"; install -c Makefile.packages "/usr/home/opam/.opam/4.14.1/lib/findlib/Makefile.packages"
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/bin"
- /usr/local/bin/gmake install-doc
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlfind.1.9.6'
- install -d "/usr/home/opam/.opam/4.14.1/man/man1" "/usr/home/opam/.opam/4.14.1/man/man3" "/usr/home/opam/.opam/4.14.1/man/man5"
- install -c doc/ref-man/ocamlfind.1 "/usr/home/opam/.opam/4.14.1/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/4.14.1/man/man5"
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlfind.1.9.6'
-> installed ocamlfind.1.9.6
Processing 62/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled]
Processing 63/132: [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled]
Processing 64/132: [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled]
-> installed base-bytes.base
Processing 65/132: [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled]
Processing 66/132: [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
-> installed ordering.3.10.0
Processing 67/132: [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
Processing 68/132: [dyn: rm] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
-> installed pprint.20230830
Processing 69/132: [dyn: rm] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
-> installed result.1.5
Processing 70/132: [dyn: rm] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
Processing 71/132: [dyn: rm] [linenoise: dune build] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
-> retrieved sail_coq_backend.0.16  (cached)
Processing 72/132: [dyn: rm] [linenoise: dune build] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
Processing 72/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
-> retrieved sail.0.16  (cached)
Processing 73/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [num: gmake] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
- /usr/local/bin/gmake -C src all
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/num.1.4/src'
- /usr/local/bin/gmake -C toplevel all
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/num.1.4/toplevel'
-> compiled  num.1.4
Processing 73/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build]
Processing 74/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [ocamlbuild: gmake check-if-preinstalled] [omd: dune build] [num: ocamlfind remove]
- if test -d /usr/home/opam/.opam/4.14.1/lib/ocaml/ocamlbuild; then\
-   >&2 echo "ERROR: Preinstalled ocamlbuild detected at"\
-        "/usr/home/opam/.opam/4.14.1/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/4.14.1/.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/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- /usr/local/bin/gmake install-lib-opam
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- /usr/local/bin/gmake install-lib-byte-opam
- gmake[3]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- /usr/local/bin/gmake install-lib-native-opam
- gmake[3]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- echo ']' >> ocamlbuild.install
- echo >> ocamlbuild.install
- gmake[2]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- /usr/local/bin/gmake install-man-opam
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- /usr/local/bin/gmake install-doc-opam
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ocamlbuild.0.14.2'
-> compiled  ocamlbuild.0.14.2
Processing 74/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [omd: dune build] [num: ocamlfind remove]
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/num/META
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/num-top/META
Processing 74/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [omd: dune build] [num: gmake install]
- /usr/local/bin/gmake -C src install
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/num.1.4/src'
- install -d /usr/home/opam/.opam/4.14.1/lib/ocaml
- sed -e 's/%%VERSION%%/1.4/g' META.in > META
- ocamlfind install num META
- Installed /usr/home/opam/.opam/4.14.1/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/4.14.1/lib/ocaml
- install -d /usr/home/opam/.opam/4.14.1/lib/ocaml/stublibs
- install dllnums.so /usr/home/opam/.opam/4.14.1/lib/ocaml/stublibs
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/num.1.4/src'
- /usr/local/bin/gmake -C toplevel install
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib/num-top/num_top_printers.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/num-top/num_top.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/num-top/num_top.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/num-top/META
- rm -f META
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/num.1.4/toplevel'
-> installed num.1.4
Processing 74/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [omd: dune build]
-> installed ocamlbuild.0.14.2
Processing 75/132: [dyn: dune build] [linenoise: dune build] [menhir: dune build] [omd: dune build]
- (cd _build/default/src && /usr/bin/cc -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -D_FILE_OFFSET_BITS=64 -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -g -I /usr/home/opam/.opam/4.14.1/lib/ocaml -I /usr/home/opam/.opam/4.14.1/lib/result -o linenoise_stubs.o -c linenoise_stubs.c)
- linenoise_stubs.c:39:5: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-                          caml_strdup(String_val(new_completion)));
-                          ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- <scratch space>:128:6: note: expanded from here
-  GCC warning "\"caml_strdup\" is deprecated: use \"caml_stat_strdup\" instead"
-      ^
- linenoise_stubs.c:60:17: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-     char *msg = caml_strdup(String_val(Field(Field(cb_result, 0), 0)));
-                 ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- <scratch space>:145:6: note: expanded from here
-  GCC warning "\"caml_strdup\" is deprecated: use \"caml_stat_strdup\" instead"
-      ^
- linenoise_stubs.c:82:34: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-   const char *result = linenoise(caml_strdup(String_val(prompt)));
-                                  ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- <scratch space>:180:6: note: expanded from here
-  GCC warning "\"caml_strdup\" is deprecated: use \"caml_stat_strdup\" instead"
-      ^
- linenoise_stubs.c:98:42: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-   CAMLreturn(Val_int(linenoiseHistoryAdd(caml_strdup(String_val(line)))));
-                                          ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- linenoise_stubs.c:110:43: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-   CAMLreturn(Val_int(linenoiseHistorySave(caml_strdup(String_val(filename)))));
-                                           ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- linenoise_stubs.c:116:43: warning: "caml_strdup" is deprecated: use "caml_stat_strdup" instead [-W#pragma-messages]
-   CAMLreturn(Val_int(linenoiseHistoryLoad(caml_strdup(String_val(filename)))));
-                                           ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:420:4: note: expanded from macro 'caml_strdup'
-    CAML_DEPRECATED("caml_strdup", "caml_stat_strdup") \
-    ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:58:3: note: expanded from macro 'CAML_DEPRECATED'
-   CAML_PREPROWARNING(name1 is deprecated: use name2 instead)
-   ^
- /usr/home/opam/.opam/4.14.1/lib/ocaml/caml/misc.h:56:31: note: expanded from macro 'CAML_PREPROWARNING'
- #define CAML_PREPROWARNING(x) _Pragma(CAML_MAKEWARNING2(x))
-                               ^
- 6 warnings generated.
-> compiled  linenoise.1.4.0
Processing 75/132: [dyn: dune build] [menhir: dune build] [omd: dune build]
-> installed linenoise.1.4.0
Processing 76/132: [dyn: dune build] [menhir: dune build] [omd: dune build]
-> compiled  dyn.3.10.0
Processing 76/132: [menhir: dune build] [omd: dune build]
-> installed dyn.3.10.0
Processing 77/132: [menhir: dune build] [omd: dune build]
-> compiled  omd.1.3.2
Processing 77/132: [menhir: dune build]
-> installed omd.1.3.2
Processing 78/132: [menhir: dune build]
-> retrieved sail_doc_backend.0.16  (cached)
Processing 79/132: [menhir: dune build]
-> retrieved sail_lem_backend.0.16  (cached)
Processing 80/132: [menhir: dune build]
-> retrieved sail_latex_backend.0.16  (cached)
Processing 81/132: [menhir: dune build]
-> retrieved sail_manifest.0.16  (cached)
Processing 82/132: [menhir: dune build]
Processing 83/132: [menhir: dune build] [sail_manifest: dune build]
-> retrieved sail_output.0.16  (cached)
Processing 84/132: [menhir: dune build] [sail_manifest: dune build]
Processing 85/132: [menhir: dune build] [sail_manifest: dune build]
Processing 86/132: [menhir: dune build] [sail_manifest: dune build]
-> installed seq.base
Processing 87/132: [menhir: dune build] [sail_manifest: dune build]
-> retrieved stdlib-shims.0.3.0  (cached)
Processing 88/132: [menhir: dune build] [sail_manifest: dune build]
Processing 89/132: [menhir: dune build] [sail_manifest: dune build] [stdlib-shims: dune build]
Processing 89/132: [menhir: dune build] [sail_manifest: dune install] [stdlib-shims: dune build]
-> retrieved sail_smt_backend.0.16  (cached)
Processing 90/132: [menhir: dune build] [sail_manifest: dune install] [stdlib-shims: dune build]
-> compiled  sail_manifest.0.16
Processing 90/132: [menhir: dune build] [stdlib-shims: dune build]
-> installed sail_manifest.0.16
Processing 91/132: [menhir: dune build] [stdlib-shims: dune build]
-> compiled  stdlib-shims.0.3.0
Processing 91/132: [menhir: dune build]
-> installed stdlib-shims.0.3.0
Processing 92/132: [menhir: dune build]
Processing 93/132: [menhir: dune build] [ocamlgraph: dune build]
-> retrieved yojson.2.1.0  (cached)
Processing 94/132: [menhir: dune build] [ocamlgraph: dune build]
Processing 95/132: [menhir: dune build] [ocamlgraph: dune build] [yojson: dune build]
-> retrieved zarith.1.13  (cached)
Processing 96/132: [menhir: dune build] [ocamlgraph: dune build] [yojson: dune build] [zarith: sh]
-> retrieved stdune.3.10.0  (cached)
Processing 97/132: [menhir: dune build] [ocamlgraph: dune build] [stdune: rm] [yojson: dune build] [zarith: sh]
- + LDFLAGS=' -L/usr/local/lib' CFLAGS=' -I/usr/local/include' ./configure
- binary ocaml: found in /usr/home/opam/.opam/4.14.1/bin
- binary ocamlc: found in /usr/home/opam/.opam/4.14.1/bin
- binary ocamldep: found in /usr/home/opam/.opam/4.14.1/bin
- binary ocamlmklib: found in /usr/home/opam/.opam/4.14.1/bin
- binary ocamldoc: found in /usr/home/opam/.opam/4.14.1/bin
- binary ocamlopt: found in /usr/home/opam/.opam/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/lib
-   installation method   findlib
- 
- configuration successful!
- now type "make" to build
- then type "make install" or "sudo make install" to install
Processing 97/132: [menhir: dune build] [ocamlgraph: dune build] [stdune: rm] [yojson: dune build] [zarith: gmake]
-> retrieved sail_ocaml_backend.0.16  (cached)
- (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/4.14.1/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 97/132: [menhir: dune build] [ocamlgraph: dune build] [stdune: rm] [yojson: dune build]
Processing 98/132: [menhir: dune build] [ocamlgraph: dune build] [stdune: rm] [yojson: dune build] [zarith: gmake install]
-> compiled  yojson.2.1.0
Processing 98/132: [menhir: dune build] [ocamlgraph: dune build] [stdune: rm] [zarith: gmake install]
-> compiled  ocamlgraph.2.1.0
Processing 98/132: [menhir: dune build] [stdune: rm] [zarith: gmake install]
- (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
Processing 98/132: [stdune: rm] [zarith: gmake install]
Processing 98/132: [stdune: dune build] [zarith: gmake install]
- ocamlfind install -destdir "/usr/home/opam/.opam/4.14.1/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/4.14.1/lib/zarith/big_int_Z.cmti
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/q.cmti
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/z.cmti
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith.a
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/big_int_Z.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/q.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith.h
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith.cmxs
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/big_int_Z.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/q.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/z.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith_version.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith.cmxa
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/z.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith_top.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/big_int_Z.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/q.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/z.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/libzarith.a
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/zarith.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/stublibs/dllzarith.so
- Installed /usr/home/opam/.opam/4.14.1/lib/stublibs/dllzarith.so.owner
- ocamlfind: [WARNING] You have installed DLLs but the directory /usr/home/opam/.opam/4.14.1/lib/stublibs is not mentioned in ld.conf
- Installed /usr/home/opam/.opam/4.14.1/lib/zarith/META
-> installed zarith.1.13
Processing 98/132: [stdune: dune build]
Processing 99/132: [lem: gmake] [stdune: dune build]
-> installed menhir.20230608
Processing 100/132: [lem: gmake] [stdune: dune build]
-> installed ocamlgraph.2.1.0
Processing 101/132: [lem: gmake] [stdune: dune build]
Processing 102/132: [lem: gmake] [ott: gmake world] [stdune: dune build]
-> installed yojson.2.1.0
Processing 103/132: [lem: gmake] [ott: gmake world] [stdune: dune build]
-> compiled  stdune.3.10.0
Processing 103/132: [lem: gmake] [ott: gmake world]
-> installed stdune.3.10.0
Processing 104/132: [lem: gmake] [ott: gmake world]
Processing 105/132: [dune-private-libs: rm] [lem: gmake] [ott: gmake world]
- cd src; /usr/local/bin/gmake install
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.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/4.14.1/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/4.14.1/.opam-switch/build/ott.0.33/src'
- cp ./ott ../bin/ott
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/ott.0.33/src'
Processing 105/132: [dune-private-libs: rm] [lem: gmake] [ott: gmake ott.install]
Processing 105/132: [dune-private-libs: dune build] [lem: gmake] [ott: gmake ott.install]
- 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 105/132: [dune-private-libs: dune build] [lem: gmake]
-> installed ott.0.33
Processing 106/132: [dune-private-libs: dune build] [lem: gmake]
-> compiled  dune-private-libs.3.10.0
Processing 106/132: [lem: gmake]
-> installed dune-private-libs.3.10.0
Processing 107/132: [lem: gmake]
Processing 108/132: [dune-site: rm] [lem: gmake]
Processing 108/132: [dune-site: dune build] [lem: gmake]
-> compiled  dune-site.3.10.0
Processing 108/132: [lem: gmake]
-> installed dune-site.3.10.0
Processing 109/132: [lem: gmake]
+ /usr/local/bin/gmake "INSTALL_DIR=/usr/home/opam/.opam/4.14.1" (CWD=/usr/home/opam/.opam/4.14.1/.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/4.14.1/share/lem\" >> src/share_directory.ml
- /usr/local/bin/gmake -C src all
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/bin/ocamllex.opt -q lexer.mll
- ocamlfind ocamldep -package zarith -modules lexer.ml > lexer.ml.depends
- /usr/home/opam/.opam/4.14.1/bin/ocamlyacc parser.mly
- + /usr/home/opam/.opam/4.14.1/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/4.14.1/.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/4.14.1/.opam-switch/build/lem.2022-12-10/library'
- /usr/local/bin/gmake -C .. build-lem
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/share/lem\" >> src/share_directory.ml
- /usr/local/bin/gmake -C src all
- gmake[3]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/lem.2022-12-10/src'
- ln -sf src/main.native lem
- gmake[2]: Leaving directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.opam-switch/build/lem.2022-12-10/library'
- /usr/local/bin/gmake ocaml-libs
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10'
- /usr/local/bin/gmake -C ocaml-lib all
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/.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/4.14.1/.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/4.14.1/.opam-switch/build/lem.2022-12-10/library'
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10'
-> compiled  lem.2022-12-10
Processing 110/132: [lem: gmake install]
+ /usr/local/bin/gmake "INSTALL_DIR=/usr/home/opam/.opam/4.14.1" "install" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10)
- mkdir -p /usr/home/opam/.opam/4.14.1/bin
- rm -f /usr/home/opam/.opam/4.14.1/bin/lem
- cp src/main.native /usr/home/opam/.opam/4.14.1/bin/lem
- rm -rf /usr/home/opam/.opam/4.14.1/share/lem
- mkdir -p /usr/home/opam/.opam/4.14.1/share/lem/library
- cp library/*.lem /usr/home/opam/.opam/4.14.1/share/lem/library
- cp library/*_constants /usr/home/opam/.opam/4.14.1/share/lem/library
- /usr/local/bin/gmake -C ocaml-lib install
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib/lem_zarith/META
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib lem_zarith
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/lem_zarith/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/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/4.14.1/lib/lem_zarith/lem_machine_word.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_map.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pmap.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/bit.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_maybe_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/either.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_function.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_show.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/vector.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_list_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_string.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_map_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_word.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_basic_classes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pset.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_big_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_assert_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_pervasives.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_sorting.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/xstring.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_show_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_bool.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_relation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/xstring.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_either.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_pervasives_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_string_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pset.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational_impl.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/big_int_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/big_int_impl.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/big_int_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set_helpers.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_function_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_num_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_debug.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_maybe.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pmap.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_tuple.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_num.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/vector.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_either.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/xstring.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_relation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_bool.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_show_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_function_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_big_num.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set_helpers.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pset.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_pervasives_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_string_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_maybe.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_debug.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_num_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/bit.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_tuple.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/pmap.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/rational.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_show.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/vector.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/either.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_function.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/bit.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_maybe_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_map.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_machine_word.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_map_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_list_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_string.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/nat_big_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_set.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_basic_classes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_word.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_sorting.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_pervasives.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/lem_assert_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/extract.a
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/extract.cmxa
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/extract.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_zarith/META
- touch /usr/home/opam/.opam/4.14.1/lib/lem_zarith/META
- gmake[2]: Leaving directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib/lem_num/META
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib lem_num
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/lem_num/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/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/4.14.1/lib/lem_num/rational_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/big_int_impl.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/big_int_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/big_int_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/rational_impl.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/rational_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_sorting.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_map_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_relation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_list_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_big_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_either.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pset.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_word.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_maybe_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/vector.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_debug.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_maybe.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/rational.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/xstring.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pmap.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_tuple.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_show.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_string_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_pervasives.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pmap.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_function.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_show_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_string.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/vector.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_basic_classes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/either.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_assert_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pset.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_machine_word.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_function_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_pervasives_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/bit.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set_helpers.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_map.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_bool.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_num_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_string.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_show_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_function.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/rational.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pmap.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/xstring.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/either.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_assert_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_basic_classes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/vector.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_machine_word.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/pset.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_big_num.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_num_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set_helpers.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_map.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_bool.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_set_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/bit.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_pervasives_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_function_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_relation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_sorting.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_num.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_map_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/bit.mli
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_word.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_num.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_either.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_list_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/nat_big_num.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_maybe.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_debug.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_maybe_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_pervasives.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_string_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_tuple.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/lem_show.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/xstring.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/rational.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/extract.a
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/extract.cmxa
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/extract.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/lem_num/META
- touch /usr/home/opam/.opam/4.14.1/lib/lem_num/META
- gmake[2]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- /usr/local/bin/gmake /usr/home/opam/.opam/4.14.1/lib/lem/META
- gmake[2]: Entering directory '/usr/home/opam/.opam/4.14.1/.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/4.14.1/lib lem
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/lem/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/lib -patch-version "" lem META
- Installed /usr/home/opam/.opam/4.14.1/lib/lem/META
- touch /usr/home/opam/.opam/4.14.1/lib/lem/META
- gmake[2]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/lem.2022-12-10/ocaml-lib'
- cp -R coq-lib /usr/home/opam/.opam/4.14.1/share/lem
- cp -R hol-lib /usr/home/opam/.opam/4.14.1/share/lem
- cp -R isabelle-lib /usr/home/opam/.opam/4.14.1/share/lem
-> installed lem.2022-12-10
Processing 111/132: [linksem: gmake]
+ /usr/local/bin/gmake  (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/linksem.0.8)
- /usr/local/bin/gmake -C src
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/linksem.0.8/src'
- OCAMLPATH is 
- lem.mk:13: MAKECMDGOALS is 
- OCAML_TOPLEVEL_PATH=/usr/home/opam/.opam/4.14.1/lib/toplevel
- CAML_LD_LIBRARY_PATH=/usr/home/opam/.opam/4.14.1/lib/stublibs:/usr/home/opam/.opam/4.14.1/lib/ocaml/stublibs:/usr/home/opam/.opam/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/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/4.14.1/.opam-switch/build/linksem.0.8/src'
-> compiled  linksem.0.8
Processing 112/132: [linksem: gmake install]
+ /usr/local/bin/gmake "install" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/linksem.0.8)
- /usr/local/bin/gmake -C src install
- gmake[1]: Entering directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/linksem.0.8/src'
- OCAMLPATH is 
- lem.mk:13: MAKECMDGOALS is install
- OCAML_TOPLEVEL_PATH=/usr/home/opam/.opam/4.14.1/lib/toplevel
- CAML_LD_LIBRARY_PATH=/usr/home/opam/.opam/4.14.1/lib/stublibs:/usr/home/opam/.opam/4.14.1/lib/ocaml/stublibs:/usr/home/opam/.opam/4.14.1/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/4.14.1/lib linksem
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/linksem/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/lib -patch-version "0.8" linksem META
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem/META
- touch /usr/home/opam/.opam/4.14.1/lib/linksem/META
- ocamlfind remove -destdir /usr/home/opam/.opam/4.14.1/lib linksem_zarith
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/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/4.14.1/lib/linksem_zarith/test_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf64_file_of_elf_memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/load.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/link.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linker_script.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linkable_list.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/input_list.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/command_line.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image_of_elf64_file.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/harness_interface.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/sail_interface.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abis.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_note.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_symbol_versioning.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_types_native_uint.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_capability.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_x86_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abstract_linker_script.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_abi.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_utilities.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image_orderings.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_classes.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ldconfig.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf_ctypes.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_file.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_note.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_section.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_segment.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/auxv.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/string_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/hex_printing.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_types_native_uint.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/archive.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern_extra.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_impl.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/default_printing.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/multimap.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/missing_pervasives.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ml_bindings.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/error.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/endianness.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/show.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint32_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint64_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint64_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint32_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/test_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/string_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/show.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/sail_interface.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/multimap.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ml_bindings.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/missing_pervasives.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image_orderings.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/load.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linker_script.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linkable_list.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/link.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ldconfig.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/input_list.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/hex_printing.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/harness_interface.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_types_native_uint.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_symbol_versioning.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_note.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_abi.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/error.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/endianness.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_types_native_uint.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_note.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_segment.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_section.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_file.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf_ctypes.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/default_printing.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/command_line.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_impl.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern_extra.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/auxv.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/archive.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abstract_linker_script.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abis.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_x86_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_utilities.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_classes.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_capability.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint64_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint32_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/test_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/string_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/show.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/sail_interface.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/multimap.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ml_bindings.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/missing_pervasives.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image_orderings.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/load.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linker_script.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linkable_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/link.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ldconfig.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/input_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/hex_printing.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/harness_interface.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_types_native_uint.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_symbol_versioning.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_note.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_abi.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/error.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/endianness.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_types_native_uint.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_note.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_segment.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_section.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_file.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf_ctypes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/default_printing.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/command_line.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/auxv.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/archive.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abstract_linker_script.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abis.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_x86_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_utilities.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_classes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_capability.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint64_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/uint32_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/test_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/string_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/show.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/sail_interface.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/multimap.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ml_bindings.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/missing_pervasives.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image_orderings.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/load.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linker_script.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linkable_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/link.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/ldconfig.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/input_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/hex_printing.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/harness_interface.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_types_native_uint.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_symbol_versioning.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_note.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/gnu_ext_abi.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/filesystem.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/error.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/endianness.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_types_native_uint.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_note.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_segment.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_interpreted_section.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_file.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf_ctypes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/dwarf.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/default_printing.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/command_line.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_sequence.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/byte_pattern.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/auxv.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/archive.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abstract_linker_script.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abis.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_x86_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_utilities.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_riscv.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_power64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_mips64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_classes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64_capability.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_cheri_mips64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_amd64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/abi_aarch64_le.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linksem.a
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linksem.cmxa
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/linksem.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/META
- touch /usr/home/opam/.opam/4.14.1/lib/linksem_zarith/META
- ocamlfind remove -destdir /usr/home/opam/.opam/4.14.1/lib linksem_num
- ocamlfind: [WARNING] No such file: /usr/home/opam/.opam/4.14.1/lib/linksem_num/META
- ocamlfind install -destdir /usr/home/opam/.opam/4.14.1/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/4.14.1/lib/linksem_num/test_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf64_file_of_elf_memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/load.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/link.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linker_script.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linkable_list.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/input_list.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/command_line.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image_of_elf64_file.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/harness_interface.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/sail_interface.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abis.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_note.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_to_segment_mapping.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_symbol_versioning.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_types_native_uint.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_capability.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_x86_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abstract_linker_script.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_serialisation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_abi.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_utilities.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image_orderings.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_classes.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ldconfig.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf_ctypes.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_dynamic.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_file.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_note.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_section.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_segment.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_relocation.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_section_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_program_header_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_symbol_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_header.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/auxv.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/string_table.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/hex_printing.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_types_native_uint.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/archive.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern_extra.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_impl.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/default_printing.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/multimap.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/missing_pervasives.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ml_bindings.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/error.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/endianness.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/show.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint32_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint64_wrapper.ml
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint64_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint32_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/test_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/string_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/show.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/sail_interface.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/multimap.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ml_bindings.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/missing_pervasives.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image_orderings.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/load.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linker_script.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linkable_list.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/link.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ldconfig.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/input_list.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/hex_printing.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/harness_interface.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_types_native_uint.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_symbol_versioning.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_note.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_abi.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/error.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/endianness.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_types_native_uint.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_note.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image_of_elf64_file.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_segment.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_section.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_file.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf64_file_of_elf_memory_image.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf_ctypes.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/default_printing.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/command_line.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_wrapper.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_impl.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern_extra.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/auxv.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/archive.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abstract_linker_script.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abis.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_x86_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_utilities.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_classes.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_dynamic.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_capability.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_symbol_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_section_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_relocation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_program_header_table.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_serialisation.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_elf_header.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le.cmt
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint64_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint32_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/test_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/string_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/show.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/sail_interface.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/multimap.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ml_bindings.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/missing_pervasives.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image_orderings.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/load.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linker_script.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linkable_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/link.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ldconfig.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/input_list.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/hex_printing.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/harness_interface.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_types_native_uint.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_symbol_versioning.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_note.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_abi.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/error.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/endianness.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_types_native_uint.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_note.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image_of_elf64_file.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_segment.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_section.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_file.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf64_file_of_elf_memory_image.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf_ctypes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/default_printing.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/command_line.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_wrapper.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_impl.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern_extra.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/auxv.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/archive.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abstract_linker_script.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abis.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_x86_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_utilities.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_classes.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_dynamic.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_capability.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_symbol_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_section_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_relocation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_program_header_table.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_serialisation.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_elf_header.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le.cmx
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint64_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/uint32_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/test_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/string_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/show.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/sail_interface.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/multimap.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ml_bindings.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/missing_pervasives.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image_orderings.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/load.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linker_script.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linkable_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/link.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/ldconfig.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/input_list.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/hex_printing.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/harness_interface.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_types_native_uint.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_symbol_versioning.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_note.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/gnu_ext_abi.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/filesystem.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/error.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/endianness.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_types_native_uint.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_note.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image_of_elf64_file.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_segment.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_interpreted_section.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_file.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/elf64_file_of_elf_memory_image.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf_ctypes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/dwarf.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/default_printing.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/command_line.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_wrapper.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence_impl.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_sequence.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern_extra.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/byte_pattern.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/auxv.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/archive.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abstract_linker_script.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abis.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_x86_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_utilities.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_riscv.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_power64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_mips64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_classes.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_dynamic.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64_capability.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_cheri_mips64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_amd64.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_symbol_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_section_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_relocation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_program_header_table.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_serialisation.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le_elf_header.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/abi_aarch64_le.cmi
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linksem.a
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linksem.cmxa
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/linksem.cma
- Installed /usr/home/opam/.opam/4.14.1/lib/linksem_num/META
- touch /usr/home/opam/.opam/4.14.1/lib/linksem_num/META
- gmake[1]: Leaving directory '/usr/home/opam/.opam/4.14.1/.opam-switch/build/linksem.0.8/src'
-> installed linksem.0.8
Processing 113/132: [libsail: dune build]
+ /usr/home/opam/.opam/4.14.1/bin/dune "build" "-p" "libsail" "-j" "15" "--promote-install-files=false" "@install" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/libsail.0.16)
- (cd _build/default/src/lib && /usr/home/opam/.opam/4.14.1/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/4.14.1/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 113/132: [libsail: dune install]
+ /usr/home/opam/.opam/4.14.1/bin/dune "install" "-p" "libsail" "--create-install-files" "libsail" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/libsail.0.16)
-> compiled  libsail.0.16
-> installed libsail.0.16
[sail: subst] expanding opam variables in src/bin/manifest.ml.in, generating src/bin/manifest.ml
Processing 115/132: [sail: dune build]
Processing 116/132: [sail: dune build] [sail_c_backend: dune build]
Processing 117/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build]
Processing 118/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build]
Processing 119/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune build]
Processing 120/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune build] [sail_lem_backend: dune build]
Processing 121/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build]
Processing 122/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build]
Processing 123/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
Processing 123/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune build] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
Processing 123/132: [sail: dune build] [sail_c_backend: dune build] [sail_coq_backend: dune build] [sail_doc_backend: dune install] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
Processing 123/132: [sail: dune build] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_doc_backend: dune install] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
Processing 123/132: [sail: dune install] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_doc_backend: dune install] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> compiled  sail_doc_backend.0.16
Processing 123/132: [sail: dune install] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> installed sail_doc_backend.0.16
Processing 124/132: [sail: dune install] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_latex_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> compiled  sail_latex_backend.0.16
Processing 124/132: [sail: dune install] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> installed sail_latex_backend.0.16
Processing 125/132: [sail: dune install] [sail_c_backend: dune install] [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> compiled  sail_c_backend.0.16
Processing 125/132: [sail: dune install] [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> installed sail_c_backend.0.16
Processing 126/132: [sail: dune install] [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> compiled  sail.0.16
Processing 126/132: [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
-> installed sail.0.16
Processing 127/132: [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune build] [sail_smt_backend: dune build]
Processing 127/132: [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_output: dune install] [sail_smt_backend: dune build]
-> compiled  sail_output.0.16
Processing 127/132: [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_smt_backend: dune build]
-> installed sail_output.0.16
Processing 128/132: [sail_coq_backend: dune build] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_smt_backend: dune build]
Processing 128/132: [sail_coq_backend: dune install] [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_smt_backend: dune build]
-> compiled  sail_coq_backend.0.16
Processing 128/132: [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_smt_backend: dune build]
-> installed sail_coq_backend.0.16
Processing 129/132: [sail_lem_backend: dune build] [sail_ocaml_backend: dune build] [sail_smt_backend: dune build]
Processing 129/132: [sail_lem_backend: dune build] [sail_ocaml_backend: dune install] [sail_smt_backend: dune build]
-> compiled  sail_ocaml_backend.0.16
Processing 129/132: [sail_lem_backend: dune build] [sail_smt_backend: dune build]
-> installed sail_ocaml_backend.0.16
Processing 130/132: [sail_lem_backend: dune build] [sail_smt_backend: dune build]
Processing 130/132: [sail_lem_backend: dune install] [sail_smt_backend: dune build]
-> compiled  sail_lem_backend.0.16
Processing 130/132: [sail_smt_backend: dune build]
-> installed sail_lem_backend.0.16
Processing 131/132: [sail_smt_backend: dune build]
+ /usr/home/opam/.opam/4.14.1/bin/dune "build" "-p" "sail_smt_backend" "-j" "15" "--promote-install-files=false" "@install" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/sail_smt_backend.0.16)
Processing 131/132: [sail_smt_backend: dune install]
+ /usr/home/opam/.opam/4.14.1/bin/dune "install" "-p" "sail_smt_backend" "--create-install-files" "sail_smt_backend" (CWD=/usr/home/opam/.opam/4.14.1/.opam-switch/build/sail_smt_backend.0.16)
-> compiled  sail_smt_backend.0.16
-> installed sail_smt_backend.0.16
Done.
2023-09-17 14:05.23 ---> saved as "89e49d7e3335b519538714097147bb9f275a321e2ef647bf357f5fb50bdf73d0"
Job succeeded