Building on clete.ocamllabs.io (from ocaml/opam:debian-unstable) WARNING: Error loading config file: .dockercfg: $HOME is not defined 2021-09-04 13:23.55 ---> using "0acd5aeaa8f7bc314514d9795d14a7f12ec72a6a5b11c5904350189734c6859b" from cache /: (user (uid 1000) (gid 1000)) /: (env OPAMPRECISETRACKING 1) /: (env OPAMUTF8 never) /: (env OPAMEXTERNALSOLVER builtin-0install) /: (env OPAMCRITERIA +removed) /: (run (shell "sudo ln -f /usr/bin/opam-2.1 /usr/bin/opam")) 2021-09-04 13:23.55 ---> using "4d29eb3e0b7cd69a97ed90837671d5ca38aa41e2fb94346298af500378eca6fa" from cache /: (run (network host) (shell "rm -rf ~/opam-repository && git clone -q 'git://github.com/ocaml/opam-repository.git' ~/opam-repository && git -C ~/opam-repository checkout -q 8fc7af65ccb8f3b3709bf02b749ac492e6700b59")) 2021-09-04 13:23.55 ---> using "eb095db6df41eeadc708604343f7b0ce0892db9136dac67a38046f57271c5802" from cache /: (run (shell "rm -rf ~/.opam && opam init -ya --bare --config ~/.opamrc-sandbox ~/opam-repository")) Configuring from /home/opam/.opamrc-sandbox, then /home/opam/.opamrc, and finally from built-in defaults. Checking for available remotes: rsync and local, git. - you won't be able to use mercurial repositories unless you install the hg command on your system. - you won't be able to use darcs repositories unless you install the darcs command on your system. <><> Fetching repository information ><><><><><><><><><><><><><><><><><><><><><> [default] Initialised User configuration: ~/.profile is already up-to-date. [NOTE] Make sure that ~/.profile is well sourced in your ~/.bashrc. 2021-09-04 13:23.55 ---> using "d245c9af6f86b2b97434d338a3fbb8270425ab7dc6ad1b5451665adc9698eabf" from cache /: (run (network host) (shell "git clone -q 'git://github.com/ocaml/ocaml-beta-repository.git' ~/'beta' && git -C ~/'beta' checkout -q 79aeeadd813bdae424ab53f882f08bee0a4e0b89")) 2021-09-04 13:23.55 ---> using "20d9850dcecd0523d6eddecad814e9bbd93882334348605bfa6e15ffd8f5ced5" from cache /: (run (shell "opam repository add --dont-select 'beta' ~/'beta'")) [beta] Initialised 2021-09-04 13:23.55 ---> using "6f8879c5099d2146b69bdcec3874fd111cad6c5c42ac63d5f9aa72a228fd8ee8" from cache /: (run (cache (opam-archives (target /home/opam/.opam/download-cache))) (network host) (shell "opam switch create --repositories=beta,default 4.13.0+trunk")) <><> Installing new switch packages <><><><><><><><><><><><><><><><><><><><><><> Switch invariant: ["ocaml-variants" {= "4.13.0+trunk"}] <><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><> -> installed base-bigarray.base -> installed base-threads.base -> installed base-unix.base -> retrieved ocaml-variants.4.13.0+trunk (https://github.com/ocaml/ocaml/archive/4.13.tar.gz) -> installed ocaml-variants.4.13.0+trunk -> installed ocaml-config.2 -> installed ocaml.4.13.0 Done. # Run eval $(opam env --switch=4.13.0+trunk) to update the current shell environment 2021-09-04 13:23.55 ---> using "6712a74d1c1dd02a3a6016afba137eef5268a19bc9ee3f1c1955ef2ed1510eb1" from cache /: (run (network host) (shell "opam update --depexts")) + /usr/bin/sudo "apt-get" "update" - Get:1 http://deb.debian.org/debian unstable InRelease [165 kB] - Get:2 http://deb.debian.org/debian unstable/main amd64 Packages.diff/Index [63.6 kB] - Ign:2 http://deb.debian.org/debian unstable/main amd64 Packages.diff/Index - Get:3 http://deb.debian.org/debian unstable/main amd64 Packages [8766 kB] - Fetched 8994 kB in 2s (4862 kB/s) - Reading package lists... - 2021-09-04 13:23.55 ---> using "efb2002aa60b7139ac6bcdcb20564781fe8c1766de01de081e2c168839e6bf82" from cache /: (run (cache (opam-archives (target /home/opam/.opam/download-cache))) (network host) (shell "\ \nopam remove -y \"sail.0.14\"\ \nopam install -vy \"sail.0.14\"\ \nres=$?\ \nif [ $res = 31 ]; then\ \n if opam show -f x-ci-accept-failures: \"sail.0.14\" | grep -q '\"debian-unstable\"'; then\ \n echo \"This package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\"\ \n exit 69\ \n fi\ \nfi\ \n\ \n\ \nexit $res\ \n")) Nothing to do. [NOTE] sail.0.14 is not installed. The following actions will be performed: - install conf-pkg-config 2 [required by conf-zlib] - install ocamlfind 1.9.1 [required by sail] - install conf-gmp 3 [required by sail] - install conf-findutils 1 [required by lem] - install dune 2.9.0 [required by pprint, linenoise, base64, etc.] - install ott 0.31 [required by sail] - install ocamlbuild 0.14.0 [required by sail] - install conf-zlib 1 [required by sail] - install num 1.4 [required by lem] - install base-bytes base [required by omd] - install zarith 1.12 [required by sail] - install result 1.5 [required by linenoise] - install pprint 20200410 [required by sail] - install menhirSdk 20210419 [required by menhir] - install menhirLib 20210419 [required by menhir] - install easy-format 1.3.2 [required by yojson] - install cppo 1.6.7 [required by yojson] - install base64 3.5.0 [required by sail] - install omd 1.3.1 [required by sail] - install lem 2020-06-03 [required by sail] - install linenoise 1.3.1 [required by sail] - install menhir 20210419 [required by sail] - install biniou 1.2.1 [required by yojson] - install linksem 0.7 [required by sail] - install yojson 1.7.0 [required by sail] - install sail 0.14 ===== 26 to install ===== The following system packages will first need to be installed: libgmp-dev pkg-config zlib1g-dev <><> Handling external dependencies <><><><><><><><><><><><><><><><><><><><><><> Let opam run your package manager to install the required system packages? (answer 'n' for other options) [Y/n] y + /usr/bin/sudo "apt-get" "install" "-qq" "-yy" "libgmp-dev" "pkg-config" "zlib1g-dev" - debconf: delaying package configuration, since apt-utils is not installed - Selecting previously unselected package libglib2.0-0:amd64. - (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 18049 files and directories currently installed.) - Preparing to unpack .../0-libglib2.0-0_2.68.4-1_amd64.deb ... - Unpacking libglib2.0-0:amd64 (2.68.4-1) ... - Selecting previously unselected package libglib2.0-data. - Preparing to unpack .../1-libglib2.0-data_2.68.4-1_all.deb ... - Unpacking libglib2.0-data (2.68.4-1) ... - Selecting previously unselected package libgmpxx4ldbl:amd64. - Preparing to unpack .../2-libgmpxx4ldbl_2%3a6.2.1+dfsg-1_amd64.deb ... - Unpacking libgmpxx4ldbl:amd64 (2:6.2.1+dfsg-1) ... - Selecting previously unselected package libgmp-dev:amd64. - Preparing to unpack .../3-libgmp-dev_2%3a6.2.1+dfsg-1_amd64.deb ... - Unpacking libgmp-dev:amd64 (2:6.2.1+dfsg-1) ... - Selecting previously unselected package libicu67:amd64. - Preparing to unpack .../4-libicu67_67.1-7_amd64.deb ... - Unpacking libicu67:amd64 (67.1-7) ... - Selecting previously unselected package libxml2:amd64. - Preparing to unpack .../5-libxml2_2.9.12+dfsg-3_amd64.deb ... - Unpacking libxml2:amd64 (2.9.12+dfsg-3) ... - Selecting previously unselected package pkg-config. - Preparing to unpack .../6-pkg-config_0.29.2-1_amd64.deb ... - Unpacking pkg-config (0.29.2-1) ... - Selecting previously unselected package shared-mime-info. - Preparing to unpack .../7-shared-mime-info_2.0-1_amd64.deb ... - Unpacking shared-mime-info (2.0-1) ... - Selecting previously unselected package xdg-user-dirs. - Preparing to unpack .../8-xdg-user-dirs_0.17-2_amd64.deb ... - Unpacking xdg-user-dirs (0.17-2) ... - Selecting previously unselected package zlib1g-dev:amd64. - Preparing to unpack .../9-zlib1g-dev_1%3a1.2.11.dfsg-2_amd64.deb ... - Unpacking zlib1g-dev:amd64 (1:1.2.11.dfsg-2) ... - Setting up libicu67:amd64 (67.1-7) ... - Setting up xdg-user-dirs (0.17-2) ... - Setting up libglib2.0-0:amd64 (2.68.4-1) ... - No schema files found: doing nothing. - Setting up libglib2.0-data (2.68.4-1) ... - Setting up libgmpxx4ldbl:amd64 (2:6.2.1+dfsg-1) ... - Setting up pkg-config (0.29.2-1) ... - Setting up zlib1g-dev:amd64 (1:1.2.11.dfsg-2) ... - Setting up libxml2:amd64 (2.9.12+dfsg-3) ... - Setting up libgmp-dev:amd64 (2:6.2.1+dfsg-1) ... - Setting up shared-mime-info (2.0-1) ... - Processing triggers for libc-bin (2.31-13) ... <><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><> Processing 2/78: Processing 3/78: Processing 4/78: Processing 5/78: Processing 6/78: Processing 7/78: Processing 8/78: Processing 9/78: [conf-findutils: sh find . -name .] Processing 10/78: [conf-findutils: sh find . -name .] [conf-gmp: sh] Processing 11/78: [conf-findutils: sh find . -name .] [conf-gmp: sh] [conf-pkg-config: pkg-config] -> retrieved base64.3.5.0 (cached) Processing 12/78: [conf-findutils: sh find . -name .] [conf-gmp: sh] [conf-pkg-config: pkg-config] -> retrieved biniou.1.2.1 (cached) Processing 13/78: [conf-findutils: sh find . -name .] [conf-gmp: sh] [conf-pkg-config: pkg-config] -> retrieved cppo.1.6.7 (cached) Processing 14/78: [conf-findutils: sh find . -name .] [conf-gmp: sh] [conf-pkg-config: pkg-config] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "sh" "-exc" "find . -name ." (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/conf-findutils.1) - + find . -name . - . - + find . -name . - . -> compiled conf-findutils.1 Processing 14/78: [conf-gmp: sh] [conf-pkg-config: pkg-config] -> installed conf-findutils.1 Processing 15/78: [conf-gmp: sh] [conf-pkg-config: pkg-config] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "pkg-config" "--help" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/conf-pkg-config.2) - Usage: - pkg-config [OPTION?] - - Help Options: - -h, --help Show help options - - Application Options: - --version output version of pkg-config - --modversion output version for package - --atleast-pkgconfig-version=VERSION require given version of pkg-config - --libs output all linker flags - --static output linker flags for static linking - --short-errors print short errors - --libs-only-l output -l flags - --libs-only-other output other libs (e.g. -pthread) - --libs-only-L output -L flags - --cflags output all pre-processor and compiler flags - --cflags-only-I output -I flags - --cflags-only-other output cflags not covered by the cflags-only-I option - --variable=NAME get the value of variable named NAME - --define-variable=NAME=VALUE set variable NAME to VALUE - --exists return 0 if the module(s) exist - --print-variables output list of variables defined by the module - --uninstalled return 0 if the uninstalled version of one or more module(s) or their dependencies will be used - --atleast-version=VERSION return 0 if the module is at least version VERSION - --exact-version=VERSION return 0 if the module is at exactly version VERSION - --max-version=VERSION return 0 if the module is at no newer than version VERSION - --list-all list all known packages - --debug show verbose debug information - --print-errors show verbose information about missing or conflicting packages (default unless --exists or --atleast/exact/max-version given on the command line) - --silence-errors be silent about errors (default when --exists or --atleast/exact/max-version given on the command line) - --errors-to-stdout print errors from --print-errors to stdout not stderr - --print-provides print which packages the package provides - --print-requires print which packages the package requires - --print-requires-private print which packages the package requires for static linking - --validate validate a package's .pc file - --define-prefix try to override the value of prefix for each .pc file found with a guesstimated value based on the location of the .pc file - --dont-define-prefix don't try to override the value of prefix for each .pc file found with a guesstimated value based on the location of the .pc file - --prefix-variable=PREFIX set the name of the variable that pkg-config automatically sets - - Usage: - pkg-config [OPTION?] - - Help Options: - -h, --help Show help options - - Application Options: - --version output version of pkg-config - --modversion output version for package - --atleast-pkgconfig-version=VERSION require given version of pkg-config - --libs output all linker flags - --static output linker flags for static linking - --short-errors print short errors - --libs-only-l output -l flags - --libs-only-other output other libs (e.g. -pthread) - --libs-only-L output -L flags - --cflags output all pre-processor and compiler flags - --cflags-only-I output -I flags - --cflags-only-other output cflags not covered by the cflags-only-I option - --variable=NAME get the value of variable named NAME - --define-variable=NAME=VALUE set variable NAME to VALUE - --exists return 0 if the module(s) exist - --print-variables output list of variables defined by the module - --uninstalled return 0 if the uninstalled version of one or more module(s) or their dependencies will be used - --atleast-version=VERSION return 0 if the module is at least version VERSION - --exact-version=VERSION return 0 if the module is at exactly version VERSION - --max-version=VERSION return 0 if the module is at no newer than version VERSION - --list-all list all known packages - --debug show verbose debug information - --print-errors show verbose information about missing or conflicting packages (default unless --exists or --atleast/exact/max-version given on the command line) - --silence-errors be silent about errors (default when --exists or --atleast/exact/max-version given on the command line) - --errors-to-stdout print errors from --print-errors to stdout not stderr - --print-provides print which packages the package provides - --print-requires print which packages the package requires - --print-requires-private print which packages the package requires for static linking - --validate validate a package's .pc file - --define-prefix try to override the value of prefix for each .pc file found with a guesstimated value based on the location of the .pc file - --dont-define-prefix don't try to override the value of prefix for each .pc file found with a guesstimated value based on the location of the .pc file - --prefix-variable=PREFIX set the name of the variable that pkg-config automatically sets - -> compiled conf-pkg-config.2 Processing 15/78: [conf-gmp: sh] Processing 16/78: [conf-gmp: sh] [conf-pkg-config: mkdir] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "sh" "-exc" "cc -c $CFLAGS -I/usr/local/include test.c" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/conf-gmp.3) - + cc -c -I/usr/local/include test.c - + cc -c -I/usr/local/include test.c -> compiled conf-gmp.3 Processing 16/78: [conf-pkg-config: mkdir] -> retrieved dune.2.9.0 (cached) Processing 17/78: [conf-pkg-config: mkdir] Processing 18/78: [dune: ocaml bootstrap.ml] [conf-pkg-config: mkdir] -> retrieved easy-format.1.3.2 (cached) Processing 19/78: [dune: ocaml bootstrap.ml] [conf-pkg-config: mkdir] -> retrieved lem.2020-06-03 (cached) Processing 20/78: [dune: ocaml bootstrap.ml] [conf-pkg-config: mkdir] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "mkdir" "-p" "/home/opam/.opam/4.13.0+trunk/lib/pkgconfig" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/conf-pkg-config.2) -> installed conf-pkg-config.2 Processing 20/78: [dune: ocaml bootstrap.ml] Processing 21/78: [conf-zlib: pkg-config zlib] [dune: ocaml bootstrap.ml] -> installed conf-gmp.3 Processing 22/78: [conf-zlib: pkg-config zlib] [dune: ocaml bootstrap.ml] -> retrieved linenoise.1.3.1 (cached) Processing 23/78: [conf-zlib: pkg-config zlib] [dune: ocaml bootstrap.ml] -> retrieved menhir.20210419 (cached) Processing 24/78: [conf-zlib: pkg-config zlib] [dune: ocaml bootstrap.ml] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "pkg-config" "zlib" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/conf-zlib.1) -> compiled conf-zlib.1 Processing 24/78: [dune: ocaml bootstrap.ml] -> installed conf-zlib.1 Processing 25/78: [dune: ocaml bootstrap.ml] -> retrieved menhirLib.20210419 (cached) Processing 26/78: [dune: ocaml bootstrap.ml] -> retrieved menhirSdk.20210419 (cached) Processing 27/78: [dune: ocaml bootstrap.ml] -> retrieved num.1.4 (cached) Processing 28/78: [dune: ocaml bootstrap.ml] -> retrieved ocamlbuild.0.14.0 (cached) Processing 29/78: [dune: ocaml bootstrap.ml] Processing 30/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make configure.make] -> retrieved ocamlfind.1.9.1 (cached) Processing 31/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make configure.make] Processing 32/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make configure.make] [ocamlfind: ./configure] -> retrieved omd.1.3.1 (cached) Processing 33/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make configure.make] [ocamlfind: ./configure] -> retrieved pprint.20200410 (cached) Processing 34/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make configure.make] [ocamlfind: ./configure] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "-f" "configure.make" "all" "OCAMLBUILD_PREFIX=/home/opam/.opam/4.13.0+trunk" "OCAMLBUILD_BINDIR=/home/opam/.opam/4.13.0+trunk/bin" "OCAMLBUILD_LIBDIR=/home/opam/.opam/4.13.0+trunk/lib" "OCAMLBUILD_MANDIR=/home/opam/.opam/4.13.0+trunk/man" "OCAML_NATIVE=true" "OCAML_NATIVE_TOOLS=true" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0) - (echo "# This file was generated from configure.make"; \ - echo ;\ - echo "OCAML_PREFIX="; \ - echo "OCAML_BINDIR=/home/opam/.opam/4.13.0+trunk/bin"; \ - echo "OCAML_LIBDIR=/home/opam/.opam/4.13.0+trunk/lib/ocaml"; \ - echo "OCAML_MANDIR=/home/opam/.opam/4.13.0+trunk/man"; \ - echo ;\ - echo "EXT_OBJ=.o"; \ - echo "EXT_ASM=.s"; \ - echo "EXT_LIB=.a"; \ - echo "EXT_DLL=.so"; \ - echo "EXE="; \ - echo ;\ - echo "OCAML_NATIVE=true"; \ - echo "OCAML_NATIVE_TOOLS=true"; \ - echo "NATDYNLINK=true"; \ - echo "SUPPORT_SHARED_LIBRARIES=true"; \ - echo ;\ - echo "PREFIX=/home/opam/.opam/4.13.0+trunk"; \ - echo "BINDIR=/home/opam/.opam/4.13.0+trunk/bin"; \ - echo "LIBDIR=/home/opam/.opam/4.13.0+trunk/lib"; \ - echo "MANDIR=/home/opam/.opam/4.13.0+trunk/man"; \ - ) > Makefile.config - (echo "(* This file was generated from ../configure.make *)"; \ - echo ;\ - echo 'let bindir = "/home/opam/.opam/4.13.0+trunk/bin"'; \ - echo 'let libdir = "/home/opam/.opam/4.13.0+trunk/lib"'; \ - echo 'let ocaml_libdir = "/home/opam/.opam/4.13.0+trunk/lib/ocaml"'; \ - echo 'let libdir_abs = "/home/opam/.opam/4.13.0+trunk/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.0"'; \ - ) > src/ocamlbuild_config.ml - (echo "# This file was generated from configure.make"; \ - echo ;\ - echo "OCAML_PREFIX="; \ - echo "OCAML_BINDIR=/home/opam/.opam/4.13.0+trunk/bin"; \ - echo "OCAML_LIBDIR=/home/opam/.opam/4.13.0+trunk/lib/ocaml"; \ - echo "OCAML_MANDIR=/home/opam/.opam/4.13.0+trunk/man"; \ - echo ;\ - echo "EXT_OBJ=.o"; \ - echo "EXT_ASM=.s"; \ - echo "EXT_LIB=.a"; \ - echo "EXT_DLL=.so"; \ - echo "EXE="; \ - echo ;\ - echo "OCAML_NATIVE=true"; \ - echo "OCAML_NATIVE_TOOLS=true"; \ - echo "NATDYNLINK=true"; \ - echo "SUPPORT_SHARED_LIBRARIES=true"; \ - echo ;\ - echo "PREFIX=/home/opam/.opam/4.13.0+trunk"; \ - echo "BINDIR=/home/opam/.opam/4.13.0+trunk/bin"; \ - echo "LIBDIR=/home/opam/.opam/4.13.0+trunk/lib"; \ - echo "MANDIR=/home/opam/.opam/4.13.0+trunk/man"; \ - ) > Makefile.config - (echo "(* This file was generated from ../configure.make *)"; \ - echo ;\ - echo 'let bindir = "/home/opam/.opam/4.13.0+trunk/bin"'; \ - echo 'let libdir = "/home/opam/.opam/4.13.0+trunk/lib"'; \ - echo 'let ocaml_libdir = "/home/opam/.opam/4.13.0+trunk/lib/ocaml"'; \ - echo 'let libdir_abs = "/home/opam/.opam/4.13.0+trunk/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.0"'; \ - ) > src/ocamlbuild_config.ml Processing 34/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure] -> retrieved result.1.5 (cached) Processing 35/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure] -> retrieved ott.0.31 (cached) Processing 36/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure] Processing 37/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure] [ott: make world] -> retrieved linksem.0.7 (cached) Processing 38/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: ./configure] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "./configure" "-bindir" "/home/opam/.opam/4.13.0+trunk/bin" "-sitelib" "/home/opam/.opam/4.13.0+trunk/lib" "-mandir" "/home/opam/.opam/4.13.0+trunk/man" "-config" "/home/opam/.opam/4.13.0+trunk/lib/findlib.conf" "-no-custom" "-no-camlp4" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1) - Welcome to findlib version 1.9.1 - Configuring core... - Checking for #remove_directory... - Testing threading model... - systhread_supported: true - Testing DLLs... - Testing whether ppxopt can be supported... - Checking for ocamlc -opaque... - Querying installation: META list not found - make install will double-check installed META files - Configuring libraries... - unix: 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 - raw_spacetime: not present (normal since 4.12) - threads: found - str: found - labltk: not present (normal since 4.02) - native dynlink: found - camlp4: disabled - bytes: found, installing fake library - Configuration for dynlink written to site-lib-src/dynlink/META - Configuration for stdlib written to site-lib-src/stdlib/META - Configuration for unix written to site-lib-src/unix/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: /home/opam/.opam/4.13.0+trunk/lib/ocaml - Binaries: /home/opam/.opam/4.13.0+trunk/bin - Manual pages: /home/opam/.opam/4.13.0+trunk/man - Multi-threading type: posix - The directory of site-specific packages will be - site-lib: /home/opam/.opam/4.13.0+trunk/lib - The configuration file is written to: - findlib config file: /home/opam/.opam/4.13.0+trunk/lib/findlib.conf - Software will be installed: - Libraries: in <site-lib>/findlib - Binaries: /home/opam/.opam/4.13.0+trunk/bin - Manual pages: /home/opam/.opam/4.13.0+trunk/man - topfind script: /home/opam/.opam/4.13.0+trunk/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. - Welcome to findlib version 1.9.1 - Configuring core... - Checking for #remove_directory... - Testing threading model... - systhread_supported: true - Testing DLLs... - Testing whether ppxopt can be supported... - Checking for ocamlc -opaque... - Querying installation: META list not found - make install will double-check installed META files - Configuring libraries... - unix: 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 - raw_spacetime: not present (normal since 4.12) - threads: found - str: found - labltk: not present (normal since 4.02) - native dynlink: found - camlp4: disabled - bytes: found, installing fake library - Configuration for dynlink written to site-lib-src/dynlink/META - Configuration for stdlib written to site-lib-src/stdlib/META - Configuration for unix written to site-lib-src/unix/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: /home/opam/.opam/4.13.0+trunk/lib/ocaml - Binaries: /home/opam/.opam/4.13.0+trunk/bin - Manual pages: /home/opam/.opam/4.13.0+trunk/man - Multi-threading type: posix - The directory of site-specific packages will be - site-lib: /home/opam/.opam/4.13.0+trunk/lib - The configuration file is written to: - findlib config file: /home/opam/.opam/4.13.0+trunk/lib/findlib.conf - Software will be installed: - Libraries: in <site-lib>/findlib - Binaries: /home/opam/.opam/4.13.0+trunk/bin - Manual pages: /home/opam/.opam/4.13.0+trunk/man - topfind script: /home/opam/.opam/4.13.0+trunk/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 38/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: make all] [ott: make world] -> retrieved sail.0.14 (cached) -> retrieved yojson.1.7.0 (cached) -> retrieved zarith.1.12 (cached) + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "all" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1) - for p in findlib; do ( cd src/$p; make all ) || exit; done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - ocamllex fl_meta.mll - 22 states, 392 transitions, table size 1700 bytes - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat findlib_config.mlp | \ - ../../tools/patch '@CONFIGFILE@' '/home/opam/.opam/4.13.0+trunk/lib/findlib.conf' | \ - ../../tools/patch '@STDLIB@' '/home/opam/.opam/4.13.0+trunk/lib/ocaml' | \ - sed -e 's;@AUTOLINK@;true;g' \ - -e 's;@SYSTEM@;linux;g' \ - >findlib_config.ml - if [ "true" = "true" ]; then \ - cp topfind.ml.in topfind.ml; \ - else \ - sed -e '/PPXOPT_BEGIN/,/PPXOPT_END/ d' topfind.ml.in \ - > topfind.ml ; \ - fi - ocamldep *.ml *.mli >depend - ocamlc -I +compiler-libs -opaque -g -c findlib_config.ml - ocamlc -I +compiler-libs -opaque -g -c fl_split.ml - ocamlc -I +compiler-libs -opaque -g -c fl_metatoken.ml - ocamlc -I +compiler-libs -opaque -g -c fl_meta.ml - ocamlc -I +compiler-libs -opaque -c fl_metascanner.mli - ocamlc -I +compiler-libs -opaque -g -c fl_metascanner.ml - ocamlc -I +compiler-libs -opaque -c fl_topo.mli - ocamlc -I +compiler-libs -opaque -g -c fl_topo.ml - ocamlc -I +compiler-libs -opaque -c fl_package_base.mli - ocamlc -I +compiler-libs -opaque -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 -c findlib.mli - ocamlc -I +compiler-libs -opaque -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 -g -c fl_args.ml - ocamlc -I +compiler-libs -opaque -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 -g -c ocaml_args.ml - ocamlc -I +compiler-libs -opaque -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. - File "frontend.ml", line 1826, characters 16-29: - 1826 | let buf = String.create buflen in (* FIXME: Bytes.create *) - ^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.create - Use Bytes.create/BytesLabels.create instead. - ocamlc -I +compiler-libs -o ocamlfind -g findlib.cma unix.cma \ - ocaml_args.cmo frontend.cmo - ocamlc -I +compiler-libs -opaque -c topfind.mli - ocamlc -I +compiler-libs -opaque -g -c topfind.ml - File "topfind.ml", line 126, characters 40-63: - 126 | match Hashtbl.find Toploop.directive_table "ppx" with - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 252, characters 4-27: - 252 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 262, characters 4-27: - 262 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 274, characters 4-27: - 274 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 287, characters 4-27: - 287 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 301, characters 4-27: - 301 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 313, characters 4-27: - 313 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - ocamlc -I +compiler-libs -a -o findlib_top.cma topfind.cmo - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat topfind_rd1.p | \ - ../../tools/patch '@SITELIB@' '/home/opam/.opam/4.13.0+trunk/lib' \ - >topfind - ocamlc -I +compiler-libs -opaque -c fl_dynload.mli - ocamlc -I +compiler-libs -opaque -g -c fl_dynload.ml - ocamlc -I +compiler-libs -a -o findlib_dynload.cma fl_dynload.cmo - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - make all-config - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat findlib.conf.in | \ - tools/patch '@SITELIB@' '/home/opam/.opam/4.13.0+trunk/lib' >findlib.conf - if ./tools/cmd_from_same_dir ocamlc; then \ - echo 'ocamlc="ocamlc.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamlopt; then \ - echo 'ocamlopt="ocamlopt.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamldep; then \ - echo 'ocamldep="ocamldep.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamldoc; then \ - echo 'ocamldoc="ocamldoc.opt"' >>findlib.conf; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - for p in findlib; do ( cd src/$p; make all ) || exit; done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - ocamllex fl_meta.mll - 22 states, 392 transitions, table size 1700 bytes - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat findlib_config.mlp | \ - ../../tools/patch '@CONFIGFILE@' '/home/opam/.opam/4.13.0+trunk/lib/findlib.conf' | \ - ../../tools/patch '@STDLIB@' '/home/opam/.opam/4.13.0+trunk/lib/ocaml' | \ - sed -e 's;@AUTOLINK@;true;g' \ - -e 's;@SYSTEM@;linux;g' \ - >findlib_config.ml - if [ "true" = "true" ]; then \ - cp topfind.ml.in topfind.ml; \ - else \ - sed -e '/PPXOPT_BEGIN/,/PPXOPT_END/ d' topfind.ml.in \ - > topfind.ml ; \ - fi - ocamldep *.ml *.mli >depend - ocamlc -I +compiler-libs -opaque -g -c findlib_config.ml - ocamlc -I +compiler-libs -opaque -g -c fl_split.ml - ocamlc -I +compiler-libs -opaque -g -c fl_metatoken.ml - ocamlc -I +compiler-libs -opaque -g -c fl_meta.ml - ocamlc -I +compiler-libs -opaque -c fl_metascanner.mli - ocamlc -I +compiler-libs -opaque -g -c fl_metascanner.ml - ocamlc -I +compiler-libs -opaque -c fl_topo.mli - ocamlc -I +compiler-libs -opaque -g -c fl_topo.ml - ocamlc -I +compiler-libs -opaque -c fl_package_base.mli - ocamlc -I +compiler-libs -opaque -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 -c findlib.mli - ocamlc -I +compiler-libs -opaque -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 -g -c fl_args.ml - ocamlc -I +compiler-libs -opaque -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 -g -c ocaml_args.ml - ocamlc -I +compiler-libs -opaque -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. - File "frontend.ml", line 1826, characters 16-29: - 1826 | let buf = String.create buflen in (* FIXME: Bytes.create *) - ^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.create - Use Bytes.create/BytesLabels.create instead. - ocamlc -I +compiler-libs -o ocamlfind -g findlib.cma unix.cma \ - ocaml_args.cmo frontend.cmo - ocamlc -I +compiler-libs -opaque -c topfind.mli - ocamlc -I +compiler-libs -opaque -g -c topfind.ml - File "topfind.ml", line 126, characters 40-63: - 126 | match Hashtbl.find Toploop.directive_table "ppx" with - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 252, characters 4-27: - 252 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 262, characters 4-27: - 262 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 274, characters 4-27: - 274 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 287, characters 4-27: - 287 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 301, characters 4-27: - 301 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 313, characters 4-27: - 313 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - ocamlc -I +compiler-libs -a -o findlib_top.cma topfind.cmo - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat topfind_rd1.p | \ - ../../tools/patch '@SITELIB@' '/home/opam/.opam/4.13.0+trunk/lib' \ - >topfind - ocamlc -I +compiler-libs -opaque -c fl_dynload.mli - ocamlc -I +compiler-libs -opaque -g -c fl_dynload.ml - ocamlc -I +compiler-libs -a -o findlib_dynload.cma fl_dynload.cmo - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - make all-config - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - USE_CYGPATH="0"; \ - export USE_CYGPATH; \ - cat findlib.conf.in | \ - tools/patch '@SITELIB@' '/home/opam/.opam/4.13.0+trunk/lib' >findlib.conf - if ./tools/cmd_from_same_dir ocamlc; then \ - echo 'ocamlc="ocamlc.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamlopt; then \ - echo 'ocamlopt="ocamlopt.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamldep; then \ - echo 'ocamldep="ocamldep.opt"' >>findlib.conf; \ - fi - if ./tools/cmd_from_same_dir ocamldoc; then \ - echo 'ocamldoc="ocamldoc.opt"' >>findlib.conf; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' Processing 38/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ocamlfind: make opt] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "opt" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1) - for p in findlib; do ( cd src/$p; make opt ) || exit; done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - ocamlopt -I +compiler-libs -g -opaque -c findlib_config.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_split.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_metatoken.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_meta.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_metascanner.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_topo.ml - ocamlopt -I +compiler-libs -g -opaque -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 -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 -c fl_args.ml - ocamlopt -I +compiler-libs -g -opaque -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 -c ocaml_args.ml - ocamlopt -I +compiler-libs -g -opaque -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. - File "frontend.ml", line 1826, characters 16-29: - 1826 | let buf = String.create buflen in (* FIXME: Bytes.create *) - ^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.create - Use Bytes.create/BytesLabels.create instead. - ocamlopt -I +compiler-libs -g -o ocamlfind_opt findlib.cmxa unix.cmxa \ - ocaml_args.cmx frontend.cmx - ocamlopt -I +compiler-libs -g -opaque -c topfind.ml - File "topfind.ml", line 126, characters 40-63: - 126 | match Hashtbl.find Toploop.directive_table "ppx" with - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 252, characters 4-27: - 252 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 262, characters 4-27: - 262 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 274, characters 4-27: - 274 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 287, characters 4-27: - 287 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 301, characters 4-27: - 301 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 313, characters 4-27: - 313 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "_none_", line 1: - Warning 58 [no-cmx-file]: no cmx file was found in path for module Topdirs, and its interface was not compiled with -opaque - File "_none_", line 1: - Warning 58 [no-cmx-file]: no cmx file was found in path for module Toploop, and its interface was not compiled with -opaque - 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 -c fl_dynload.ml - ocamlopt -I +compiler-libs -g -a -o findlib_dynload.cmxa fl_dynload.cmx - if [ 1 -gt 0 ]; then \ - ocamlopt -I +compiler-libs -g -shared -o findlib_dynload.cmxs fl_dynload.cmx; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - for p in findlib; do ( cd src/$p; make opt ) || exit; done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - ocamlopt -I +compiler-libs -g -opaque -c findlib_config.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_split.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_metatoken.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_meta.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_metascanner.ml - ocamlopt -I +compiler-libs -g -opaque -c fl_topo.ml - ocamlopt -I +compiler-libs -g -opaque -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 -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 -c fl_args.ml - ocamlopt -I +compiler-libs -g -opaque -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 -c ocaml_args.ml - ocamlopt -I +compiler-libs -g -opaque -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. - File "frontend.ml", line 1826, characters 16-29: - 1826 | let buf = String.create buflen in (* FIXME: Bytes.create *) - ^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.create - Use Bytes.create/BytesLabels.create instead. - ocamlopt -I +compiler-libs -g -o ocamlfind_opt findlib.cmxa unix.cmxa \ - ocaml_args.cmx frontend.cmx - ocamlopt -I +compiler-libs -g -opaque -c topfind.ml - File "topfind.ml", line 126, characters 40-63: - 126 | match Hashtbl.find Toploop.directive_table "ppx" with - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 252, characters 4-27: - 252 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 262, characters 4-27: - 262 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 274, characters 4-27: - 274 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 287, characters 4-27: - 287 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 301, characters 4-27: - 301 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "topfind.ml", line 313, characters 4-27: - 313 | Toploop.directive_table - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Toploop.directive_table - File "_none_", line 1: - Warning 58 [no-cmx-file]: no cmx file was found in path for module Topdirs, and its interface was not compiled with -opaque - File "_none_", line 1: - Warning 58 [no-cmx-file]: no cmx file was found in path for module Toploop, and its interface was not compiled with -opaque - 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 -c fl_dynload.ml - ocamlopt -I +compiler-libs -g -a -o findlib_dynload.cmxa fl_dynload.cmx - if [ 1 -gt 0 ]; then \ - ocamlopt -I +compiler-libs -g -shared -o findlib_dynload.cmxs fl_dynload.cmx; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' -> compiled ocamlfind.1.9.1 Processing 38/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] Processing 39/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] [ocamlfind: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1) - if [ "1" -eq 1 ]; then \ - for x in camlp4 dbm graphics labltk num ocamlbuild; do \ - if [ -f "/home/opam/.opam/4.13.0+trunk/lib/$x/META" ]; then \ - if ! grep -Fq '[distributed with Ocaml]' "//home/opam/.opam/4.13.0+trunk/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 - mkdir -p "/home/opam/.opam/4.13.0+trunk/bin" - mkdir -p "/home/opam/.opam/4.13.0+trunk/man" - make install-config - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - mkdir -p "`dirname \"/home/opam/.opam/4.13.0+trunk/lib/findlib.conf\"`" - test -f "/home/opam/.opam/4.13.0+trunk/lib/findlib.conf" || cp findlib.conf "/home/opam/.opam/4.13.0+trunk/lib/findlib.conf" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - for p in findlib; do ( cd src/$p; make install ); done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/findlib" - mkdir -p "/home/opam/.opam/4.13.0+trunk/bin" - test 1 -eq 0 || cp topfind "/home/opam/.opam/4.13.0+trunk/lib/ocaml" - files=` ../../tools/collect_files ../../Makefile.config findlib.cmi findlib.mli findlib.cma findlib.cmxa findlib.a findlib.cmxs topfind.cmi topfind.mli 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` && \ - cp $files "/home/opam/.opam/4.13.0+trunk/lib/findlib" - f="ocamlfind"; { test -f ocamlfind_opt && f="ocamlfind_opt"; }; \ - cp $f "/home/opam/.opam/4.13.0+trunk/bin/ocamlfind" - # the following "if" block is only needed for 4.00beta2 - if [ 1 -eq 0 -a -f "/home/opam/.opam/4.13.0+trunk/lib/ocaml/compiler-libs/topdirs.cmi" ]; then \ - cd "/home/opam/.opam/4.13.0+trunk/lib/ocaml/compiler-libs/"; \ - cp topdirs.cmi toploop.cmi "/home/opam/.opam/4.13.0+trunk/lib/findlib/"; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - make install-meta - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - for x in bigarray bytes compiler-libs dynlink ocamldoc stdlib str threads unix ; do mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/$x"; cp site-lib-src/$x/META "/home/opam/.opam/4.13.0+trunk/lib/$x"; done - mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/findlib"; cp Makefile.packages "/home/opam/.opam/4.13.0+trunk/lib/findlib/Makefile.packages" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - test ! -f 'site-lib-src/num-top/META' || { cd src/findlib; make install-num-top; } - test ! -f 'site-lib-src/camlp4/META' || cp tools/safe_camlp4 "/home/opam/.opam/4.13.0+trunk/bin" - make install-doc - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - mkdir -p "/home/opam/.opam/4.13.0+trunk/man/man1" "/home/opam/.opam/4.13.0+trunk/man/man3" "/home/opam/.opam/4.13.0+trunk/man/man5" - cp doc/ref-man/ocamlfind.1 "/home/opam/.opam/4.13.0+trunk/man/man1" - cp doc/ref-man/META.5 doc/ref-man/site-lib.5 doc/ref-man/findlib.conf.5 "/home/opam/.opam/4.13.0+trunk/man/man5" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - if [ "1" -eq 1 ]; then \ - for x in camlp4 dbm graphics labltk num ocamlbuild; do \ - if [ -f "/home/opam/.opam/4.13.0+trunk/lib/$x/META" ]; then \ - if ! grep -Fq '[distributed with Ocaml]' "//home/opam/.opam/4.13.0+trunk/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 - mkdir -p "/home/opam/.opam/4.13.0+trunk/bin" - mkdir -p "/home/opam/.opam/4.13.0+trunk/man" - make install-config - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - mkdir -p "`dirname \"/home/opam/.opam/4.13.0+trunk/lib/findlib.conf\"`" - test -f "/home/opam/.opam/4.13.0+trunk/lib/findlib.conf" || cp findlib.conf "/home/opam/.opam/4.13.0+trunk/lib/findlib.conf" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - for p in findlib; do ( cd src/$p; make install ); done - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/findlib" - mkdir -p "/home/opam/.opam/4.13.0+trunk/bin" - test 1 -eq 0 || cp topfind "/home/opam/.opam/4.13.0+trunk/lib/ocaml" - files=` ../../tools/collect_files ../../Makefile.config findlib.cmi findlib.mli findlib.cma findlib.cmxa findlib.a findlib.cmxs topfind.cmi topfind.mli 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` && \ - cp $files "/home/opam/.opam/4.13.0+trunk/lib/findlib" - f="ocamlfind"; { test -f ocamlfind_opt && f="ocamlfind_opt"; }; \ - cp $f "/home/opam/.opam/4.13.0+trunk/bin/ocamlfind" - # the following "if" block is only needed for 4.00beta2 - if [ 1 -eq 0 -a -f "/home/opam/.opam/4.13.0+trunk/lib/ocaml/compiler-libs/topdirs.cmi" ]; then \ - cd "/home/opam/.opam/4.13.0+trunk/lib/ocaml/compiler-libs/"; \ - cp topdirs.cmi toploop.cmi "/home/opam/.opam/4.13.0+trunk/lib/findlib/"; \ - fi - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1/src/findlib' - make install-meta - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - for x in bigarray bytes compiler-libs dynlink ocamldoc stdlib str threads unix ; do mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/$x"; cp site-lib-src/$x/META "/home/opam/.opam/4.13.0+trunk/lib/$x"; done - mkdir -p "/home/opam/.opam/4.13.0+trunk/lib/findlib"; cp Makefile.packages "/home/opam/.opam/4.13.0+trunk/lib/findlib/Makefile.packages" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - test ! -f 'site-lib-src/num-top/META' || { cd src/findlib; make install-num-top; } - test ! -f 'site-lib-src/camlp4/META' || cp tools/safe_camlp4 "/home/opam/.opam/4.13.0+trunk/bin" - make install-doc - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' - mkdir -p "/home/opam/.opam/4.13.0+trunk/man/man1" "/home/opam/.opam/4.13.0+trunk/man/man3" "/home/opam/.opam/4.13.0+trunk/man/man5" - cp doc/ref-man/ocamlfind.1 "/home/opam/.opam/4.13.0+trunk/man/man1" - cp doc/ref-man/META.5 doc/ref-man/site-lib.5 doc/ref-man/findlib.conf.5 "/home/opam/.opam/4.13.0+trunk/man/man5" - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlfind.1.9.1' -> installed ocamlfind.1.9.1 Processing 39/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] Processing 40/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] Processing 41/78: [dune: ocaml bootstrap.ml] [num: make] [ocamlbuild: make check-if-preinstalled] [ott: make world] Processing 42/78: [dune: ocaml bootstrap.ml] [num: make] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: ./configure] -> installed base-bytes.base Processing 43/78: [dune: ocaml bootstrap.ml] [num: make] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: ./configure] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "./configure" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/zarith.1.12) - binary ocaml: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamlc: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamldep: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamlmklib: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamldoc: found in /home/opam/.opam/4.13.0+trunk/bin - binary gcc: found in /usr/bin - binary ocamlopt: found in /home/opam/.opam/4.13.0+trunk/bin - checking compilation with gcc -O3 -Wall -Wextra : working - include caml/mlvalues.h: found - library dynlink.cmxa: found - binary ocamlfind: found in /home/opam/.opam/4.13.0+trunk/bin - OCaml's word size is 64 - binary uname: found in /bin - include gmp.h: found - library gmp: found - OCaml supports -bin-annot to produce documentation - - detected configuration: - - native-code: yes - dynamic linking: yes - defines: -DHAS_GMP - libraries: -lgmp - C options: -O3 -Wall -Wextra - installation path: /home/opam/.opam/4.13.0+trunk/lib - installation method findlib - - configuration successful! - now type "make" to build - then type "make install" or "sudo make install" to install - binary ocaml: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamlc: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamldep: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamlmklib: found in /home/opam/.opam/4.13.0+trunk/bin - binary ocamldoc: found in /home/opam/.opam/4.13.0+trunk/bin - binary gcc: found in /usr/bin - binary ocamlopt: found in /home/opam/.opam/4.13.0+trunk/bin - checking compilation with gcc -O3 -Wall -Wextra : working - include caml/mlvalues.h: found - library dynlink.cmxa: found - binary ocamlfind: found in /home/opam/.opam/4.13.0+trunk/bin - OCaml's word size is 64 - binary uname: found in /bin - include gmp.h: found - library gmp: found - OCaml supports -bin-annot to produce documentation - - detected configuration: - - native-code: yes - dynamic linking: yes - defines: -DHAS_GMP - libraries: -lgmp - C options: -O3 -Wall -Wextra - installation path: /home/opam/.opam/4.13.0+trunk/lib - installation method findlib - - configuration successful! - now type "make" to build - then type "make install" or "sudo make install" to install Processing 43/78: [dune: ocaml bootstrap.ml] [num: make] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: make] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4) - make -C src all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - make -C toplevel all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/toplevel' - make -C src all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - make -C toplevel all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/toplevel' -> compiled num.1.4 Processing 43/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: make] Processing 44/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: make] [num: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4) - make -C src install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - install -d /home/opam/.opam/4.13.0+trunk/lib/ocaml - sed -e 's/%%VERSION%%/1.4/g' META.in > META - ocamlfind install num META - Installed /home/opam/.opam/4.13.0+trunk/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 /home/opam/.opam/4.13.0+trunk/lib/ocaml - install -d /home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs - install dllnums.so /home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - make -C toplevel install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top_printers.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/META - rm -f META - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/toplevel' - make -C src install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - install -d /home/opam/.opam/4.13.0+trunk/lib/ocaml - sed -e 's/%%VERSION%%/1.4/g' META.in > META - ocamlfind install num META - Installed /home/opam/.opam/4.13.0+trunk/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 /home/opam/.opam/4.13.0+trunk/lib/ocaml - install -d /home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs - install dllnums.so /home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/src' - make -C toplevel install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.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 /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top_printers.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/num_top.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/num-top/META - rm -f META - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/num.1.4/toplevel' -> installed num.1.4 Processing 44/78: [dune: ocaml bootstrap.ml] [ocamlbuild: make check-if-preinstalled] [ott: make world] [zarith: make] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "check-if-preinstalled" "all" "opam-install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0) - if test -d /home/opam/.opam/4.13.0+trunk/lib/ocaml/ocamlbuild; then\ - >&2 echo "ERROR: Preinstalled ocamlbuild detected at"\ - "/home/opam/.opam/4.13.0+trunk/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 +unix -safe-string -bin-annot -strict-sequence -c src/const.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/signatures.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml - File "src/my_std.ml", line 127, characters 20-38: - 127 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/display.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/display.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/log.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/log.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_ast.mli - ocamlc.opt -w L -w R -w Z -I src -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 +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob.mli - ocamlc.opt -w L -w R -w Z -I src -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 +unix -safe-string -bin-annot -strict-sequence -c src/lexers.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/lexers.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/command.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/command.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_config.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/options.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/options.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/report.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/report.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/main.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/main.ml - File "src/main.ml", line 289, characters 4-19: - 289 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 310, characters 10-25: - 310 | Pervasives.exit rc_ok - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 313, characters 10-25: - 313 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.ml - File "src/ocamlbuild_executor.ml", line 86, characters 24-41: - 86 | ?(display=(fun f -> f Pervasives.stdout)) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.ml - ocamlc.opt -I +unix -I src -o ocamlbuild.byte unix.cma src/ocamlbuild_pack.cmo src/ocamlbuild_plugin.cmo src/ocamlbuild_executor.cmo src/ocamlbuild_unix_plugin.cmo src/ocamlbuild.cmo - ocamlc.opt -a -o src/ocamlbuildlib.cma src/ocamlbuild_pack.cmo src/ocamlbuild_plugin.cmo src/ocamlbuild_executor.cmo src/ocamlbuild_unix_plugin.cmo - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -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 +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 +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 +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml - File "src/my_std.ml", line 127, characters 20-38: - 127 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +unix -safe-string -bin-annot -strict-sequence -c src/main.ml - File "src/main.ml", line 289, characters 4-19: - 289 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 310, characters 10-25: - 310 | Pervasives.exit rc_ok - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 313, characters 10-25: - 313 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.ml - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.ml - File "src/ocamlbuild_executor.ml", line 86, characters 24-41: - 86 | ?(display=(fun f -> f Pervasives.stdout)) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.ml - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.ml - ocamlopt.opt -I +unix -I src -o ocamlbuild.native unix.cmxa src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx src/ocamlbuild.cmx - ocamlopt.opt -a -o src/ocamlbuildlib.cmxa src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx - ocamlc.opt src/ocamlbuild_pack.cmo -I src man/options_man.ml -o man/options_man.byte - ./man/options_man.byte > man/ocamlbuild.options.1 - cat man/ocamlbuild.header.1 man/ocamlbuild.options.1 man/ocamlbuild.footer.1 > man/ocamlbuild.1 - make ocamlbuild.install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - rm -f ocamlbuild.install - touch ocamlbuild.install - make install-bin-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'bin: [' >> ocamlbuild.install - echo ' "ocamlbuild.byte" {"ocamlbuild.byte"}' >> ocamlbuild.install - echo ' "ocamlbuild.native" {"ocamlbuild.native"}' >> ocamlbuild.install - echo ' "ocamlbuild.native" {"ocamlbuild"}' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'lib: [' >> ocamlbuild.install - make install-lib-basics-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo ' "ocamlbuild.opam" {"opam"}' >> ocamlbuild.install - echo ' "META"' >> ocamlbuild.install - for lib in src/signatures.mli src/signatures.cmi src/signatures.cmti; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-byte-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - for lib in src/ocamlbuildlib.cma src/ocamlbuild.cmo src/ocamlbuild_pack.cmi src/ocamlbuild_plugin.cmi src/ocamlbuild_executor.cmi src/ocamlbuild_unix_plugin.cmi; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-native-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - for lib in src/ocamlbuildlib.cmxa src/ocamlbuildlib.a src/ocamlbuild.cmx src/ocamlbuild.o src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx src/ocamlbuild_plugin.o src/ocamlbuild_executor.o src/ocamlbuild_unix_plugin.o; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-man-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'man: [' >> ocamlbuild.install - echo ' "man/ocamlbuild.1" {"man1/ocamlbuild.1"}' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-doc-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'doc: [' >> ocamlbuild.install - echo ' "LICENSE"' >> ocamlbuild.install - echo ' "Changes"' >> ocamlbuild.install - echo ' "Readme.md"' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - if test -d /home/opam/.opam/4.13.0+trunk/lib/ocaml/ocamlbuild; then\ - >&2 echo "ERROR: Preinstalled ocamlbuild detected at"\ - "/home/opam/.opam/4.13.0+trunk/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 +unix -safe-string -bin-annot -strict-sequence -c src/const.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/loc.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/discard_printf.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/signatures.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml - File "src/my_std.ml", line 127, characters 20-38: - 127 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/my_unix.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/display.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/display.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/log.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/log.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/shell.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/bool.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_ast.mli - ocamlc.opt -w L -w R -w Z -I src -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 +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob_lexer.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/glob.mli - ocamlc.opt -w L -w R -w Z -I src -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 +unix -safe-string -bin-annot -strict-sequence -c src/lexers.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/lexers.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/param_tags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/command.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/command.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_config.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_where.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/slurp.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/options.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/options.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/pathname.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/configuration.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/flags.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hygiene.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/digest_cache.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/resource.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/rule.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/solver.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/report.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/report.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/tools.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/fda.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/findlib.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_arch.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_utils.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_dependencies.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_compiler.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_tools.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocaml_specific.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/exit_codes.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/hooks.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/main.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/main.ml - File "src/main.ml", line 289, characters 4-19: - 289 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 310, characters 10-25: - 310 | Pervasives.exit rc_ok - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 313, characters 10-25: - 313 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.ml - File "src/ocamlbuild_executor.ml", line 86, characters 24-41: - 86 | ?(display=(fun f -> f Pervasives.stdout)) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.ml - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.mli - ocamlc.opt -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.ml - ocamlc.opt -I +unix -I src -o ocamlbuild.byte unix.cma src/ocamlbuild_pack.cmo src/ocamlbuild_plugin.cmo src/ocamlbuild_executor.cmo src/ocamlbuild_unix_plugin.cmo src/ocamlbuild.cmo - ocamlc.opt -a -o src/ocamlbuildlib.cma src/ocamlbuild_pack.cmo src/ocamlbuild_plugin.cmo src/ocamlbuild_executor.cmo src/ocamlbuild_unix_plugin.cmo - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -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 +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 +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 +unix -safe-string -bin-annot -strict-sequence -c src/my_std.ml - File "src/my_std.ml", line 127, characters 20-38: - 127 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +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 +unix -safe-string -bin-annot -strict-sequence -c src/main.ml - File "src/main.ml", line 289, characters 4-19: - 289 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 310, characters 10-25: - 310 | Pervasives.exit rc_ok - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/main.ml", line 313, characters 10-25: - 313 | Pervasives.exit rc - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_plugin.ml - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_executor.ml - File "src/ocamlbuild_executor.ml", line 86, characters 24-41: - 86 | ?(display=(fun f -> f Pervasives.stdout)) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild_unix_plugin.ml - ocamlopt.opt -for-pack Ocamlbuild_pack -w L -w R -w Z -I src -I +unix -safe-string -bin-annot -strict-sequence -c src/ocamlbuild.ml - ocamlopt.opt -I +unix -I src -o ocamlbuild.native unix.cmxa src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx src/ocamlbuild.cmx - ocamlopt.opt -a -o src/ocamlbuildlib.cmxa src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx - ocamlc.opt src/ocamlbuild_pack.cmo -I src man/options_man.ml -o man/options_man.byte - ./man/options_man.byte > man/ocamlbuild.options.1 - cat man/ocamlbuild.header.1 man/ocamlbuild.options.1 man/ocamlbuild.footer.1 > man/ocamlbuild.1 - make ocamlbuild.install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - rm -f ocamlbuild.install - touch ocamlbuild.install - make install-bin-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'bin: [' >> ocamlbuild.install - echo ' "ocamlbuild.byte" {"ocamlbuild.byte"}' >> ocamlbuild.install - echo ' "ocamlbuild.native" {"ocamlbuild.native"}' >> ocamlbuild.install - echo ' "ocamlbuild.native" {"ocamlbuild"}' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'lib: [' >> ocamlbuild.install - make install-lib-basics-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo ' "ocamlbuild.opam" {"opam"}' >> ocamlbuild.install - echo ' "META"' >> ocamlbuild.install - for lib in src/signatures.mli src/signatures.cmi src/signatures.cmti; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-byte-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - for lib in src/ocamlbuildlib.cma src/ocamlbuild.cmo src/ocamlbuild_pack.cmi src/ocamlbuild_plugin.cmi src/ocamlbuild_executor.cmi src/ocamlbuild_unix_plugin.cmi; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-lib-native-opam - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - for lib in src/ocamlbuildlib.cmxa src/ocamlbuildlib.a src/ocamlbuild.cmx src/ocamlbuild.o src/ocamlbuild_pack.cmx src/ocamlbuild_plugin.cmx src/ocamlbuild_executor.cmx src/ocamlbuild_unix_plugin.cmx src/ocamlbuild_plugin.o src/ocamlbuild_executor.o src/ocamlbuild_unix_plugin.o; do \ - echo " \"$lib\" {\"$(basename $lib)\"}" >> ocamlbuild.install; \ - done - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-man-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'man: [' >> ocamlbuild.install - echo ' "man/ocamlbuild.1" {"man1/ocamlbuild.1"}' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - echo >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make install-doc-opam - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - echo 'doc: [' >> ocamlbuild.install - echo ' "LICENSE"' >> ocamlbuild.install - echo ' "Changes"' >> ocamlbuild.install - echo ' "Readme.md"' >> ocamlbuild.install - echo ']' >> ocamlbuild.install - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ocamlbuild.0.14.0' -> compiled ocamlbuild.0.14.0 Processing 44/78: [dune: ocaml bootstrap.ml] [ott: make world] [zarith: make] -> installed ocamlbuild.0.14.0 Processing 45/78: [dune: ocaml bootstrap.ml] [ott: make world] [zarith: make] Processing 46/78: [dune: ocaml bootstrap.ml] [omd: ocaml setup.ml] [ott: make world] [zarith: make] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/zarith.1.12) - (echo "let"; grep "version" META | head -1) > zarith_version.ml - ocamldep -native zarith_version.ml z.ml q.ml big_int_Z.ml z.mli q.mli big_int_Z.mli > depend - ocamlc -I +compiler-libs -bin-annot -c zarith_version.ml - ocamlc -I +compiler-libs -bin-annot -c z.mli - ocamlc -I +compiler-libs -bin-annot -c z.ml - ocamlc -I +compiler-libs -bin-annot -c q.mli - ocamlc -I +compiler-libs -bin-annot -c q.ml - File "q.ml", line 537, characters 9-23: - 537 | (Z.of_substring s 0 i) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "q.ml", line 538, characters 9-23: - 538 | (Z.of_substring s (i+1) (String.length s-i-1)) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlc -I +compiler-libs -bin-annot -c big_int_Z.mli - ocamlc -I +compiler-libs -bin-annot -c big_int_Z.ml - ocamlmklib -failsafe -o zarith zarith_version.cmo z.cmo q.cmo big_int_Z.cmo -lgmp - ocamlc -ccopt "-I/home/opam/.opam/4.13.0+trunk/lib/ocaml -DHAS_GMP -O3 -Wall -Wextra " -c caml_z.c - ocamlmklib -failsafe -o zarith caml_z.o -lgmp - ocamlc -I +compiler-libs -bin-annot -c zarith_top.ml - ocamlc -o zarith_top.cma -a zarith_top.cmo - ocamlopt -I +compiler-libs -c zarith_version.ml - ocamlopt -I +compiler-libs -c z.ml - ocamlopt -I +compiler-libs -c q.ml - File "q.ml", line 537, characters 9-23: - 537 | (Z.of_substring s 0 i) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "q.ml", line 538, characters 9-23: - 538 | (Z.of_substring s (i+1) (String.length s-i-1)) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlopt -I +compiler-libs -c big_int_Z.ml - ocamlmklib -failsafe -o zarith zarith_version.cmx z.cmx q.cmx big_int_Z.cmx -lgmp - ocamlopt -shared -o zarith.cmxs -I . zarith.cmxa -linkall - (echo "let"; grep "version" META | head -1) > zarith_version.ml - ocamldep -native zarith_version.ml z.ml q.ml big_int_Z.ml z.mli q.mli big_int_Z.mli > depend - ocamlc -I +compiler-libs -bin-annot -c zarith_version.ml - ocamlc -I +compiler-libs -bin-annot -c z.mli - ocamlc -I +compiler-libs -bin-annot -c z.ml - ocamlc -I +compiler-libs -bin-annot -c q.mli - ocamlc -I +compiler-libs -bin-annot -c q.ml - File "q.ml", line 537, characters 9-23: - 537 | (Z.of_substring s 0 i) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "q.ml", line 538, characters 9-23: - 538 | (Z.of_substring s (i+1) (String.length s-i-1)) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlc -I +compiler-libs -bin-annot -c big_int_Z.mli - ocamlc -I +compiler-libs -bin-annot -c big_int_Z.ml - ocamlmklib -failsafe -o zarith zarith_version.cmo z.cmo q.cmo big_int_Z.cmo -lgmp - ocamlc -ccopt "-I/home/opam/.opam/4.13.0+trunk/lib/ocaml -DHAS_GMP -O3 -Wall -Wextra " -c caml_z.c - ocamlmklib -failsafe -o zarith caml_z.o -lgmp - ocamlc -I +compiler-libs -bin-annot -c zarith_top.ml - ocamlc -o zarith_top.cma -a zarith_top.cmo - ocamlopt -I +compiler-libs -c zarith_version.ml - ocamlopt -I +compiler-libs -c z.ml - ocamlopt -I +compiler-libs -c q.ml - File "q.ml", line 537, characters 9-23: - 537 | (Z.of_substring s 0 i) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "q.ml", line 538, characters 9-23: - 538 | (Z.of_substring s (i+1) (String.length s-i-1)) - ^^^^^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlopt -I +compiler-libs -c big_int_Z.ml - ocamlmklib -failsafe -o zarith zarith_version.cmx z.cmx q.cmx big_int_Z.cmx -lgmp - ocamlopt -shared -o zarith.cmxs -I . zarith.cmxa -linkall -> compiled zarith.1.12 Processing 46/78: [dune: ocaml bootstrap.ml] [omd: ocaml setup.ml] [ott: make world] Processing 47/78: [dune: ocaml bootstrap.ml] [omd: ocaml setup.ml] [ott: make world] [zarith: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/zarith.1.12) - ocamlfind install -destdir "/home/opam/.opam/4.13.0+trunk/lib" zarith META zarith.cma libzarith.a z.cmi q.cmi big_int_Z.cmi zarith_top.cma z.mli zarith.cmxa z.cmx q.cmx big_int_Z.cmx zarith.cmxs zarith.h q.mli big_int_Z.mli zarith.a z.cmti q.cmti big_int_Z.cmti -optional dllzarith.so - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.a - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.h - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cmxs - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith_top.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/libzarith.a - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/stublibs/dllzarith.so - Installed /home/opam/.opam/4.13.0+trunk/lib/stublibs/dllzarith.so.owner - ocamlfind: [WARNING] You have installed DLLs but the directory /home/opam/.opam/4.13.0+trunk/lib/stublibs is not mentioned in ld.conf - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/META - ocamlfind install -destdir "/home/opam/.opam/4.13.0+trunk/lib" zarith META zarith.cma libzarith.a z.cmi q.cmi big_int_Z.cmi zarith_top.cma z.mli zarith.cmxa z.cmx q.cmx big_int_Z.cmx zarith.cmxs zarith.h q.mli big_int_Z.mli zarith.a z.cmti q.cmti big_int_Z.cmti -optional dllzarith.so - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.a - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.h - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cmxs - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith_top.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/big_int_Z.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/q.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/z.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/libzarith.a - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/zarith.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/stublibs/dllzarith.so - Installed /home/opam/.opam/4.13.0+trunk/lib/stublibs/dllzarith.so.owner - ocamlfind: [WARNING] You have installed DLLs but the directory /home/opam/.opam/4.13.0+trunk/lib/stublibs is not mentioned in ld.conf - Installed /home/opam/.opam/4.13.0+trunk/lib/zarith/META -> installed zarith.1.12 Processing 47/78: [dune: ocaml bootstrap.ml] [omd: ocaml setup.ml] [ott: make world] Processing 48/78: [dune: ocaml bootstrap.ml] [lem: make] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "ocaml" "setup.ml" "-configure" "--prefix" "/home/opam/.opam/4.13.0+trunk" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/omd.1.3.1) - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - - Configuration: - ocamlfind: ........................................... /home/opam/.opam/4.13.0+trunk/bin/ocamlfind - ocamlc: .............................................. /home/opam/.opam/4.13.0+trunk/bin/ocamlc.opt - ocamlopt: ............................................ /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt - ocamlbuild: .......................................... /home/opam/.opam/4.13.0+trunk/bin/ocamlbuild - Package name: ........................................ omd - Package version: ..................................... 1.3.1 - os_type: ............................................. Unix - system: .............................................. linux - architecture: ........................................ amd64 - ccomp_type: .......................................... cc - ocaml_version: ....................................... 4.13.0 - standard_library_default: ............................ /home/opam/.opam/4.13.0+trunk/lib/ocaml - standard_library: .................................... /home/opam/.opam/4.13.0+trunk/lib/ocaml - bytecomp_c_compiler: ................................. gcc -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -D_FILE_OFFSET_BITS=64 - native_c_compiler: ................................... gcc -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -D_FILE_OFFSET_BITS=64 - model: ............................................... default - ext_obj: ............................................. .o - ext_asm: ............................................. .s - ext_lib: ............................................. .a - ext_dll: ............................................. .so - default_executable_name: ............................. a.out - systhread_supported: ................................. true - Install architecture-independent files dir: .......... /home/opam/.opam/4.13.0+trunk - Install architecture-dependent files in dir: ......... $prefix - User executables: .................................... $exec_prefix/bin - System admin executables: ............................ $exec_prefix/sbin - Program executables: ................................. $exec_prefix/libexec - Read-only single-machine data: ....................... $prefix/etc - Modifiable architecture-independent data: ............ $prefix/com - Modifiable single-machine data: ...................... $prefix/var - Object code libraries: ............................... $exec_prefix/lib - Read-only arch-independent data root: ................ $prefix/share - Read-only architecture-independent data: ............. $datarootdir - Info documentation: .................................. $datarootdir/info - Locale-dependent data: ............................... $datarootdir/locale - Man documentation: ................................... $datarootdir/man - Documentation root: .................................. $datarootdir/doc/$pkg_name - HTML documentation: .................................. $docdir - DVI documentation: ................................... $docdir - PDF documentation: ................................... $docdir - PS documentation: .................................... $docdir - findlib_version: ..................................... 1.9.1 - is_native: ........................................... true - suffix_program: ...................................... - Remove a file.: ...................................... rm -f - Remove a directory.: ................................. rm -rf - Turn ocaml debug flag on: ............................ true - Turn ocaml profile flag on: .......................... false - Compiler support generation of .cmxs.: ............... true - OCamlbuild additional flags: ......................... - Create documentations: ............................... true - Compile tests executable and library and run them: ... false - pkg_bigarray: ........................................ /home/opam/.opam/4.13.0+trunk/lib/ocaml - pkg_bytes: ........................................... /home/opam/.opam/4.13.0+trunk/lib/bytes - - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - - Configuration: - ocamlfind: ........................................... /home/opam/.opam/4.13.0+trunk/bin/ocamlfind - ocamlc: .............................................. /home/opam/.opam/4.13.0+trunk/bin/ocamlc.opt - ocamlopt: ............................................ /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt - ocamlbuild: .......................................... /home/opam/.opam/4.13.0+trunk/bin/ocamlbuild - Package name: ........................................ omd - Package version: ..................................... 1.3.1 - os_type: ............................................. Unix - system: .............................................. linux - architecture: ........................................ amd64 - ccomp_type: .......................................... cc - ocaml_version: ....................................... 4.13.0 - standard_library_default: ............................ /home/opam/.opam/4.13.0+trunk/lib/ocaml - standard_library: .................................... /home/opam/.opam/4.13.0+trunk/lib/ocaml - bytecomp_c_compiler: ................................. gcc -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -D_FILE_OFFSET_BITS=64 - native_c_compiler: ................................... gcc -O2 -fno-strict-aliasing -fwrapv -pthread -fPIC -D_FILE_OFFSET_BITS=64 - model: ............................................... default - ext_obj: ............................................. .o - ext_asm: ............................................. .s - ext_lib: ............................................. .a - ext_dll: ............................................. .so - default_executable_name: ............................. a.out - systhread_supported: ................................. true - Install architecture-independent files dir: .......... /home/opam/.opam/4.13.0+trunk - Install architecture-dependent files in dir: ......... $prefix - User executables: .................................... $exec_prefix/bin - System admin executables: ............................ $exec_prefix/sbin - Program executables: ................................. $exec_prefix/libexec - Read-only single-machine data: ....................... $prefix/etc - Modifiable architecture-independent data: ............ $prefix/com - Modifiable single-machine data: ...................... $prefix/var - Object code libraries: ............................... $exec_prefix/lib - Read-only arch-independent data root: ................ $prefix/share - Read-only architecture-independent data: ............. $datarootdir - Info documentation: .................................. $datarootdir/info - Locale-dependent data: ............................... $datarootdir/locale - Man documentation: ................................... $datarootdir/man - Documentation root: .................................. $datarootdir/doc/$pkg_name - HTML documentation: .................................. $docdir - DVI documentation: ................................... $docdir - PDF documentation: ................................... $docdir - PS documentation: .................................... $docdir - findlib_version: ..................................... 1.9.1 - is_native: ........................................... true - suffix_program: ...................................... - Remove a file.: ...................................... rm -f - Remove a directory.: ................................. rm -rf - Turn ocaml debug flag on: ............................ true - Turn ocaml profile flag on: .......................... false - Compiler support generation of .cmxs.: ............... true - OCamlbuild additional flags: ......................... - Create documentations: ............................... true - Compile tests executable and library and run them: ... false - pkg_bigarray: ........................................ /home/opam/.opam/4.13.0+trunk/lib/ocaml - pkg_bytes: ........................................... /home/opam/.opam/4.13.0+trunk/lib/bytes - + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "ocaml" "bootstrap.ml" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/dune.2.9.0) - File "./bootstrap.ml", line 46, characters 17-27: - 46 | && String.sub fn 0 (String.length duneboot) = duneboot - ^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "./bootstrap.ml", line 103, characters 28-37: - 103 | let args = Array.to_list (Array.sub Sys.argv 1 (Array.length Sys.argv - 1)) in - ^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlc -output-complete-exe -w -24 -g -o .duneboot.exe -I boot unix.cma boot/libs.ml boot/duneboot.ml - ./.duneboot.exe -j 71 - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_base.ml - File "vendor/cmdliner/src/cmdliner_base.ml", line 158, characters 14-27: - Warning 6 [labels-omitted]: labels kind, ambs were omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_docgen.ml - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 278, characters 23-39: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 293, characters 22-56: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 294, characters 35-51: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 295, characters 36-52: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_cline.ml - File "vendor/cmdliner/src/cmdliner_cline.ml", line 128, characters 20-47: - Warning 6 [labels-omitted]: labels kind, ambs were omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_arg.ml - File "vendor/cmdliner/src/cmdliner_arg.ml", line 193, characters 24-50: - Warning 6 [labels-omitted]: label err was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_arg.ml", line 243, characters 24-50: - Warning 6 [labels-omitted]: label err was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_arg.ml", line 260, characters 10-36: - Warning 6 [labels-omitted]: label pos was omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner.ml - File "vendor/cmdliner/src/cmdliner.ml", line 195, characters 25-47: - Warning 6 [labels-omitted]: label errs was omitted in the application of this function. - - File "./bootstrap.ml", line 46, characters 17-27: - 46 | && String.sub fn 0 (String.length duneboot) = duneboot - ^^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - File "./bootstrap.ml", line 103, characters 28-37: - 103 | let args = Array.to_list (Array.sub Sys.argv 1 (Array.length Sys.argv - 1)) in - ^^^^^^^^^ - Warning 6 [labels-omitted]: labels pos, len were omitted in the application of this function. - ocamlc -output-complete-exe -w -24 -g -o .duneboot.exe -I boot unix.cma boot/libs.ml boot/duneboot.ml - ./.duneboot.exe -j 71 - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_base.ml - File "vendor/cmdliner/src/cmdliner_base.ml", line 158, characters 14-27: - Warning 6 [labels-omitted]: labels kind, ambs were omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_docgen.ml - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 278, characters 23-39: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 293, characters 22-56: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 294, characters 35-51: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_docgen.ml", line 295, characters 36-52: - Warning 6 [labels-omitted]: label sec was omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_cline.ml - File "vendor/cmdliner/src/cmdliner_cline.ml", line 128, characters 20-47: - Warning 6 [labels-omitted]: labels kind, ambs were omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner_arg.ml - File "vendor/cmdliner/src/cmdliner_arg.ml", line 193, characters 24-50: - Warning 6 [labels-omitted]: label err was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_arg.ml", line 243, characters 24-50: - Warning 6 [labels-omitted]: label err was omitted in the application of this function. - File "vendor/cmdliner/src/cmdliner_arg.ml", line 260, characters 10-36: - Warning 6 [labels-omitted]: label pos was omitted in the application of this function. - cd _boot && /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt -c -g -no-alias-deps -w -49 -I +threads cmdliner.ml - File "vendor/cmdliner/src/cmdliner.ml", line 195, characters 25-47: - Warning 6 [labels-omitted]: label errs was omitted in the application of this function. - Processing 48/78: [dune: ./dune.exe build] [lem: make] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "./dune.exe" "build" "-p" "dune" "--profile" "dune-bootstrap" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/dune.2.9.0) -> compiled dune.2.9.0 Processing 48/78: [lem: make] [omd: ocaml setup.ml] [ott: make world] -> installed dune.2.9.0 Processing 49/78: [lem: make] [omd: ocaml setup.ml] [ott: make world] Processing 50/78: [base64: dune build] [lem: make] [omd: ocaml setup.ml] [ott: make world] Processing 51/78: [base64: dune build] [cppo: dune build] [lem: make] [omd: ocaml setup.ml] [ott: make world] Processing 52/78: [base64: dune build] [cppo: dune build] [easy-format: dune build] [lem: make] [omd: ocaml setup.ml] [ott: make world] Processing 53/78: [base64: dune build] [cppo: dune build] [easy-format: dune build] [lem: make] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] Processing 54/78: [base64: dune build] [cppo: dune build] [easy-format: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] Processing 55/78: [base64: dune build] [cppo: dune build] [easy-format: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] Processing 56/78: [base64: dune build] [cppo: dune build] [easy-format: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] [result: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "easy-format" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/easy-format.1.3.2) - ocamlc src/.easy_format.objs/byte/easy_format.{cmo,cmt} - File "src/easy_format.ml", line 203, characters 16-46: - 203 | let tagf0 = pp_get_formatter_tag_functions fmt () in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 232, characters 4-34: - 232 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 264, characters 9-39: - 264 | (pp_get_formatter_tag_functions fmt ()) with - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 269, characters 6-36: - 269 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 322, characters 16-27: - 322 | | Some s -> pp_open_tag fmt s - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 326, characters 16-28: - 326 | | Some _ -> pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - File "src/easy_format.ml", line 332, characters 10-21: - 332 | pp_open_tag fmt tag; - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 334, characters 10-22: - 334 | pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - ocamlopt src/.easy_format.objs/native/easy_format.{cmx,o} - File "src/easy_format.ml", line 203, characters 16-46: - 203 | let tagf0 = pp_get_formatter_tag_functions fmt () in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 232, characters 4-34: - 232 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 264, characters 9-39: - 264 | (pp_get_formatter_tag_functions fmt ()) with - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 269, characters 6-36: - 269 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 322, characters 16-27: - 322 | | Some s -> pp_open_tag fmt s - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 326, characters 16-28: - 326 | | Some _ -> pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - File "src/easy_format.ml", line 332, characters 10-21: - 332 | pp_open_tag fmt tag; - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 334, characters 10-22: - 334 | pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - ocamlc src/.easy_format.objs/byte/easy_format.{cmo,cmt} - File "src/easy_format.ml", line 203, characters 16-46: - 203 | let tagf0 = pp_get_formatter_tag_functions fmt () in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 232, characters 4-34: - 232 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 264, characters 9-39: - 264 | (pp_get_formatter_tag_functions fmt ()) with - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 269, characters 6-36: - 269 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 322, characters 16-27: - 322 | | Some s -> pp_open_tag fmt s - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 326, characters 16-28: - 326 | | Some _ -> pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - File "src/easy_format.ml", line 332, characters 10-21: - 332 | pp_open_tag fmt tag; - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 334, characters 10-22: - 334 | pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - ocamlopt src/.easy_format.objs/native/easy_format.{cmx,o} - File "src/easy_format.ml", line 203, characters 16-46: - 203 | let tagf0 = pp_get_formatter_tag_functions fmt () in - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 232, characters 4-34: - 232 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 264, characters 9-39: - 264 | (pp_get_formatter_tag_functions fmt ()) with - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_get_formatter_tag_functions - Use Format.pp_get_formatter_stag_functions. - File "src/easy_format.ml", line 269, characters 6-36: - 269 | pp_set_formatter_tag_functions fmt tagf - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_set_formatter_tag_functions - This function will erase non-string tag formatting functions. Use Format.pp_set_formatter_stag_functions. - File "src/easy_format.ml", line 322, characters 16-27: - 322 | | Some s -> pp_open_tag fmt s - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 326, characters 16-28: - 326 | | Some _ -> pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. - File "src/easy_format.ml", line 332, characters 10-21: - 332 | pp_open_tag fmt tag; - ^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_open_tag - Use Format.pp_open_stag. - File "src/easy_format.ml", line 334, characters 10-22: - 334 | pp_close_tag fmt () - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Format.pp_close_tag - Use Format.pp_close_stag. -> compiled easy-format.1.3.2 Processing 56/78: [base64: dune build] [cppo: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] [result: dune build] -> installed easy-format.1.3.2 Processing 57/78: [base64: dune build] [cppo: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] [result: dune build] Processing 58/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] [result: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "result" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/result.1.5) -> compiled result.1.5 Processing 58/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] -> installed result.1.5 Processing 59/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] Processing 60/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [menhirSdk: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "menhirSdk" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/menhirSdk.20210419) -> compiled menhirSdk.20210419 Processing 60/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] -> installed menhirSdk.20210419 Processing 61/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] [pprint: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "pprint" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/pprint.20200410) -> compiled pprint.20200410 Processing 61/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed pprint.20200410 Processing 62/78: [base64: dune build] [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "base64" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/base64.3.5.0) -> compiled base64.3.5.0 Processing 62/78: [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed base64.3.5.0 Processing 63/78: [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhirLib: dune build] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "menhirLib" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/menhirLib.20210419) - pack lib/pack/menhirLib.{ml,mli} - Creating menhirLib.ml... - Creating menhirLib.mli... - pack lib/pack/menhirLib.{ml,mli} - Creating menhirLib.ml... - Creating menhirLib.mli... -> compiled menhirLib.20210419 Processing 63/78: [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed menhirLib.20210419 Processing 64/78: [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [omd: ocaml setup.ml] [ott: make world] Processing 65/78: [biniou: dune build] [cppo: dune build] [lem: make] [linenoise: dune build] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "@install" "-p" "linenoise" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linenoise.1.3.1) -> compiled linenoise.1.3.1 Processing 65/78: [biniou: dune build] [cppo: dune build] [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed linenoise.1.3.1 Processing 66/78: [biniou: dune build] [cppo: dune build] [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "biniou" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/biniou.1.2.1) -> compiled biniou.1.2.1 Processing 66/78: [cppo: dune build] [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed biniou.1.2.1 Processing 67/78: [cppo: dune build] [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "cppo" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/cppo.1.6.7) -> compiled cppo.1.6.7 Processing 67/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] -> installed cppo.1.6.7 Processing 68/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] Processing 69/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make world] [yojson: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "world" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31) - cd src; make install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/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 - cd .. && tar -zxvf ocamlgraph-1.7.tar.gz - ocamlgraph-1.7/ - ocamlgraph-1.7/bin/ - ocamlgraph-1.7/src/ - ocamlgraph-1.7/src/blocks.ml - ocamlgraph-1.7/src/builder.ml - ocamlgraph-1.7/src/builder.mli - ocamlgraph-1.7/src/classic.ml - ocamlgraph-1.7/src/classic.mli - ocamlgraph-1.7/src/cliquetree.ml - ocamlgraph-1.7/src/cliquetree.mli - ocamlgraph-1.7/src/coloring.ml - ocamlgraph-1.7/src/coloring.mli - ocamlgraph-1.7/src/components.ml - ocamlgraph-1.7/src/components.mli - ocamlgraph-1.7/src/delaunay.ml - ocamlgraph-1.7/src/delaunay.mli - ocamlgraph-1.7/src/dot.ml - ocamlgraph-1.7/src/dot.mli - ocamlgraph-1.7/src/dot_ast.mli - ocamlgraph-1.7/src/dot_lexer.ml - ocamlgraph-1.7/src/dot_lexer.mll - ocamlgraph-1.7/src/dot_parser.ml - ocamlgraph-1.7/src/dot_parser.mli - ocamlgraph-1.7/src/dot_parser.mly - ocamlgraph-1.7/src/flow.ml - ocamlgraph-1.7/src/flow.mli - ocamlgraph-1.7/src/gmap.ml - ocamlgraph-1.7/src/gmap.mli - ocamlgraph-1.7/src/gml.ml - ocamlgraph-1.7/src/gml.mli - ocamlgraph-1.7/src/gml.mll - ocamlgraph-1.7/src/graphviz.ml - ocamlgraph-1.7/src/graphviz.mli - ocamlgraph-1.7/src/imperative.ml - ocamlgraph-1.7/src/imperative.mli - ocamlgraph-1.7/src/kruskal.ml - ocamlgraph-1.7/src/kruskal.mli - ocamlgraph-1.7/src/mcs_m.ml - ocamlgraph-1.7/src/mcs_m.mli - ocamlgraph-1.7/src/md.ml - ocamlgraph-1.7/src/md.mli - ocamlgraph-1.7/src/minsep.ml - ocamlgraph-1.7/src/minsep.mli - ocamlgraph-1.7/src/oper.ml - ocamlgraph-1.7/src/oper.mli - ocamlgraph-1.7/src/pack.ml - ocamlgraph-1.7/src/pack.mli - ocamlgraph-1.7/src/path.ml - ocamlgraph-1.7/src/path.mli - ocamlgraph-1.7/src/persistent.ml - ocamlgraph-1.7/src/persistent.mli - ocamlgraph-1.7/src/rand.ml - ocamlgraph-1.7/src/rand.mli - ocamlgraph-1.7/src/sig.mli - ocamlgraph-1.7/src/sig_pack.mli - ocamlgraph-1.7/src/strat.ml - ocamlgraph-1.7/src/strat.mli - ocamlgraph-1.7/src/topological.ml - ocamlgraph-1.7/src/topological.mli - ocamlgraph-1.7/src/traverse.ml - ocamlgraph-1.7/src/traverse.mli - ocamlgraph-1.7/src/util.ml - ocamlgraph-1.7/src/util.mli - ocamlgraph-1.7/src/version.ml - ocamlgraph-1.7/lib/ - ocamlgraph-1.7/lib/bitv.ml - ocamlgraph-1.7/lib/bitv.mli - ocamlgraph-1.7/lib/heap.ml - ocamlgraph-1.7/lib/heap.mli - ocamlgraph-1.7/lib/unionfind.ml - ocamlgraph-1.7/lib/unionfind.mli - ocamlgraph-1.7/Makefile.in - ocamlgraph-1.7/configure - ocamlgraph-1.7/configure.in - ocamlgraph-1.7/META.in - ocamlgraph-1.7/.depend - ocamlgraph-1.7/editor/ - ocamlgraph-1.7/editor/ed_display.ml - ocamlgraph-1.7/editor/ed_draw.ml - ocamlgraph-1.7/editor/ed_graph.ml - ocamlgraph-1.7/editor/ed_hyper.ml - ocamlgraph-1.7/editor/ed_main.ml - ocamlgraph-1.7/editor/Makefile - ocamlgraph-1.7/editor/tests/ - ocamlgraph-1.7/editor/tests/dep_ed.dot - ocamlgraph-1.7/editor/tests/dep_why.dot - ocamlgraph-1.7/editor/tests/fsm.dot - ocamlgraph-1.7/editor/tests/parcours.dot - ocamlgraph-1.7/editor/tests/softmaint.dot - ocamlgraph-1.7/editor/tests/transparency.dot - ocamlgraph-1.7/editor/tests/twopi2.dot - ocamlgraph-1.7/editor/tests/unix.dot - ocamlgraph-1.7/editor/tests/world.dot - ocamlgraph-1.7/editor/tests/de_bruijn4.gml - ocamlgraph-1.7/editor/tests/divisors12.gml - ocamlgraph-1.7/editor/tests/full10.gml - ocamlgraph-1.7/editor/tests/full20.gml - ocamlgraph-1.7/editor/tests/full30.gml - ocamlgraph-1.7/editor/tests/full50.gml - ocamlgraph-1.7/editor/tests/rand_100_10.gml - ocamlgraph-1.7/editor/tests/rand_100_300.gml - ocamlgraph-1.7/editor/tests/rand_10_10.gml - ocamlgraph-1.7/editor/tests/rand_10_40.gml - ocamlgraph-1.7/editor/tests/rand_50_300.gml - ocamlgraph-1.7/editor/tests/ring_100.gml - ocamlgraph-1.7/editor/tests/test.gml - ocamlgraph-1.7/editor/tests/test2,1_2.gml - ocamlgraph-1.7/editor/tests/test2,1_3.gml - ocamlgraph-1.7/editor/tests/test2,1_3tot.gml - ocamlgraph-1.7/editor/tests/test2_2.gml - ocamlgraph-1.7/view_graph/ - ocamlgraph-1.7/view_graph/viewGraph_core.ml - ocamlgraph-1.7/view_graph/viewGraph_select.ml - ocamlgraph-1.7/view_graph/viewGraph_test.ml - ocamlgraph-1.7/view_graph/viewGraph_utils.ml - ocamlgraph-1.7/view_graph/viewGraph_core.mli - ocamlgraph-1.7/view_graph/viewGraph_select.mli - ocamlgraph-1.7/view_graph/viewGraph_utils.mli - ocamlgraph-1.7/view_graph/README - ocamlgraph-1.7/view_graph/Makefile - ocamlgraph-1.7/dgraph/ - ocamlgraph-1.7/dgraph/dGraphContainer.ml - ocamlgraph-1.7/dgraph/dGraphMake.ml - ocamlgraph-1.7/dgraph/dGraphModel.ml - ocamlgraph-1.7/dgraph/dGraphRandModel.ml - ocamlgraph-1.7/dgraph/dGraphSubTree.ml - ocamlgraph-1.7/dgraph/dGraphTreeLayout.ml - ocamlgraph-1.7/dgraph/dGraphTreeModel.ml - ocamlgraph-1.7/dgraph/dGraphView.ml - ocamlgraph-1.7/dgraph/dGraphViewItem.ml - ocamlgraph-1.7/dgraph/dGraphViewer.ml - ocamlgraph-1.7/dgraph/xDot.ml - ocamlgraph-1.7/dgraph/xDotDraw.ml - ocamlgraph-1.7/dgraph/dGraphContainer.mli - ocamlgraph-1.7/dgraph/dGraphModel.mli - ocamlgraph-1.7/dgraph/dGraphRandModel.mli - ocamlgraph-1.7/dgraph/dGraphSubTree.mli - ocamlgraph-1.7/dgraph/dGraphTreeLayout.mli - ocamlgraph-1.7/dgraph/dGraphTreeModel.mli - ocamlgraph-1.7/dgraph/dGraphView.mli - ocamlgraph-1.7/dgraph/dGraphViewItem.mli - ocamlgraph-1.7/dgraph/xDot.mli - ocamlgraph-1.7/dgraph/xDotDraw.mli - ocamlgraph-1.7/examples/ - ocamlgraph-1.7/examples/color.ml - ocamlgraph-1.7/examples/demo.ml - ocamlgraph-1.7/examples/demo_planar.ml - ocamlgraph-1.7/examples/sudoku.ml - ocamlgraph-1.7/tests/ - ocamlgraph-1.7/tests/bench.ml - ocamlgraph-1.7/tests/check.ml - ocamlgraph-1.7/tests/dot.ml - ocamlgraph-1.7/tests/strat.ml - ocamlgraph-1.7/tests/test.ml - ocamlgraph-1.7/README - ocamlgraph-1.7/FAQ - ocamlgraph-1.7/CREDITS - ocamlgraph-1.7/INSTALL - ocamlgraph-1.7/COPYING - ocamlgraph-1.7/LICENSE - ocamlgraph-1.7/CHANGES - cd ../ocamlgraph-1.7 && patch -p1 < ../ocamlgraph-safe-string.patch - patching file lib/bitv.ml - Hunk #1 succeeded at 459 with fuzz 2 (offset 10 lines). - cd ../ocamlgraph-1.7 && ./configure - checking for ocamlc... ocamlc - ocaml version is 4.13.0+dev8-2021-08-25 - ocaml library path is /home/opam/.opam/4.13.0+trunk/lib/ocaml - checking for ocamlopt... ocamlopt - checking ocamlopt version... ok - checking for ocamlc.opt... ocamlc.opt - checking ocamlc.opt version... ok - checking for ocamlopt.opt... ocamlopt.opt - checking ocamlc.opt version... ok - checking for ocamldep... ocamldep - checking for ocamllex... ocamllex - checking for ocamllex.opt... ocamllex.opt - checking for ocamlyacc... ocamlyacc - checking for ocamldoc... ocamldoc - checking for ocamldoc.opt... ocamldoc.opt - checking for ocamlweb... true - checking for ocamlfind... no - checking for /home/opam/.opam/4.13.0+trunk/lib/ocaml/lablgtk2/lablgtk.cmxa... no - checking Win32 platform... no - configure: WARNING: lablgnomecanvas not found: the graph editor and view_graph will not be compiled - configure: creating ./config.status - config.status: creating Makefile - cd ../ocamlgraph-1.7 && \ - make OCAMLOPT='ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib' graph.cmxa - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/ocamlgraph-1.7' - sed -e s/VERSION/1.7/ -e s/CMA/graph.cma/ -e s/CMXA/graph.cmxa/ \ - META.in > META - rm -f src/version.ml - echo "let version = \""1.7"\"" > src/version.ml - echo "let date = \""`date`"\"" >> src/version.ml - rm -f .depend - ocamldep -slash -I src -I lib -I editor -I view_graph -I dgraph\ - lib/*.ml lib/*.mli \ - src/*.ml src/*.mli \ - editor/*.mli editor/*.ml \ - view_graph/*.mli view_graph/*.ml \ - dgraph/*.mli dgraph/*.ml > .depend - ocamlc.opt -c -I src -I lib -g -dtypes src/sig.mli - ocamlc.opt -c -I src -I lib -g -dtypes src/sig_pack.mli - ocamlc.opt -c -I src -I lib -g -dtypes src/dot_ast.mli - ocamlc.opt -c -I src -I lib -g -dtypes lib/unionfind.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/unionfind.ml - ocamlc.opt -c -I src -I lib -g -dtypes lib/heap.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/heap.ml - File "lib/heap.ml", line 54, characters 13-25: - 54 | let d' = Array.create n' d.(0) in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/heap.ml", line 61, characters 16-28: - 61 | h.data <- Array.create (- h.size) x; h.size <- 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes lib/bitv.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/bitv.ml - File "lib/bitv.ml", line 51, characters 15-27: - 51 | let low_mask = Array.create (succ bpi) 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 68, characters 25-37: - 68 | { length = n; bits = Array.create (n / bpi) initv } - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 71, characters 12-24: - 71 | let b = Array.create (succ s) initv in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 113, characters 11-13: - 113 | if n < 0 or n >= v.length then invalid_arg "Bitv.get"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 118, characters 11-13: - 118 | if n < 0 or n >= v.length then invalid_arg "Bitv.set"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 205, characters 13-15: - 205 | if len < 0 or ofs1 < 0 or ofs1 + len > v1.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 205, characters 25-27: - 205 | if len < 0 or ofs1 < 0 or ofs1 + len > v1.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 206, characters 13-15: - 206 | or ofs2 < 0 or ofs2 + len > v2.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 206, characters 25-27: - 206 | or ofs2 < 0 or ofs2 + len > v2.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 214, characters 13-15: - 214 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.sub"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 214, characters 24-26: - 214 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.sub"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 289, characters 13-15: - 289 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.fill"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 289, characters 24-26: - 289 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.fill"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 368, characters 10-22: - 368 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 380, characters 10-22: - 380 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 392, characters 10-22: - 392 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 401, characters 10-22: - 401 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/version.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/util.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/util.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/blocks.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/persistent.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/persistent.ml - File "src/persistent.ml", line 52, characters 20-38: - 52 | let compare x y = Pervasives.compare x.tag y.tag - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 145, characters 10-25: - 145 | size = Pervasives.succ g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 158, characters 21-36: - 158 | { edges = e; size = Pervasives.pred g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 178, characters 10-25: - 178 | size = Pervasives.succ g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 197, characters 10-25: - 197 | size = Pervasives.pred g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/imperative.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/imperative.ml - File "src/imperative.ml", line 68, characters 20-38: - 68 | let compare x y = Pervasives.compare x.tag y.tag - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 169, characters 11-26: - 169 | g.size <- Pervasives.succ g.size; - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 185, characters 11-26: - 185 | g.size <- Pervasives.pred g.size - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 206, characters 11-26: - 206 | g.size <- Pervasives.succ g.size; - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 227, characters 11-26: - 227 | g.size <- Pervasives.pred g.size - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 371, characters 36-54: - 371 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 381, characters 36-54: - 381 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/delaunay.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/delaunay.ml - File "src/delaunay.ml", line 260, characters 19-31: - 260 | let seen_arc = Array.create n false in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/builder.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/builder.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/classic.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/classic.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/rand.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/rand.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/oper.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/oper.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/path.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/path.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/traverse.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/traverse.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/coloring.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/coloring.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/topological.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/topological.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/components.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/components.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/kruskal.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/kruskal.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/flow.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/flow.ml - File "src/flow.ml", line 53, characters 54-56: - 53 | let fold_booleen f = List.fold_left (fun r x->(f x) or r) false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 137, characters 6-8: - 137 | or G.fold_pred_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 136, characters 44-46: - 136 | G.fold_succ_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 137, characters 47-49: - 137 | or G.fold_pred_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 141, characters 40-42: - 141 | (fold_booleen (elever g p) !todo) or - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/graphviz.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/graphviz.ml - File "src/graphviz.ml", line 27, characters 5-15: - 27 | open Pervasives (* for compatibility with ocaml 3.12.0+dev17 - ^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/gml.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/gml.ml - File "src/gml.ml", line 418, characters 27-39: - 418 | lexbuf.Lexing.lex_mem <- Array.create 2 (-1) ; __ocaml_lex_file_rec lexbuf 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "src/gml.ml", line 455, characters 27-39: - 455 | lexbuf.Lexing.lex_mem <- Array.create 2 (-1) ; __ocaml_lex_value_list_rec lexbuf 7 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/dot_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot_parser.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot_lexer.ml - File "src/dot_lexer.mll", line 39, characters 21-37: - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/dot.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot.ml - File "src/dot.ml", line 61, characters 41-59: - 61 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/pack.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/pack.ml - File "src/pack.ml", line 51, characters 34-52: - 51 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 64, characters 34-52: - 64 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 89, characters 34-52: - 89 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 170, characters 32-50: - 170 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/gmap.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/gmap.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/minsep.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/minsep.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/cliquetree.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/cliquetree.ml - File "src/cliquetree.ml", line 110, characters 39-57: - 110 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/cliquetree.ml", line 120, characters 40-58: - 120 | let compare (x, _ : t) (y, _ : t) = Pervasives.compare x y - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/cliquetree.ml", line 171, characters 3-21: - 171 | (Pervasives.compare : int -> int -> int) (number y) (number x)) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/mcs_m.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/mcs_m.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/md.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/md.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/strat.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/strat.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -I src -I lib -pack -o graph.cmx src/sig.cmi src/sig_pack.cmi src/dot_ast.cmi lib/unionfind.cmx lib/heap.cmx lib/bitv.cmx src/version.cmx src/util.cmx src/blocks.cmx src/persistent.cmx src/imperative.cmx src/delaunay.cmx src/builder.cmx src/classic.cmx src/rand.cmx src/oper.cmx src/path.cmx src/traverse.cmx src/coloring.cmx src/topological.cmx src/components.cmx src/kruskal.cmx src/flow.cmx src/graphviz.cmx src/gml.cmx src/dot_parser.cmx src/dot_lexer.cmx src/dot.cmx src/pack.cmx src/gmap.cmx src/minsep.cmx src/cliquetree.cmx src/mcs_m.cmx src/md.cmx src/strat.cmx - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -I src -I lib -a -o graph.cmxa graph.cmx - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/ocamlgraph-1.7' - make opt - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c location.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c types.ml - File "types.ml", line 483, characters 67-85: - 483 | module NtrSet = Set.Make(struct type t = nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 489, characters 83-101: - 489 | module NtrPairSet = Set.Make(struct type t = nontermroot*nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 496, characters 87-105: - 496 | module NtSet = Set.Make(struct type t = nontermroot * nonterm * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 503, characters 93-111: - 503 | module NtsubSet = Set.Make(struct type t = nontermroot * nontermroot * nonterm let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 509, characters 68-86: - 509 | module MvrSet = Set.Make(struct type t = metavarroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 516, characters 88-106: - 516 | module MvSet = Set.Make(struct type t = metavarroot * metavar * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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", line 1523, characters 68-85: - 1523 | let map_prod_names = List.map (fun p -> (p.prod_loc, p.prod_name, String.capitalize p.prod_name)) prod_list in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "auxl.ml", line 1532, characters 68-87: - 1532 | let map_prod_names = List.map (fun p -> (p.prod_loc, p.prod_name, String.uncapitalize p.prod_name)) prod_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1541, characters 61-80: - 1541 | let map_nontermroots = List.map (fun (loc,ntr) -> (loc,ntr,String.uncapitalize ntr)) nontermroots_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1550, characters 61-80: - 1550 | let map_metavarroots = List.map (fun (loc,mvr) -> (loc,mvr,String.uncapitalize mvr)) metavarroots_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1574, characters 19-36: - 1574 | st_prod_name = String.capitalize stnb.st_prod_name; - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 _ - ocamlc -g -dtypes -c location.ml - ocamlc -g -dtypes -c types.ml - File "types.ml", line 483, characters 67-85: - 483 | module NtrSet = Set.Make(struct type t = nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 489, characters 83-101: - 489 | module NtrPairSet = Set.Make(struct type t = nontermroot*nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 496, characters 87-105: - 496 | module NtSet = Set.Make(struct type t = nontermroot * nonterm * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 503, characters 93-111: - 503 | module NtsubSet = Set.Make(struct type t = nontermroot * nontermroot * nonterm let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 509, characters 68-86: - 509 | module MvrSet = Set.Make(struct type t = metavarroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 516, characters 88-106: - 516 | module MvSet = Set.Make(struct type t = metavarroot * metavar * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c merge.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c merge.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c global_option.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c grammar_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_parser.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_lexer.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c version.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_pp.ml - File "grammar_pp.ml", line 974, characters 19-36: - 974 | | Twf _,false -> String.capitalize s - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 1357, characters 22-39: - 1357 | | Caml _ | Lem _ -> String.capitalize (pp_maybe_quote_ident m xd pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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", line 2393, characters 8-26: - 2393 | if (Pervasives.compare mv emv = 0) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "grammar_pp.ml", line 2403, characters 8-26: - 2403 | if (Pervasives.compare nt ent = 0) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "grammar_pp.ml", line 2517, characters 25-42: - 2517 | | None -> Some (String.capitalize p.prod_name ^ pp_com) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2518, characters 28-45: - 2518 | | Some s -> Some ((String.capitalize p.prod_name) ^ " of " ^ s ^ pp_com) ) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2524, characters 25-42: - 2524 | | None -> Some (String.capitalize p.prod_name ^ pp_com) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2525, characters 28-45: - 2525 | | Some s -> Some ((String.capitalize p.prod_name) ^ " of " ^ s ^ pp_com) ) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2726, characters 22-23: - 2726 | & match m with Isa _ | Coq _ | Hol _ | Lem _ | Caml _ -> true | _ -> false) - ^ - Alert deprecated: Stdlib.& - Use (&&) instead. - File "grammar_pp.ml", line 3492, characters 20-37: - 3492 | | [] -> (String.capitalize promoted_pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3496, characters 25-42: - 3496 | ^ (String.capitalize promoted_pn)^" " - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3503, characters 20-37: - 3503 | | [] -> (String.capitalize promoted_pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3507, characters 25-42: - 3507 | ^ (String.capitalize promoted_pn)^" " - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 (_, _) - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - _::_::_ - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 glr.ml - File "glr.ml", line 455, characters 24-42: - 455 | let compare x y = Pervasives.compare x.sn_index y.sn_index - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - _::_::_ - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c term_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c dependency.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c bounds.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c bounds.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c context_pp.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c quotient_rules.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c grammar_typecheck.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - ([], _::_) - File "grammar_typecheck.ml", line 128, characters 86-103: - 128 | { raw_prod_name = (if rr.raw_rule_pn_wrapper<>"" then rr.raw_rule_pn_wrapper else String.capitalize rr.raw_rule_ntr_name ^"_") ^ "aux"; - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c transform.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c transform.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c substs_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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", line 1240, characters 16-33: - 1240 | String.capitalize lhs_stnb.st_prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "substs_pp.ml", line 1248, characters 16-33: - 1248 | String.capitalize lhs_stnb.st_prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c subrules_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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.) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c embed_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c embed_pp.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c defns.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c defns.ml - File "defns.ml", line 81, characters 30-46: - 81 | (( match m with Twf _ -> String.uppercase ntr' - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uppercase - Use String.uppercase_ascii/StringLabels.uppercase_ascii instead. - File "defns.ml", line 1020, characters 32-46: - 1020 | let cc = Char.code (Char.lowercase c) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - File "defns.ml", line 1024, characters 32-46: - 1024 | let cc = Char.code (Char.lowercase c) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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 (_, _, _)) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c coq_induct.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c coq_induct.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c system_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c system_pp.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c lex_menhir_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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: - "" - File "lex_menhir_pp.ml", line 604, characters 2-19: - 604 | String.capitalize p.prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 623, characters 78-95: - 623 | let aux_prod_name = (if r.rule_pn_wrapper<>"" then r.rule_pn_wrapper else String.capitalize r.rule_ntr_name ^"_") ^ "aux" in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 648, characters 4-21: - 648 | String.capitalize p.prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 924, characters 14-31: - 924 | "| " ^ String.capitalize p.prod_name ^ " " ^ Grammar_pp.pp_hom_spec (Menhir yo) xd hs ^"\n" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 934, characters 25-42: - 934 | "string \"" ^ String.capitalize p.prod_name ^ "\"" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 982, characters 14-31: - 982 | "| " ^ String.capitalize p.prod_name ^ " " ^ Grammar_pp.pp_hom_spec (Menhir yo) xd hs ^"\n" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c align.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c align.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c main.ml - File "main.ml", line 457, characters 13-30: - 457 | | [n] -> String.capitalize (Filename.chop_extension n) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "main.ml", line 476, characters 13-30: - 476 | | [n] -> String.capitalize (Filename.chop_extension n) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - sed -e 's/__VERSION__/0.31/' \ - -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 - ocamlopt -w y -g -dtypes -unsafe -inline 9 -v - The OCaml native-code compiler, version 4.13.0+dev8-2021-08-25 - Standard library directory: /home/opam/.opam/4.13.0+trunk/lib/ocaml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -o ott.opt str.cmxa ../ocamlgraph-1.7/graph.cmxa 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 - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' - cp ./ott ../bin/ott - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' - cd src; make install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/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 - cd .. && tar -zxvf ocamlgraph-1.7.tar.gz - ocamlgraph-1.7/ - ocamlgraph-1.7/bin/ - ocamlgraph-1.7/src/ - ocamlgraph-1.7/src/blocks.ml - ocamlgraph-1.7/src/builder.ml - ocamlgraph-1.7/src/builder.mli - ocamlgraph-1.7/src/classic.ml - ocamlgraph-1.7/src/classic.mli - ocamlgraph-1.7/src/cliquetree.ml - ocamlgraph-1.7/src/cliquetree.mli - ocamlgraph-1.7/src/coloring.ml - ocamlgraph-1.7/src/coloring.mli - ocamlgraph-1.7/src/components.ml - ocamlgraph-1.7/src/components.mli - ocamlgraph-1.7/src/delaunay.ml - ocamlgraph-1.7/src/delaunay.mli - ocamlgraph-1.7/src/dot.ml - ocamlgraph-1.7/src/dot.mli - ocamlgraph-1.7/src/dot_ast.mli - ocamlgraph-1.7/src/dot_lexer.ml - ocamlgraph-1.7/src/dot_lexer.mll - ocamlgraph-1.7/src/dot_parser.ml - ocamlgraph-1.7/src/dot_parser.mli - ocamlgraph-1.7/src/dot_parser.mly - ocamlgraph-1.7/src/flow.ml - ocamlgraph-1.7/src/flow.mli - ocamlgraph-1.7/src/gmap.ml - ocamlgraph-1.7/src/gmap.mli - ocamlgraph-1.7/src/gml.ml - ocamlgraph-1.7/src/gml.mli - ocamlgraph-1.7/src/gml.mll - ocamlgraph-1.7/src/graphviz.ml - ocamlgraph-1.7/src/graphviz.mli - ocamlgraph-1.7/src/imperative.ml - ocamlgraph-1.7/src/imperative.mli - ocamlgraph-1.7/src/kruskal.ml - ocamlgraph-1.7/src/kruskal.mli - ocamlgraph-1.7/src/mcs_m.ml - ocamlgraph-1.7/src/mcs_m.mli - ocamlgraph-1.7/src/md.ml - ocamlgraph-1.7/src/md.mli - ocamlgraph-1.7/src/minsep.ml - ocamlgraph-1.7/src/minsep.mli - ocamlgraph-1.7/src/oper.ml - ocamlgraph-1.7/src/oper.mli - ocamlgraph-1.7/src/pack.ml - ocamlgraph-1.7/src/pack.mli - ocamlgraph-1.7/src/path.ml - ocamlgraph-1.7/src/path.mli - ocamlgraph-1.7/src/persistent.ml - ocamlgraph-1.7/src/persistent.mli - ocamlgraph-1.7/src/rand.ml - ocamlgraph-1.7/src/rand.mli - ocamlgraph-1.7/src/sig.mli - ocamlgraph-1.7/src/sig_pack.mli - ocamlgraph-1.7/src/strat.ml - ocamlgraph-1.7/src/strat.mli - ocamlgraph-1.7/src/topological.ml - ocamlgraph-1.7/src/topological.mli - ocamlgraph-1.7/src/traverse.ml - ocamlgraph-1.7/src/traverse.mli - ocamlgraph-1.7/src/util.ml - ocamlgraph-1.7/src/util.mli - ocamlgraph-1.7/src/version.ml - ocamlgraph-1.7/lib/ - ocamlgraph-1.7/lib/bitv.ml - ocamlgraph-1.7/lib/bitv.mli - ocamlgraph-1.7/lib/heap.ml - ocamlgraph-1.7/lib/heap.mli - ocamlgraph-1.7/lib/unionfind.ml - ocamlgraph-1.7/lib/unionfind.mli - ocamlgraph-1.7/Makefile.in - ocamlgraph-1.7/configure - ocamlgraph-1.7/configure.in - ocamlgraph-1.7/META.in - ocamlgraph-1.7/.depend - ocamlgraph-1.7/editor/ - ocamlgraph-1.7/editor/ed_display.ml - ocamlgraph-1.7/editor/ed_draw.ml - ocamlgraph-1.7/editor/ed_graph.ml - ocamlgraph-1.7/editor/ed_hyper.ml - ocamlgraph-1.7/editor/ed_main.ml - ocamlgraph-1.7/editor/Makefile - ocamlgraph-1.7/editor/tests/ - ocamlgraph-1.7/editor/tests/dep_ed.dot - ocamlgraph-1.7/editor/tests/dep_why.dot - ocamlgraph-1.7/editor/tests/fsm.dot - ocamlgraph-1.7/editor/tests/parcours.dot - ocamlgraph-1.7/editor/tests/softmaint.dot - ocamlgraph-1.7/editor/tests/transparency.dot - ocamlgraph-1.7/editor/tests/twopi2.dot - ocamlgraph-1.7/editor/tests/unix.dot - ocamlgraph-1.7/editor/tests/world.dot - ocamlgraph-1.7/editor/tests/de_bruijn4.gml - ocamlgraph-1.7/editor/tests/divisors12.gml - ocamlgraph-1.7/editor/tests/full10.gml - ocamlgraph-1.7/editor/tests/full20.gml - ocamlgraph-1.7/editor/tests/full30.gml - ocamlgraph-1.7/editor/tests/full50.gml - ocamlgraph-1.7/editor/tests/rand_100_10.gml - ocamlgraph-1.7/editor/tests/rand_100_300.gml - ocamlgraph-1.7/editor/tests/rand_10_10.gml - ocamlgraph-1.7/editor/tests/rand_10_40.gml - ocamlgraph-1.7/editor/tests/rand_50_300.gml - ocamlgraph-1.7/editor/tests/ring_100.gml - ocamlgraph-1.7/editor/tests/test.gml - ocamlgraph-1.7/editor/tests/test2,1_2.gml - ocamlgraph-1.7/editor/tests/test2,1_3.gml - ocamlgraph-1.7/editor/tests/test2,1_3tot.gml - ocamlgraph-1.7/editor/tests/test2_2.gml - ocamlgraph-1.7/view_graph/ - ocamlgraph-1.7/view_graph/viewGraph_core.ml - ocamlgraph-1.7/view_graph/viewGraph_select.ml - ocamlgraph-1.7/view_graph/viewGraph_test.ml - ocamlgraph-1.7/view_graph/viewGraph_utils.ml - ocamlgraph-1.7/view_graph/viewGraph_core.mli - ocamlgraph-1.7/view_graph/viewGraph_select.mli - ocamlgraph-1.7/view_graph/viewGraph_utils.mli - ocamlgraph-1.7/view_graph/README - ocamlgraph-1.7/view_graph/Makefile - ocamlgraph-1.7/dgraph/ - ocamlgraph-1.7/dgraph/dGraphContainer.ml - ocamlgraph-1.7/dgraph/dGraphMake.ml - ocamlgraph-1.7/dgraph/dGraphModel.ml - ocamlgraph-1.7/dgraph/dGraphRandModel.ml - ocamlgraph-1.7/dgraph/dGraphSubTree.ml - ocamlgraph-1.7/dgraph/dGraphTreeLayout.ml - ocamlgraph-1.7/dgraph/dGraphTreeModel.ml - ocamlgraph-1.7/dgraph/dGraphView.ml - ocamlgraph-1.7/dgraph/dGraphViewItem.ml - ocamlgraph-1.7/dgraph/dGraphViewer.ml - ocamlgraph-1.7/dgraph/xDot.ml - ocamlgraph-1.7/dgraph/xDotDraw.ml - ocamlgraph-1.7/dgraph/dGraphContainer.mli - ocamlgraph-1.7/dgraph/dGraphModel.mli - ocamlgraph-1.7/dgraph/dGraphRandModel.mli - ocamlgraph-1.7/dgraph/dGraphSubTree.mli - ocamlgraph-1.7/dgraph/dGraphTreeLayout.mli - ocamlgraph-1.7/dgraph/dGraphTreeModel.mli - ocamlgraph-1.7/dgraph/dGraphView.mli - ocamlgraph-1.7/dgraph/dGraphViewItem.mli - ocamlgraph-1.7/dgraph/xDot.mli - ocamlgraph-1.7/dgraph/xDotDraw.mli - ocamlgraph-1.7/examples/ - ocamlgraph-1.7/examples/color.ml - ocamlgraph-1.7/examples/demo.ml - ocamlgraph-1.7/examples/demo_planar.ml - ocamlgraph-1.7/examples/sudoku.ml - ocamlgraph-1.7/tests/ - ocamlgraph-1.7/tests/bench.ml - ocamlgraph-1.7/tests/check.ml - ocamlgraph-1.7/tests/dot.ml - ocamlgraph-1.7/tests/strat.ml - ocamlgraph-1.7/tests/test.ml - ocamlgraph-1.7/README - ocamlgraph-1.7/FAQ - ocamlgraph-1.7/CREDITS - ocamlgraph-1.7/INSTALL - ocamlgraph-1.7/COPYING - ocamlgraph-1.7/LICENSE - ocamlgraph-1.7/CHANGES - cd ../ocamlgraph-1.7 && patch -p1 < ../ocamlgraph-safe-string.patch - patching file lib/bitv.ml - Hunk #1 succeeded at 459 with fuzz 2 (offset 10 lines). - cd ../ocamlgraph-1.7 && ./configure - checking for ocamlc... ocamlc - ocaml version is 4.13.0+dev8-2021-08-25 - ocaml library path is /home/opam/.opam/4.13.0+trunk/lib/ocaml - checking for ocamlopt... ocamlopt - checking ocamlopt version... ok - checking for ocamlc.opt... ocamlc.opt - checking ocamlc.opt version... ok - checking for ocamlopt.opt... ocamlopt.opt - checking ocamlc.opt version... ok - checking for ocamldep... ocamldep - checking for ocamllex... ocamllex - checking for ocamllex.opt... ocamllex.opt - checking for ocamlyacc... ocamlyacc - checking for ocamldoc... ocamldoc - checking for ocamldoc.opt... ocamldoc.opt - checking for ocamlweb... true - checking for ocamlfind... no - checking for /home/opam/.opam/4.13.0+trunk/lib/ocaml/lablgtk2/lablgtk.cmxa... no - checking Win32 platform... no - configure: WARNING: lablgnomecanvas not found: the graph editor and view_graph will not be compiled - configure: creating ./config.status - config.status: creating Makefile - cd ../ocamlgraph-1.7 && \ - make OCAMLOPT='ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib' graph.cmxa - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/ocamlgraph-1.7' - sed -e s/VERSION/1.7/ -e s/CMA/graph.cma/ -e s/CMXA/graph.cmxa/ \ - META.in > META - rm -f src/version.ml - echo "let version = \""1.7"\"" > src/version.ml - echo "let date = \""`date`"\"" >> src/version.ml - rm -f .depend - ocamldep -slash -I src -I lib -I editor -I view_graph -I dgraph\ - lib/*.ml lib/*.mli \ - src/*.ml src/*.mli \ - editor/*.mli editor/*.ml \ - view_graph/*.mli view_graph/*.ml \ - dgraph/*.mli dgraph/*.ml > .depend - ocamlc.opt -c -I src -I lib -g -dtypes src/sig.mli - ocamlc.opt -c -I src -I lib -g -dtypes src/sig_pack.mli - ocamlc.opt -c -I src -I lib -g -dtypes src/dot_ast.mli - ocamlc.opt -c -I src -I lib -g -dtypes lib/unionfind.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/unionfind.ml - ocamlc.opt -c -I src -I lib -g -dtypes lib/heap.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/heap.ml - File "lib/heap.ml", line 54, characters 13-25: - 54 | let d' = Array.create n' d.(0) in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/heap.ml", line 61, characters 16-28: - 61 | h.data <- Array.create (- h.size) x; h.size <- 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes lib/bitv.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph lib/bitv.ml - File "lib/bitv.ml", line 51, characters 15-27: - 51 | let low_mask = Array.create (succ bpi) 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 68, characters 25-37: - 68 | { length = n; bits = Array.create (n / bpi) initv } - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 71, characters 12-24: - 71 | let b = Array.create (succ s) initv in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 113, characters 11-13: - 113 | if n < 0 or n >= v.length then invalid_arg "Bitv.get"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 118, characters 11-13: - 118 | if n < 0 or n >= v.length then invalid_arg "Bitv.set"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 205, characters 13-15: - 205 | if len < 0 or ofs1 < 0 or ofs1 + len > v1.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 205, characters 25-27: - 205 | if len < 0 or ofs1 < 0 or ofs1 + len > v1.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 206, characters 13-15: - 206 | or ofs2 < 0 or ofs2 + len > v2.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 206, characters 25-27: - 206 | or ofs2 < 0 or ofs2 + len > v2.length - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 214, characters 13-15: - 214 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.sub"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 214, characters 24-26: - 214 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.sub"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 289, characters 13-15: - 289 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.fill"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 289, characters 24-26: - 289 | if ofs < 0 or len < 0 or ofs + len > v.length then invalid_arg "Bitv.fill"; - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "lib/bitv.ml", line 368, characters 10-22: - 368 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 380, characters 10-22: - 380 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 392, characters 10-22: - 392 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "lib/bitv.ml", line 401, characters 10-22: - 401 | let a = Array.create n 0 in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/version.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/util.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/util.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/blocks.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/persistent.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/persistent.ml - File "src/persistent.ml", line 52, characters 20-38: - 52 | let compare x y = Pervasives.compare x.tag y.tag - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 145, characters 10-25: - 145 | size = Pervasives.succ g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 158, characters 21-36: - 158 | { edges = e; size = Pervasives.pred g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 178, characters 10-25: - 178 | size = Pervasives.succ g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/persistent.ml", line 197, characters 10-25: - 197 | size = Pervasives.pred g.size } - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/imperative.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/imperative.ml - File "src/imperative.ml", line 68, characters 20-38: - 68 | let compare x y = Pervasives.compare x.tag y.tag - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 169, characters 11-26: - 169 | g.size <- Pervasives.succ g.size; - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 185, characters 11-26: - 185 | g.size <- Pervasives.pred g.size - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 206, characters 11-26: - 206 | g.size <- Pervasives.succ g.size; - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 227, characters 11-26: - 227 | g.size <- Pervasives.pred g.size - ^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 371, characters 36-54: - 371 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/imperative.ml", line 381, characters 36-54: - 381 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/delaunay.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/delaunay.ml - File "src/delaunay.ml", line 260, characters 19-31: - 260 | let seen_arc = Array.create n false in - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/builder.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/builder.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/classic.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/classic.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/rand.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/rand.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/oper.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/oper.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/path.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/path.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/traverse.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/traverse.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/coloring.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/coloring.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/topological.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/topological.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/components.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/components.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/kruskal.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/kruskal.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/flow.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/flow.ml - File "src/flow.ml", line 53, characters 54-56: - 53 | let fold_booleen f = List.fold_left (fun r x->(f x) or r) false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 137, characters 6-8: - 137 | or G.fold_pred_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 136, characters 44-46: - 136 | G.fold_succ_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 137, characters 47-49: - 137 | or G.fold_pred_e (fun e r->pousser g e l or r) g x false - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - File "src/flow.ml", line 141, characters 40-42: - 141 | (fold_booleen (elever g p) !todo) or - ^^ - Alert deprecated: Stdlib.or - Use (||) instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/graphviz.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/graphviz.ml - File "src/graphviz.ml", line 27, characters 5-15: - 27 | open Pervasives (* for compatibility with ocaml 3.12.0+dev17 - ^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/gml.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/gml.ml - File "src/gml.ml", line 418, characters 27-39: - 418 | lexbuf.Lexing.lex_mem <- Array.create 2 (-1) ; __ocaml_lex_file_rec lexbuf 0 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - File "src/gml.ml", line 455, characters 27-39: - 455 | lexbuf.Lexing.lex_mem <- Array.create 2 (-1) ; __ocaml_lex_value_list_rec lexbuf 7 - ^^^^^^^^^^^^ - Alert deprecated: Stdlib.Array.create - Use Array.make/ArrayLabels.make instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/dot_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot_parser.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot_lexer.ml - File "src/dot_lexer.mll", line 39, characters 21-37: - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - ocamlc.opt -c -I src -I lib -g -dtypes src/dot.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/dot.ml - File "src/dot.ml", line 61, characters 41-59: - 61 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/pack.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/pack.ml - File "src/pack.ml", line 51, characters 34-52: - 51 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 64, characters 34-52: - 64 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 89, characters 34-52: - 89 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/pack.ml", line 170, characters 32-50: - 170 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/gmap.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/gmap.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/minsep.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/minsep.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/cliquetree.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/cliquetree.ml - File "src/cliquetree.ml", line 110, characters 39-57: - 110 | let compare : t -> t -> int = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/cliquetree.ml", line 120, characters 40-58: - 120 | let compare (x, _ : t) (y, _ : t) = Pervasives.compare x y - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "src/cliquetree.ml", line 171, characters 3-21: - 171 | (Pervasives.compare : int -> int -> int) (number y) (number x)) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc.opt -c -I src -I lib -g -dtypes src/mcs_m.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/mcs_m.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/md.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/md.ml - ocamlc.opt -c -I src -I lib -g -dtypes src/strat.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -c -I src -I lib -for-pack Graph src/strat.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -I src -I lib -pack -o graph.cmx src/sig.cmi src/sig_pack.cmi src/dot_ast.cmi lib/unionfind.cmx lib/heap.cmx lib/bitv.cmx src/version.cmx src/util.cmx src/blocks.cmx src/persistent.cmx src/imperative.cmx src/delaunay.cmx src/builder.cmx src/classic.cmx src/rand.cmx src/oper.cmx src/path.cmx src/traverse.cmx src/coloring.cmx src/topological.cmx src/components.cmx src/kruskal.cmx src/flow.cmx src/graphviz.cmx src/gml.cmx src/dot_parser.cmx src/dot_lexer.cmx src/dot.cmx src/pack.cmx src/gmap.cmx src/minsep.cmx src/cliquetree.cmx src/mcs_m.cmx src/md.cmx src/strat.cmx - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I src -I lib -I src -I lib -a -o graph.cmxa graph.cmx - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/ocamlgraph-1.7' - make opt - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c location.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c types.ml - File "types.ml", line 483, characters 67-85: - 483 | module NtrSet = Set.Make(struct type t = nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 489, characters 83-101: - 489 | module NtrPairSet = Set.Make(struct type t = nontermroot*nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 496, characters 87-105: - 496 | module NtSet = Set.Make(struct type t = nontermroot * nonterm * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 503, characters 93-111: - 503 | module NtsubSet = Set.Make(struct type t = nontermroot * nontermroot * nonterm let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 509, characters 68-86: - 509 | module MvrSet = Set.Make(struct type t = metavarroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 516, characters 88-106: - 516 | module MvSet = Set.Make(struct type t = metavarroot * metavar * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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", line 1523, characters 68-85: - 1523 | let map_prod_names = List.map (fun p -> (p.prod_loc, p.prod_name, String.capitalize p.prod_name)) prod_list in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "auxl.ml", line 1532, characters 68-87: - 1532 | let map_prod_names = List.map (fun p -> (p.prod_loc, p.prod_name, String.uncapitalize p.prod_name)) prod_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1541, characters 61-80: - 1541 | let map_nontermroots = List.map (fun (loc,ntr) -> (loc,ntr,String.uncapitalize ntr)) nontermroots_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1550, characters 61-80: - 1550 | let map_metavarroots = List.map (fun (loc,mvr) -> (loc,mvr,String.uncapitalize mvr)) metavarroots_list in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "auxl.ml", line 1574, characters 19-36: - 1574 | st_prod_name = String.capitalize stnb.st_prod_name; - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 _ - ocamlc -g -dtypes -c location.ml - ocamlc -g -dtypes -c types.ml - File "types.ml", line 483, characters 67-85: - 483 | module NtrSet = Set.Make(struct type t = nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 489, characters 83-101: - 489 | module NtrPairSet = Set.Make(struct type t = nontermroot*nontermroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 496, characters 87-105: - 496 | module NtSet = Set.Make(struct type t = nontermroot * nonterm * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 503, characters 93-111: - 503 | module NtsubSet = Set.Make(struct type t = nontermroot * nontermroot * nonterm let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 509, characters 68-86: - 509 | module MvrSet = Set.Make(struct type t = metavarroot let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 516, characters 88-106: - 516 | module MvSet = Set.Make(struct type t = metavarroot * metavar * prod_env let compare = Pervasives.compare end);; - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c merge.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c merge.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c global_option.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c grammar_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_parser.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_lexer.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c version.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c grammar_pp.ml - File "grammar_pp.ml", line 974, characters 19-36: - 974 | | Twf _,false -> String.capitalize s - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 1357, characters 22-39: - 1357 | | Caml _ | Lem _ -> String.capitalize (pp_maybe_quote_ident m xd pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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", line 2393, characters 8-26: - 2393 | if (Pervasives.compare mv emv = 0) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "grammar_pp.ml", line 2403, characters 8-26: - 2403 | if (Pervasives.compare nt ent = 0) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "grammar_pp.ml", line 2517, characters 25-42: - 2517 | | None -> Some (String.capitalize p.prod_name ^ pp_com) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2518, characters 28-45: - 2518 | | Some s -> Some ((String.capitalize p.prod_name) ^ " of " ^ s ^ pp_com) ) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2524, characters 25-42: - 2524 | | None -> Some (String.capitalize p.prod_name ^ pp_com) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2525, characters 28-45: - 2525 | | Some s -> Some ((String.capitalize p.prod_name) ^ " of " ^ s ^ pp_com) ) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 2726, characters 22-23: - 2726 | & match m with Isa _ | Coq _ | Hol _ | Lem _ | Caml _ -> true | _ -> false) - ^ - Alert deprecated: Stdlib.& - Use (&&) instead. - File "grammar_pp.ml", line 3492, characters 20-37: - 3492 | | [] -> (String.capitalize promoted_pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3496, characters 25-42: - 3496 | ^ (String.capitalize promoted_pn)^" " - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3503, characters 20-37: - 3503 | | [] -> (String.capitalize promoted_pn) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "grammar_pp.ml", line 3507, characters 25-42: - 3507 | ^ (String.capitalize promoted_pn)^" " - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 (_, _) - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - _::_::_ - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 glr.ml - File "glr.ml", line 455, characters 24-42: - 455 | let compare x y = Pervasives.compare x.sn_index y.sn_index - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - _::_::_ - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c term_parser.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c dependency.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c bounds.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c bounds.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c context_pp.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c quotient_rules.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c grammar_typecheck.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -c -I ../ocamlgraph-1.7 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: - ([], _::_) - File "grammar_typecheck.ml", line 128, characters 86-103: - 128 | { raw_prod_name = (if rr.raw_rule_pn_wrapper<>"" then rr.raw_rule_pn_wrapper else String.capitalize rr.raw_rule_ntr_name ^"_") ^ "aux"; - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c transform.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c transform.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c substs_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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", line 1240, characters 16-33: - 1240 | String.capitalize lhs_stnb.st_prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "substs_pp.ml", line 1248, characters 16-33: - 1248 | String.capitalize lhs_stnb.st_prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - 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 _) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c subrules_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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.) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c embed_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c embed_pp.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c defns.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c defns.ml - File "defns.ml", line 81, characters 30-46: - 81 | (( match m with Twf _ -> String.uppercase ntr' - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uppercase - Use String.uppercase_ascii/StringLabels.uppercase_ascii instead. - File "defns.ml", line 1020, characters 32-46: - 1020 | let cc = Char.code (Char.lowercase c) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - File "defns.ml", line 1024, characters 32-46: - 1024 | let cc = Char.code (Char.lowercase c) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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 (_, _, _)) - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c coq_induct.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c coq_induct.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c system_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c system_pp.ml - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c lex_menhir_pp.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -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: - "" - File "lex_menhir_pp.ml", line 604, characters 2-19: - 604 | String.capitalize p.prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 623, characters 78-95: - 623 | let aux_prod_name = (if r.rule_pn_wrapper<>"" then r.rule_pn_wrapper else String.capitalize r.rule_ntr_name ^"_") ^ "aux" in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 648, characters 4-21: - 648 | String.capitalize p.prod_name - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 924, characters 14-31: - 924 | "| " ^ String.capitalize p.prod_name ^ " " ^ Grammar_pp.pp_hom_spec (Menhir yo) xd hs ^"\n" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 934, characters 25-42: - 934 | "string \"" ^ String.capitalize p.prod_name ^ "\"" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "lex_menhir_pp.ml", line 982, characters 14-31: - 982 | "| " ^ String.capitalize p.prod_name ^ " " ^ Grammar_pp.pp_hom_spec (Menhir yo) xd hs ^"\n" - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - ocamlc -g -dtypes -I ../ocamlgraph-1.7 -c align.mli - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c align.ml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -I ../ocamlgraph-1.7 -c main.ml - File "main.ml", line 457, characters 13-30: - 457 | | [n] -> String.capitalize (Filename.chop_extension n) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "main.ml", line 476, characters 13-30: - 476 | | [n] -> String.capitalize (Filename.chop_extension n) - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - sed -e 's/__VERSION__/0.31/' \ - -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 - ocamlopt -w y -g -dtypes -unsafe -inline 9 -v - The OCaml native-code compiler, version 4.13.0+dev8-2021-08-25 - Standard library directory: /home/opam/.opam/4.13.0+trunk/lib/ocaml - ocamlopt -w y -g -dtypes -unsafe -inline 9 -o ott.opt str.cmxa ../ocamlgraph-1.7/graph.cmxa 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 - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' - cp ./ott ../bin/ott - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31/src' Processing 69/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [ott: make ott.install] [yojson: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "ott.install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/ott.0.31) - 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 - 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.31 Processing 69/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [yojson: dune build] -> installed ott.0.31 Processing 70/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] [yojson: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "yojson" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/yojson.1.7.0) -> compiled yojson.1.7.0 Processing 70/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] -> installed yojson.1.7.0 Processing 71/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "ocaml" "setup.ml" "-build" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/omd.1.3.1) - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt unix.cmxa -I /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuildlib.cmxa myocamlbuild.ml /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuild.cmx -o myocamlbuild - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_utils.mli > src/omd_utils.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmi src/omd_utils.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_utils.ml > src/omd_utils.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_representation.mli > src/omd_representation.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmi src/omd_representation.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_representation.ml > src/omd_representation.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_backend.mli > src/omd_backend.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmi src/omd_backend.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_backend.ml > src/omd_backend.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_lexer.mli > src/omd_lexer.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmi src/omd_lexer.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_lexer.ml > src/omd_lexer.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_parser.mli > src/omd_parser.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmi src/omd_parser.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_parser.ml > src/omd_parser.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd.mli > src/omd.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmi src/omd.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd.ml > src/omd.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmo src/omd_utils.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmo src/omd_utils.ml - File "src/omd_utils.ml", line 61, characters 4-20: - 61 | Pervasives.raise - ^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmo src/omd_representation.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmo src/omd_representation.ml - File "src/omd_representation.ml", line 20, characters 13-29: - 20 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - File "src/omd_representation.ml", line 28, characters 19-35: - 28 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmo src/omd_backend.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmo src/omd_lexer.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmo src/omd_parser.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmo src/omd_parser.ml - File "src/omd_parser.ml", line 2508, characters 8-15: - 2508 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2515, characters 12-19: - 2515 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2528, characters 14-21: - 2528 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2533, characters 20-27: - 2533 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2544, characters 16-23: - 2544 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2556, characters 12-19: - 2556 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2579, characters 16-23: - 2579 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2586, characters 12-19: - 2586 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2597, characters 14-21: - 2597 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2602, characters 20-27: - 2602 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2613, characters 16-23: - 2613 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2625, characters 12-19: - 2625 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2649, characters 16-23: - 2649 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2676, characters 8-15: - 2676 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmo src/omd.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -a -I src src/omd_utils.cmo src/omd_representation.cmo src/omd_backend.cmo src/omd_lexer.cmo src/omd_parser.cmo src/omd.cmo -o src/omd.cma - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmx src/omd_utils.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmx src/omd_utils.ml - File "src/omd_utils.ml", line 61, characters 4-20: - 61 | Pervasives.raise - ^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmx src/omd_representation.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmx src/omd_representation.ml - File "src/omd_representation.ml", line 20, characters 13-29: - 20 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - File "src/omd_representation.ml", line 28, characters 19-35: - 28 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmx src/omd_backend.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmx src/omd_lexer.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmx src/omd_parser.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmx src/omd_parser.ml - File "src/omd_parser.ml", line 2508, characters 8-15: - 2508 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2515, characters 12-19: - 2515 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2528, characters 14-21: - 2528 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2533, characters 20-27: - 2533 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2544, characters 16-23: - 2544 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2556, characters 12-19: - 2556 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2579, characters 16-23: - 2579 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2586, characters 12-19: - 2586 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2597, characters 14-21: - 2597 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2602, characters 20-27: - 2602 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2613, characters 16-23: - 2613 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2625, characters 12-19: - 2625 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2649, characters 16-23: - 2649 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2676, characters 8-15: - 2676 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmx src/omd.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -a -I src src/omd_utils.cmx src/omd_representation.cmx src/omd_backend.cmx src/omd_lexer.cmx src/omd_parser.cmx src/omd.cmx -o src/omd.cmxa - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -shared -I src src/omd.cmxa src/omd_utils.cmx src/omd_representation.cmx src/omd_backend.cmx src/omd_lexer.cmx src/omd_parser.cmx src/omd.cmx -o src/omd.cmxs - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_main.ml > src/omd_main.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_main.mli > src/omd_main.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_main.cmi src/omd_main.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_main.cmx src/omd_main.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -g -linkpkg -package bigarray -package bytes -I src src/omd.cmxa src/omd_main.cmx -o src/omd_main.native - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlopt.opt unix.cmxa -I /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuildlib.cmxa myocamlbuild.ml /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuild.cmx -o myocamlbuild - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_utils.mli > src/omd_utils.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmi src/omd_utils.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_utils.ml > src/omd_utils.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_representation.mli > src/omd_representation.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmi src/omd_representation.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_representation.ml > src/omd_representation.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_backend.mli > src/omd_backend.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmi src/omd_backend.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_backend.ml > src/omd_backend.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_lexer.mli > src/omd_lexer.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmi src/omd_lexer.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_lexer.ml > src/omd_lexer.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_parser.mli > src/omd_parser.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmi src/omd_parser.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_parser.ml > src/omd_parser.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd.mli > src/omd.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmi src/omd.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd.ml > src/omd.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmo src/omd_utils.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmo src/omd_utils.ml - File "src/omd_utils.ml", line 61, characters 4-20: - 61 | Pervasives.raise - ^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmo src/omd_representation.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmo src/omd_representation.ml - File "src/omd_representation.ml", line 20, characters 13-29: - 20 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - File "src/omd_representation.ml", line 28, characters 19-35: - 28 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmo src/omd_backend.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmo src/omd_lexer.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmo src/omd_parser.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmo src/omd_parser.ml - File "src/omd_parser.ml", line 2508, characters 8-15: - 2508 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2515, characters 12-19: - 2515 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2528, characters 14-21: - 2528 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2533, characters 20-27: - 2533 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2544, characters 16-23: - 2544 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2556, characters 12-19: - 2556 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2579, characters 16-23: - 2579 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2586, characters 12-19: - 2586 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2597, characters 14-21: - 2597 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2602, characters 20-27: - 2602 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2613, characters 16-23: - 2613 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2625, characters 12-19: - 2625 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2649, characters 16-23: - 2649 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2676, characters 8-15: - 2676 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmo src/omd.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -a -I src src/omd_utils.cmo src/omd_representation.cmo src/omd_backend.cmo src/omd_lexer.cmo src/omd_parser.cmo src/omd.cmo -o src/omd.cma - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmx src/omd_utils.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_utils.cmx src/omd_utils.ml - File "src/omd_utils.ml", line 61, characters 4-20: - 61 | Pervasives.raise - ^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmx src/omd_representation.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_representation.cmx src/omd_representation.ml - File "src/omd_representation.ml", line 20, characters 13-29: - 20 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - File "src/omd_representation.ml", line 28, characters 19-35: - 28 | let ln = String.lowercase name in - ^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.lowercase - Use String.lowercase_ascii/StringLabels.lowercase_ascii instead. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_backend.cmx src/omd_backend.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_lexer.cmx src/omd_lexer.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmx src/omd_parser.ml - + /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_parser.cmx src/omd_parser.ml - File "src/omd_parser.ml", line 2508, characters 8-15: - 2508 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2515, characters 12-19: - 2515 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2528, characters 14-21: - 2528 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2533, characters 20-27: - 2533 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2544, characters 16-23: - 2544 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2556, characters 12-19: - 2556 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2579, characters 16-23: - 2579 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2586, characters 12-19: - 2586 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2597, characters 14-21: - 2597 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2602, characters 20-27: - 2602 | | None -> make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2613, characters 16-23: - 2613 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2625, characters 12-19: - 2625 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2649, characters 16-23: - 2649 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - File "src/omd_parser.ml", line 2676, characters 8-15: - 2676 | make_up p items, l - ^^^^^^^ - Warning 6 [labels-omitted]: label p was omitted in the application of this function. - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd.cmx src/omd.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -a -I src src/omd_utils.cmx src/omd_representation.cmx src/omd_backend.cmx src/omd_lexer.cmx src/omd_parser.cmx src/omd.cmx -o src/omd.cmxa - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -shared -I src src/omd.cmxa src/omd_utils.cmx src/omd_representation.cmx src/omd_backend.cmx src/omd_lexer.cmx src/omd_parser.cmx src/omd.cmx -o src/omd.cmxs - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_main.ml > src/omd_main.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamldep -package bigarray -package bytes -modules src/omd_main.mli > src/omd_main.mli.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlc -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_main.cmi src/omd_main.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -c -g -annot -bin-annot -I src -package bigarray -package bytes -I src -o src/omd_main.cmx src/omd_main.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamlfind ocamlopt -g -linkpkg -package bigarray -package bytes -I src src/omd.cmxa src/omd_main.cmx -o src/omd_main.native -> compiled omd.1.3.1 Processing 71/78: [lem: make] [menhir: dune build] Processing 72/78: [lem: make] [menhir: dune build] [omd: ocaml setup.ml] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "ocaml" "setup.ml" "-install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/omd.1.3.1) - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.a - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmxs - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/META - File "./setup.ml", line 1777, characters 22-40: - 1777 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "setup.ml", line 3467, characters 16-34: - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.a - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmxs - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmti - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmt - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.annot - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_parser.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_lexer.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_backend.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_representation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/omd_utils.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/omd/META -> installed omd.1.3.1 Processing 72/78: [lem: make] [menhir: dune build] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "menhir" "-j" "71" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/menhir.20210419) - menhir src/stage2/parserMessages.check - Read 101 sample input sentences and 101 error messages. - Read 101 sample input sentences and 48 error messages. - menhir src/stage2/parserMessages.ml - Read 101 sample input sentences and 48 error messages. - menhir src/stage2/parser.{ml,mli} - 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. - 48 out of 96 symbols keep track of their end position. - The action table is 11324 entries; 1610 non-zero; 1359 compressed. - The action table occupies roughly 2816 bytes. - The goto table is 16986 entries; 329 non-zero; 636 compressed. - The goto table occupies roughly 1368 bytes. - The error table occupies roughly 1448 bytes. - The default_reduction table occupies roughly 336 bytes. - The lhs table occupies roughly 168 bytes. - The trace table occupies roughly 8 bytes. - menhir src/stage2/parserMessages.check - Read 101 sample input sentences and 101 error messages. - Read 101 sample input sentences and 48 error messages. - menhir src/stage2/parserMessages.ml - Read 101 sample input sentences and 48 error messages. - menhir src/stage2/parser.{ml,mli} - 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. - 48 out of 96 symbols keep track of their end position. - The action table is 11324 entries; 1610 non-zero; 1359 compressed. - The action table occupies roughly 2816 bytes. - The goto table is 16986 entries; 329 non-zero; 636 compressed. - The goto table occupies roughly 1368 bytes. - The error table occupies roughly 1448 bytes. - The default_reduction table occupies roughly 336 bytes. - The lhs table occupies roughly 168 bytes. - The trace table occupies roughly 8 bytes. -> compiled menhir.20210419 Processing 72/78: [lem: make] -> installed menhir.20210419 Processing 73/78: [lem: make] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "INSTALL_DIR=/home/opam/.opam/4.13.0+trunk" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03) - echo "(* Generated file -- do not edit. *)" > src/version.ml - echo 'let v="2020-06-03"' >> src/version.ml - echo "(* Generated file -- do not edit. *)" > src/share_directory.ml - echo let d=\"/home/opam/.opam/4.13.0+trunk/share/lem\" >> src/share_directory.ml - make -C src all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/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/batUTF8.cmx ulib/batUTF8.ml - File "ulib/batUTF8.ml", line 209, characters 2-13: - 209 | String.copy s - ^^^^^^^^^^^ - Alert deprecated: Stdlib.String.copy - Strings now immutable: no need to copy - 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 reporting_basic.cmx reporting_basic.ml - File "reporting_basic.ml", line 80, characters 12-25: - 80 | let buf = String.create l in - ^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.create - Use Bytes.create/BytesLabels.create instead. - File "reporting_basic.ml", line 82, characters 51-62: - 82 | let _ = match multi with None -> () | Some sk -> String.fill buf 0 sk ' ' in - ^^^^^^^^^^^ - Alert deprecated: Stdlib.String.fill - Use Bytes.fill/BytesLabels.fill instead. - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o util.cmx util.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o util.cmx util.ml - File "util.ml", line 300, characters 17-31: - 300 | let c' = Char.lowercase c in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - File "util.ml", line 329, characters 18-36: - 329 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "util.ml", line 335, characters 18-36: - 335 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o output.cmx output.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o output.cmx output.ml - File "output.ml", line 574, characters 15-29: - 574 | let (^) = Pervasives.(^) in - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o name.cmx name.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o name.cmx name.ml - File "name.ml", line 91, characters 30-48: - 91 | let compare (i, s) (i', s') = Pervasives.compare i i' - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "name.ml", line 214, characters 32-46: - 214 | let c = Ulib.UChar.of_char (Char.lowercase (Ulib.UChar.char_of (Ulib.UTF8.get y 0))) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.lowercase - Use Char.lowercase_ascii instead. - File "name.ml", line 220, characters 32-46: - 220 | let c = Ulib.UChar.of_char (Char.uppercase (Ulib.UChar.char_of (Ulib.UTF8.get y 0))) in - ^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.Char.uppercase - Use Char.uppercase_ascii instead. - 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 (_, _) - File "path.ml", line 142, characters 16-34: - 142 | | p1, p2 -> Pervasives.compare (partial_map_to_int p1) (partial_map_to_int p2) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 ocamlopt -c -g -annot -package zarith -I ulib -o target.cmx target.ml - File "target.ml", line 100, characters 21-39: - 100 | let target_compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "target.ml", line 111, characters 29-47: - 111 | let ast_target_compare x y = Pervasives.compare (ast_target_to_int x) (ast_target_to_int y) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 582, characters 16-34: - 582 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 588, characters 16-34: - 588 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 766, characters 55-73: - 766 | module IM = Map.Make(struct type t = int let compare = Pervasives.compare end) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "types.ml", line 1007, characters 16-34: - 1007 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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", line 874, characters 20-38: - 874 | let first = Pervasives.compare t1 t2 in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "typed_ast.ml", line 876, characters 12-30: - 876 | Pervasives.compare s1 s2 - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 ocamlc -c -g -annot -package zarith -I ulib -o coq_backend.cmo coq_backend.ml - File "coq_backend.ml", line 145, characters 68-86: - 145 | module OutputSet = Set.Make (struct type t = Output.t let compare = Pervasives.compare end) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 163, characters 4-18: - 163 | Pervasives.(^) "x" post - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 255, characters 43-61: - 255 | let all_fields = List.filter (fun x -> Pervasives.compare name x <> 0) all_fields in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 300, characters 69-87: - 300 | module AssocMap = Map.Make (struct type t = string let compare = Pervasives.compare end) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 630, characters 10-28: - 630 | Pervasives.compare name name' = 0 - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend_common.cmx backend_common.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o backend_common.cmx backend_common.ml - File "backend_common.ml", line 494, characters 19-33: - 494 | let (^) = Pervasives.(^) in - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "backend_common.ml", line 522, characters 19-33: - 522 | let (^) = Pervasives.(^) in - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend_utils.cmx coq_backend_utils.ml - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend.cmx coq_backend.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o coq_backend.cmx coq_backend.ml - File "coq_backend.ml", line 145, characters 68-86: - 145 | module OutputSet = Set.Make (struct type t = Output.t let compare = Pervasives.compare end) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 163, characters 4-18: - 163 | Pervasives.(^) "x" post - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 255, characters 43-61: - 255 | let all_fields = List.filter (fun x -> Pervasives.compare name x <> 0) all_fields in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 300, characters 69-87: - 300 | module AssocMap = Map.Make (struct type t = string let compare = Pervasives.compare end) - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "coq_backend.ml", line 630, characters 10-28: - 630 | Pervasives.compare name name' = 0 - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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", line 98, characters 11-25: - 98 | let (^^) = Pervasives.(^) - ^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "backend.ml", line 109, characters 57-74: - 109 | let new_s = String.concat "" [Str.matched_group 1 s; String.capitalize (Str.matched_group 2 s)] in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "backend.ml", lines 1644-1651, characters 2-35: - 1644 | ..match c_id_string with - 1645 | | "AilSyntax.Plus" -> false - 1646 | | "AilSyntax.Minus" -> false - 1647 | | "AilSyntax.Bnot" -> false - 1648 | | "AilSyntax.Address" -> false - 1649 | | "AilSyntax.Indirection" -> false - 1650 | | "AilSyntax.PostfixIncr" -> true - 1651 | | "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 1944-1949, characters 14-17: - 1944 | ..............begin - 1945 | match ppc (c_id_string',[]), ail_unary_is_postfix c_id_string' with - 1946 | | (kind,(Some op_output)), true -> Ail, Some [pparg e; (concat emp op_output) ] - 1947 | | (kind,(Some op_output)), false -> Ail, Some [pparg_flip_lskip (concat emp op_output) e ] - 1948 | | (kind,None), true -> Ail, Some [pparg op; pparg e;] - 1949 | 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 1941-1951, characters 8-11: - 1941 | ........begin - 1942 | match deconstruct_arg op with - 1943 | | Some (c_id_string',[]) -> - 1944 | begin - 1945 | match ppc (c_id_string',[]), ail_unary_is_postfix c_id_string' with - ... - 1948 | | (kind,None), true -> Ail, Some [pparg op; pparg e;] - 1949 | end - 1950 | | None -> Ail, Some [pparg op; pparg e;] - 1951 | 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 2916-2955, characters 40-73: - 2916 | ........................................match t.term with - 2917 | | Typ_wild(sk) -> t - 2918 | | Typ_var(sk,tv) -> t - 2919 | | Typ_len(n) -> t - 2920 | | Typ_fn(t1,sk,t2) -> - ... - 2952 | { t with term = Typ_backend(id, List.map (hol_strip_args_t type_names) ts) } - 2953 | end - 2954 | | Typ_paren(sk1,t,sk2) -> - 2955 | { 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 2171, characters 9-16: - 2171 | 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 3753, characters 12-69: - 3753 | | 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 3764, characters 12-63: - 3764 | | 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. - File "syntactic_tests.ml", line 214, characters 18-36: - 214 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamldep -package zarith -modules initial_env.ml > initial_env.ml.depends - ocamlfind ocamldep -package zarith -modules initial_env.mli > initial_env.mli.depends - ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o initial_env.cmi initial_env.mli - ocamlfind ocamldep -package zarith -modules process_file.ml > process_file.ml.depends - ocamlfind ocamldep -package zarith -modules process_file.mli > process_file.mli.depends - ocamlfind ocamlc -c -g -annot -package zarith -I ulib -o process_file.cmi process_file.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamllex.opt -q lexer.mll - ocamlfind ocamldep -package zarith -modules lexer.ml > lexer.ml.depends - /home/opam/.opam/4.13.0+trunk/bin/ocamlyacc parser.mly - + /home/opam/.opam/4.13.0+trunk/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 2246, characters 44-62: - 2246 | let constr_ids = List.sort (fun id id' -> Pervasives.compare id.descr id'.descr) constr_ids in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "patterns.ml", line 2287, characters 12-30: - 2287 | Pervasives.compare c.descr c'.descr - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "patterns.ml", line 2311, characters 29-47: - 2311 | let all_pats = List.sort Pervasives.compare all_pats in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 ocamlopt -c -g -annot -package zarith -I ulib -o process_file.cmx process_file.ml - File "process_file.ml", line 189, characters 36-55: - 189 | let module_name_lower = String.uncapitalize module_name in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "process_file.ml", line 248, characters 36-55: - 248 | let module_name_lower = String.uncapitalize module_name in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - 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 module_dependencies.cmx module_dependencies.ml - File "module_dependencies.ml", line 57, characters 16-34: - 57 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "module_dependencies.ml", line 84, characters 2-19: - 84 | String.capitalize filename_base - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - File "module_dependencies.ml", line 89, characters 2-21: - 89 | String.uncapitalize (modname ^ ".lem") - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - File "module_dependencies.ml", line 120, characters 57-74: - 120 | let needed_module_strings = List.map (fun (n, l) -> (String.capitalize (Name.to_string n), l)) needed_modules_top in - ^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.capitalize - Use String.capitalize_ascii/StringLabels.capitalize_ascii instead. - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o target_trans.cmx target_trans.ml - ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typecheck.cmx typecheck.ml - + ocamlfind ocamlopt -c -g -annot -package zarith -I ulib -o typecheck.cmx typecheck.ml - File "typecheck.ml", line 74, characters 4-22: - 74 | Pervasives.compare r1 r2 - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "typecheck.ml", line 3456, characters 44-63: - 3456 | let dict_name = Name.from_string (String.uncapitalize (Name.to_string instance_name) ^ "_dict") in - ^^^^^^^^^^^^^^^^^^^ - Alert deprecated: Stdlib.String.uncapitalize - Use String.uncapitalize_ascii/StringLabels.uncapitalize_ascii instead. - 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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/src' - ln -sf src/main.native lem - cat lem.sh >lem - chmod a+x lem - mkdir -p bin - cd bin && ln -sf ../src/main.native lem - make -C library - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/library' - make -C .. build-lem - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03' - echo "(* Generated file -- do not edit. *)" > src/version.ml - echo 'let v="2020-06-03"' >> src/version.ml - echo "(* Generated file -- do not edit. *)" > src/share_directory.ml - echo let d=\"/home/opam/.opam/4.13.0+trunk/share/lem\" >> src/share_directory.ml - make -C src all - make[3]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/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 - make[3]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/src' - ln -sf src/main.native lem - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03' - ../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 -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 -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 -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 -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 - ../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 - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/library' - make ocaml-libs - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03' - make -C ocaml-lib all - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/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 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 -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 -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 -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 -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 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 -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 -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 -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 -o extract.cmxa - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - make -C library ocaml-lib-tests - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/library' - lem_basic_classesAuxiliary.ml - lem_boolAuxiliary.ml - lem_eitherAuxiliary.ml - lem_function_extraAuxiliary.ml - lem_listAuxiliary.ml - lem_list_extraAuxiliary.ml - lem_machine_wordAuxiliary.ml - lem_mapAuxiliary.ml - lem_map_extraAuxiliary.ml - lem_maybeAuxiliary.ml - lem_numAuxiliary.ml - lem_num_extraAuxiliary.ml - lem_relationAuxiliary.ml - lem_setAuxiliary.ml - lem_set_extraAuxiliary.ml - lem_sortingAuxiliary.ml - lem_stringAuxiliary.ml - lem_string_extraAuxiliary.ml - lem_tupleAuxiliary.ml - lem_wordAuxiliary.ml - - - - - *************************************************** - * Testing lem_basic_classes - *************************************************** - - ordering_cases_0: ok - ordering_cases_1: ok - ordering_cases_2: ok - ordering_match_1: ok - ordering_match_2: ok - ordering_match_3: ok - ordering_match_4: ok - ordering_match_5: ok - ordering_match_6: ok - - - - - *************************************************** - * Testing lem_bool - *************************************************** - - not_1: ok - not_2: ok - and_1: ok - and_2: ok - and_3: ok - and_4: ok - or_1: ok - or_2: ok - or_3: ok - or_4: ok - imp_1: ok - imp_2: ok - imp_3: ok - imp_4: ok - equiv_1: ok - equiv_2: ok - equiv_3: ok - equiv_4: ok - xor_1: ok - xor_2: ok - xor_3: ok - xor_4: ok - - - - - *************************************************** - * Testing lem_either - *************************************************** - - either_equal_1: ok - either_equal_2: ok - either_equal_3: ok - either_equal_4: ok - either_equal_5: ok - either_equal_6: ok - either_equal_7: ok - either_pattern_1: ok - either_pattern_2: ok - either_pattern_3: ok - either_pattern_4: ok - isLeft_1: ok - isLeft_2: ok - isRight_1: ok - isRight_2: ok - either_1: ok - either_2: ok - either_3: ok - either_4: ok - partitionEither_1: ok - lefts_1: ok - rights_1: ok - - - - - *************************************************** - * Testing lem_function_extra - *************************************************** - - id_0: ok - id_1: ok - id_2: ok - const_0: ok - const_1: ok - const_2: ok - comb_0: ok - comb_1: ok - apply_0: ok - apply_1: ok - flip_0: ok - flip_1: ok - - - - - *************************************************** - * Testing lem_list - *************************************************** - - null_simple_1: ok - null_simple_2: ok - null_simple_3: ok - length_0: ok - length_1: ok - length_2: ok - list_ord_1: ok - list_ord_2: ok - list_ord_3: ok - list_ord_4: ok - list_ord_5: ok - list_ord_6: ok - list_ord_7: ok - list_ord_8: ok - list_ord_9: ok - append_1: ok - snoc_1: ok - snoc_2: ok - snoc_3: ok - reverseAppend_1: ok - reverse_nil: ok - reverse_1: ok - reverse_2: ok - reverse_5: ok - map_nil: ok - map_1: ok - map_2: ok - map_3: ok - map_4: ok - map_5: ok - map_6: ok - foldl_0: ok - foldl_1: ok - foldl_4: ok - foldr_0: ok - foldr_1: ok - foldr_4: ok - concat_nil: ok - concat_1: ok - concat_2: ok - concat_3: ok - concatMap_nil: ok - concatMap_1: ok - concatMap_2: ok - concatMap_3: ok - all_0: ok - all_4: ok - all_4_neg: ok - any_0: ok - any_4: ok - any_4_neg: ok - dest_init_0: ok - dest_init_1: ok - dest_init_2: ok - index_0: ok - index_1: ok - index_2: ok - index_3: ok - index_4: ok - index_5: ok - index_6: ok - findIndices_1: ok - findIndices_2: ok - findIndices_3: ok - find_index0: ok - find_index1: ok - find_index2: ok - elemIndices_0: ok - elemIndices_1: ok - elemIndices_2: ok - elemIndex_0: ok - elemIndex_1: ok - elemIndex_2: ok - genlist_0: ok - genlist_1: ok - genlist_2: ok - genlist_3: ok - replicate_0: ok - replicate_1: ok - replicate_2: ok - replicate_3: ok - splitAt_1: ok - splitAt_2: ok - splitAt_3: ok - take_1: ok - take_2: ok - take_3: ok - drop_1: ok - drop_2: ok - drop_3: ok - splitWhile_1: ok - splitWhile_2: ok - dropWhile_0: ok - dropWhile_1: ok - dropWhile_2: ok - dropWhile_3: ok - takeWhile_0: ok - takeWhile_1: ok - takeWhile_2: ok - takeWhile_3: ok - isPrefixOf_0: ok - isPrefixOf_1: ok - isPrefixOf_2: ok - isPrefixOf_3: ok - isPrefixOf_4: ok - list_update_1: ok - list_update_2: ok - list_update_3: ok - list_update_4: ok - list_update_5: ok - elem_1: ok - elem_2: ok - elem_3: ok - elem_4: ok - find_1: ok - find_2: ok - find_3: ok - find_4: ok - lookup_1: ok - lookup_2: ok - lookup_3: ok - filter_0: ok - filter_1: ok - partition_0: ok - partition_1: ok - deleteFirst_1: ok - deleteFirst_2: ok - deleteFirst_3: ok - delete_1: ok - delete_2: ok - delete_3: ok - delete_4: ok - zip_1: ok - zip_2: ok - unzip_1: ok - unzip_2: ok - - - - - *************************************************** - * Testing lem_list_extra - *************************************************** - - head_simple_1: ok - head_simple_2: ok - tail_simple_1: ok - tail_simple_2: ok - tail_simple_3: ok - last_simple_1: ok - last_simple_2: ok - init_simple_1: ok - init_simple_2: ok - init_simple_3: ok - nth_0: ok - nth_1: ok - nth_2: ok - nth_3: ok - nth_4: ok - nth_5: ok - zipSameLength_1: ok - - - - - *************************************************** - * Testing lem_machine_word - *************************************************** - - size_test: ok - size_itself_test: ok - length_test: ok - signedIntFromword_test: ok - wordFromBitlist_test: ok - bitlistFromWord_test: ok - wordFromBitlist_bitListFromWord_test: ok - extract_concat_test: ok - update_test: ok - setBit_test1: ok - setBit_test2: ok - setBit_test3: ok - getBit_test: ok - 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 - sext_test_0: ok - sext_test_1: ok - - - - - *************************************************** - * Testing lem_map - *************************************************** - - insert_equal_singleton: ok - commutative_insert_1: ok - commutative_insert_2: ok - empty_null: ok - lookup_insert_1: ok - lookup_insert_2: ok - lookup_insert_3: ok - lookup_empty_0: ok - find_insert_0: ok - fromList_0: ok - fromList_1: ok - toSet_0: ok - toSet_1: ok - toSet_2: ok - domain_0: ok - domain_1: ok - domain_2: ok - range_0: ok - range_1: ok - range_2: ok - member_insert_1: ok - member_insert_2: ok - member_insert_3: ok - any_0: ok - any_1: ok - any_2: ok - any_3: ok - all_0: ok - all_1: ok - all_2: ok - all_3: ok - delete_insert_1: ok - delete_insert_2: ok - delete_delete: ok - map_0: ok - empty_size: ok - singleton_size: ok - - - - - *************************************************** - * Testing lem_map_extra - *************************************************** - - find_insert_1: ok - find_insert_2: ok - - - - - *************************************************** - * Testing lem_maybe - *************************************************** - - maybe_eq_1: ok - maybe_eq_2: ok - maybe_eq_3: ok - maybe_eq_4: ok - maybe_1: ok - maybe_2: ok - maybe_3: ok - maybe_4: ok - isJust_1: ok - isJust_2: ok - isNothing_1: ok - isNothing_2: ok - fromMaybe_1: ok - fromMaybe_2: ok - fromMaybe_3: ok - fromMaybe_4: ok - map_1: ok - map_2: ok - map_3: ok - bind_1: ok - bind_2: ok - bind_3: ok - bind_4: ok - - - - - *************************************************** - * Testing lem_num - *************************************************** - - nat_test1: ok - nat_test2: ok - nat_test3: ok - nat_test4: ok - nat_test5: ok - nat_test6: ok - nat_test7: ok - nat_test8: ok - nat_test9: ok - nat_test10: ok - nat_test11: ok - nat_test12: ok - nat_test13: ok - nat_test14: ok - nat_test15: ok - nat_test16: ok - nat_test17: ok - nat_test18: ok - nat_test19: ok - nat_test20: ok - nat_test21: ok - nat_test22: ok - nat_test23: ok - nat_test24: ok - nat_test25: ok - nat_test26: ok - nat_test27: ok - nat_test28a: ok - nat_test28b: ok - nat_test29: ok - natural_test1: ok - natural_test2: ok - natural_test3: ok - natural_test4: ok - natural_test5: ok - natural_test6: ok - natural_test7: ok - natural_test8: ok - natural_test9: ok - natural_test10: ok - natural_test11: ok - natural_test12: ok - natural_test13: ok - natural_test14: ok - natural_test15: ok - natural_test16: ok - natural_test17: ok - natural_test18: ok - natural_test19: ok - natural_test20: ok - natural_test21: ok - natural_test22: ok - natural_test23: ok - natural_test24: ok - natural_test25: ok - natural_test26: ok - natural_test27: ok - natural_test28a: ok - natural_test28b: ok - natural_test29: ok - int_test1: ok - int_test2: ok - int_test3: ok - int_test4: ok - int_test5: ok - int_test6: ok - int_test6a: ok - int_test7: ok - int_test7a: ok - int_test8: ok - int_test8at: ok - int_test9: ok - int_test10: ok - int_test11: ok - int_test12: ok - int_test13: ok - int_test14: ok - int_test15: ok - int_test16: ok - int_test17: ok - int_test18: ok - int_test19: ok - int_test20: ok - int_test21: ok - int_test22: ok - int_test23: ok - int_test24: ok - int_test25: ok - int_test26: ok - int_test27: ok - int_test28: ok - int_test29: ok - int32_test1: ok - int32_test2: ok - int32_test3: ok - int32_test4: ok - int32_test5: ok - int32_test6: ok - int32_test7: ok - int32_test8: ok - int32_test9: ok - int32_test10: ok - int32_test11: ok - int32_test12: ok - int32_test13: ok - int32_test13a: ok - int32_test14: ok - int32_test15: ok - int32_test16: ok - int32_test17: ok - int32_test18: ok - int32_test19: ok - int32_test20: ok - int32_test21: ok - int32_test22: ok - int32_test23: ok - int32_test24: ok - int32_test25: ok - int32_test26: ok - int32_test27: ok - int32_test28: ok - int64_test1: ok - int64_test2: ok - int64_test3: ok - int64_test4: ok - int64_test5: ok - int64_test6: ok - int64_test7: ok - int64_test8: ok - int64_test9: ok - int64_test10: ok - int64_test11: ok - int64_test12: ok - int64_test13: ok - int64_test13a: ok - int64_test14: ok - int64_test15: ok - int64_test16: ok - int64_test17: ok - int64_test18: ok - int64_test19: ok - int64_test20: ok - int64_test21: ok - int64_test22: ok - int64_test23: ok - int64_test24: ok - int64_test25: ok - int64_test26: ok - int64_test27: ok - int64_test28: ok - integer_test1: ok - integer_test2: ok - integer_test3: ok - integer_test4: ok - integer_test5: ok - integer_test6: ok - integer_test6a: ok - integer_test7: ok - integer_test7a: ok - integer_test8: ok - integer_test8a: ok - integer_test9: ok - integer_test10: ok - integer_test11: ok - integer_test12: ok - integer_test13: ok - integer_test14: ok - integer_test15: ok - integer_test16: ok - integer_test17: ok - integer_test18: ok - integer_test19: ok - integer_test20: ok - integer_test21: ok - integer_test22: ok - integer_test23: ok - integer_test24: ok - integer_test25: ok - integer_test26: ok - integer_test27: ok - integer_test28: ok - integer_test29: ok - integer_test30: ok - rational_test1: ok - rational_test2: ok - rational_test3: ok - rational_test4: ok - rational_test5: ok - rational_test5a: ok - rational_test5b: ok - rational_test5c: ok - rational_test6: ok - rational_test6a: ok - rational_test7: ok - rational_test8: ok - rational_test9: ok - rational_test10: ok - rational_test11: ok - rational_test12: ok - rational_test13: ok - rational_test14: ok - rational_test15: ok - rational_test16: ok - rational_test17: ok - rational_test18: ok - rational_test19: ok - rational_test20: ok - rational_test21: ok - rational_test22: ok - rational_test23: ok - rational_test24: ok - rational_test25: ok - rational_test26: ok - rational_test27: ok - rational_test28: ok - rational_test29: ok - real_test1: ok - real_test2: ok - real_test3: ok - real_test4: ok - real_test5: ok - real_test5a: ok - real_test5b: ok - real_test5c: ok - real_test6: ok - real_test6a: ok - real_test7: ok - real_test8: ok - real_test9: ok - real_test10: ok - real_test11: ok - real_test12: ok - real_test13: ok - real_test14: ok - real_test15: ok - real_test16: ok - real_test17: ok - real_test18: ok - real_test19: ok - real_test20: ok - real_test21: ok - real_test22: ok - real_test23: ok - real_test24: ok - real_test25: ok - real_test26: ok - real_test27: ok - real_test28: ok - real_test29: ok - real_test30: ok - real_test31: ok - real_test32: ok - real_test33: ok - integer_from_int_0: ok - integer_from_int_1: ok - integer_from_int_2: ok - integer_from_nat_0: ok - integer_from_nat_1: ok - integer_from_nat_2: ok - integerFromNatural_0: ok - integerFromNatural_1: ok - integerFromNatural_2: ok - integer_from_int32_0: ok - integer_from_int32_1: ok - integer_from_int32_2: ok - integer_from_int32_3: ok - integer_from_int32_4: ok - integer_from_int32_5: ok - integer_from_int64_0: ok - integer_from_int64_1: ok - integer_from_int64_2: ok - integer_from_int64_3: ok - integer_from_int64_4: ok - integer_from_int64_5: ok - natural_from_nat_0: ok - natural_from_nat_1: ok - natural_from_nat_2: ok - natural_from_integer_0: ok - natural_from_integer_1: ok - natural_from_integer_2: ok - int_from_integer_0: ok - int_from_integer_1: ok - int_from_integer_2: ok - int_from_nat_0: ok - int_from_nat_1: ok - int_from_nat_2: ok - nat_from_natural_0: ok - nat_from_natural_1: ok - nat_from_natural_2: ok - nat_from_int_0: ok - nat_from_int_1: ok - nat_from_int_2: ok - int32_from_nat_0: ok - int32_from_nat_1: ok - int32_from_nat_2: ok - int32_from_natural_0: ok - int32_from_natural_1: ok - int32_from_natural_2: ok - int32_from_integer_0: ok - int32_from_integer_1: ok - int32_from_integer_2: ok - int32_from_integer_3: ok - int32_from_integer_4: ok - int32_from_integer_5: ok - int32_from_int_0: ok - int32_from_int_1: ok - int32_from_int_2: ok - int32_from_int_3: ok - int32_from_int_4: ok - int32_from_int_5: ok - int32_from_int_64_0: ok - int32_from_int_64_1: ok - int32_from_int_64_2: ok - int32_from_int_64_3: ok - int32_from_int_64_4: ok - int32_from_int_64_5: ok - int64_from_nat_0: ok - int64_from_nat_1: ok - int64_from_nat_2: ok - int64_from_natural_0: ok - int64_from_natural_1: ok - int64_from_natural_2: ok - int64_from_integer_0: ok - int64_from_integer_1: ok - int64_from_integer_2: ok - int64_from_integer_3: ok - int64_from_integer_4: ok - int64_from_integer_5: ok - int64_from_int_0: ok - int64_from_int_1: ok - int64_from_int_2: ok - int64_from_int_3: ok - int64_from_int_4: ok - int64_from_int_5: ok - int64_from_int_33_0: ok - int64_from_int_32_1: ok - int64_from_int_32_2: ok - int64_from_int_32_3: ok - int64_from_int_32_4: ok - int64_from_int_32_5: ok - natural_from_int_0: ok - natural_from_int_1: ok - natural_from_int_2: ok - natural_from_int32_0: ok - natural_from_int32_1: ok - natural_from_int32_2: ok - natural_from_int64_0: ok - natural_from_int64_1: ok - natural_from_int64_2: ok - int_from_natural_0: ok - int_from_natural_1: ok - int_from_natural_2: ok - int_from_int32_0: ok - int_from_int32_1: ok - int_from_int32_2: ok - int_from_int64_0: ok - int_from_int64_1: ok - int_from_int64_2: ok - nat_from_integer_0: ok - nat_from_integer_1: ok - nat_from_integer_2: ok - nat_from_int32_0: ok - nat_from_int32_1: ok - nat_from_int32_2: ok - nat_from_int64_0: ok - nat_from_int64_1: ok - nat_from_int64_2: ok - - - - - *************************************************** - * Testing lem_num_extra - *************************************************** - - integerOfString_test_1: ok - integerOfString_test_2: ok - - - - - *************************************************** - * Testing lem_relation - *************************************************** - - rel_basic_0: ok - rel_basic_1: ok - rel_basic_2: ok - in_rel_0: ok - in_rel_1: ok - in_rel_2: ok - in_rel_3: ok - relEmpty_0: ok - relEmpty_1: ok - relAdd_0: ok - relAdd_1: ok - relAdd_2: ok - relAdd_3: ok - rel_id_0: ok - rel_id_1: ok - rel_id_2: ok - rel_id_3: ok - rel_union_0: ok - rel_inter_0: ok - rel_comp_0: ok - rel_restrict_0: ok - rel_converse_0: ok - rel_domain_0: ok - rel_domain_1: ok - rel_domain_2: ok - rel_range_0: ok - rel_range_1: ok - rel_range_2: ok - rel_field_0: ok - rel_field_1: ok - rel_field_2: ok - rel_over_0: ok - rel_over_1: ok - rel_apply_0: ok - rel_apply_1: ok - is_subrel_0: ok - is_subrel_1: ok - is_subrel_2: ok - is_subrel_3: ok - is_reflexive_on_0: ok - is_reflexive_on_1: ok - is_reflexive_on_2: ok - is_irreflexive_on_0: ok - is_irreflexive_on_1: ok - is_irreflexive_on_2: ok - is_irreflexive_on_3: ok - is_irreflexive_0: ok - is_irreflexive_1: ok - is_symmetric_on_0: ok - is_symmetric_on_1: ok - is_symmetric_on_2: ok - is_symmetric_0: ok - is_symmetric_1: ok - is_antisymmetric_on_0: ok - is_antisymmetric_on_1: ok - is_antisymmetric_0: ok - is_antisymmetric_1: ok - is_transitive_on_0: ok - is_transitive_on_1: ok - is_transitive_0: ok - is_transitive_1: ok - is_total_on_0: ok - is_total_on_1: ok - is_trichotomous_on_0: ok - is_trichotomous_on_1: ok - is_single_valued_0: ok - is_single_valued_1: ok - is_equivalence_0: ok - is_equivalence_1: ok - is_equivalence_2: ok - is_preorder_0: ok - is_preorder_1: ok - is_preorder_2: ok - is_partialorder_0: ok - is_partialorder_1: ok - is_partialorder_2: ok - is_partialorder_3: ok - is_strict_partialorder_on_0: ok - is_strict_partialorder_on_1: ok - is_strict_partialorder_on_2: ok - is_strict_partialorder_on_3: ok - is_strict_partialorder_on_4: ok - is_strict_partialorder_0: ok - is_strict_partialorder_1: ok - is_strict_partialorder_2: ok - is_strict_partialorder_3: ok - is_strict_partialorder_4: ok - is_totalorder_on_0: ok - is_totalorder_on_1: ok - is_totalorder_on_2: ok - is_strict_totalorder_on_0: ok - is_strict_totalorder_on_1: ok - transitive_closure_0: ok - transitive_closure_1: ok - transitive_closure_add_0: ok - transitive_closure_add_1: ok - transitive_closure_add_2: ok - reflexive_transitive_closure_0: ok - withoutTransitiveEdges_0: ok - withoutTransitiveEdges_1: ok - withoutTransitiveEdges_2: ok - withoutTransitiveEdges_3: ok - - - - - *************************************************** - * Testing lem_set - *************************************************** - - empty_0: ok - empty_1: ok - empty_2: ok - empty_3: ok - any_0: ok - any_1: ok - all_0: ok - all_1: ok - in_1: ok - in_2: ok - in_3: ok - in_4: ok - nin_1: ok - nin_2: ok - nin_3: ok - nin_4: ok - null_1: ok - null_2: ok - singleton_1: ok - singleton_2: ok - singleton_3: ok - singleton_4: ok - size_1: ok - size_2: ok - size_3: ok - size_4: ok - size_5: ok - set_patterns_0: ok - set_patterns_1: ok - set_patterns_2: ok - set_patterns_3: ok - set_patterns_4: ok - set_patterns_5: ok - set_patterns_6: ok - set_patterns_7: ok - set_patterns_8: ok - set_patterns_9: ok - set_patterns_10: ok - union_1: ok - insert_1: ok - insert_2: ok - insert_3: ok - filter_1: ok - filter_2: ok - split_simple: ok - isSubsetOf_1: ok - isSubsetOf_2: ok - isSubsetOf_3: ok - isProperSubsetOf_1: ok - isProperSubsetOf_2: ok - isProperSubsetOf_3: ok - bigunion_0: ok - bigunion_1: ok - bigunion_2: ok - bigunion_3: ok - difference_1: ok - intersection_1: ok - map_1: ok - map_2: ok - bigunionmap_0: ok - bigunionmap_1: ok - fromList_1: ok - fromList_2: ok - fromList_3: ok - Sigma_1: ok - cross_1: ok - lfp_empty_0: ok - lfp_empty_1: ok - lfp_saturate_neg_1: ok - lfp_saturate_neg_2: ok - lfp_saturate_mod_3: ok - lfp_saturate_mod_4: ok - lfp_saturate_mod_5: ok - lfp_termination: ok - - - - - *************************************************** - * Testing lem_set_extra - *************************************************** - - choose_0: ok - choose_1: ok - choose_2: ok - choose_3: ok - toList_0: ok - toList_1: ok - toList_2: ok - toOrderedList_0: ok - toOrderedList_1: ok - toOrderedList_2: ok - lfp_empty: ok - lfp_saturate_neg: ok - lfp_saturate_mod: ok - - - - - *************************************************** - * Testing lem_sorting - *************************************************** - - perm_1: ok - perm_2: ok - perm_3: ok - perm_4: ok - perm_5: ok - perm_6: ok - isSorted_1: ok - isSorted_2: ok - isSorted_3: ok - isSorted_4: ok - isSorted_5: ok - isSorted_6: ok - sort_1: ok - sort_2: ok - sort_3: ok - - - - - *************************************************** - * Testing lem_string - *************************************************** - - char_simple_0: ok - char_simple_1: ok - char_simple_2: ok - char_simple_3: ok - char_simple_4: ok - char_simple_5: ok - char_simple_6: ok - string_simple_0: ok - string_simple_1: ok - string_simple_2: ok - string_simple_3: ok - toCharList_0: ok - toCharList_1: ok - toString_0: ok - toString_1: ok - makeString_0: ok - makeString_1: ok - makeString_2: ok - stringLength_0: ok - stringLength_1: ok - stringLength_2: ok - stringAppend_0: ok - empty_string_0: ok - empty_string_1: ok - string_cons_0: ok - string_cons_1: ok - string_patterns_0: ok - string_patterns_1: ok - - - - - *************************************************** - * Testing lem_string_extra - *************************************************** - - stringFromNat_0: ok - stringFromNat_1: ok - stringFromNat_2: ok - stringFromNatural_0: ok - stringFromNatural_1: ok - stringFromNatural_2: ok - stringFromInt_0: ok - stringFromInt_1: ok - stringFromInt_2: ok - stringFromInt_3: ok - stringFromInteger_0: ok - stringFromInteger_1: ok - stringFromInteger_2: ok - stringFromInteger_3: ok - string_compare_1: ok - string_compare_2: ok - string_compare_3: ok - - - - - *************************************************** - * Testing lem_tuple - *************************************************** - - fst_1: ok - fst_2: ok - snd_1: ok - snd_2: ok - curry_1: ok - uncurry_1: ok - swap_1: ok - - - - - *************************************************** - * Testing lem_word - *************************************************** - - boolListFrombitSeq_0: ok - boolListFrombitSeq_1: ok - boolListFrombitSeq_2: ok - bitSeqFromBoolList_0: ok - bitSeqFromBoolList_1: ok - bitSeqFromBoolList_2: ok - cleanBitSeq_0: ok - cleanBitSeq_1: ok - cleanBitSeq_2: ok - resizeBitSeq_0: ok - resizeBitSeq_1: ok - resizeBitSeq_2: ok - resizeBitSeq_3: ok - resizeBitSeq_4: ok - bitSeqNot_0: ok - integerFromBoolList_0: ok - integerFromBoolList_1: ok - integerFromBoolList_2: ok - integerFromBoolList_3: ok - integerFromBoolList_4: ok - boolListFromInteger_0: ok - boolListFromInteger_1: ok - boolListFromInteger_2: ok - boolListFromInteger_3: ok - boolListFromInteger_4: ok - bitSeqFromInteger_0: ok - bitSeqFromInteger_1: ok - bitSeqFromInteger_2: ok - bitSeqFromInteger_3: ok - bitSeqFromInteger_4: ok - bitSeqFromInteger_5: ok - integerFromBitSeq_0: ok - integerFromBitSeq_1: ok - integerFromBitSeq_2: ok - integerFromBitSeq_3: ok - integerFromBitSeq_inv_0: ok - integerFromBitSeq_inv_1: ok - integerFromBitSeq_inv_2: ok - bitSequence_test1: ok - bitSequence_test2: ok - bitSequence_test3: ok - bitSequence_test4: ok - bitSequence_test5: ok - bitSequence_test6: ok - bitSequence_test6a: ok - bitSequence_test7: ok - bitSequence_test7a: ok - bitSequence_test8: ok - bitSequence_test8a: ok - bitSequence_test9: ok - bitSequence_test10: ok - bitSequence_test11: ok - bitSequence_test12: ok - bitSequence_test13: ok - bitSequence_test14: ok - bitSequence_test15: ok - bitSequence_test16: ok - bitSequence_test17: ok - bitSequence_test18: ok - bitSequence_test19: ok - bitSequence_test20: ok - bitSequence_test21: ok - bitSequence_test22: ok - bitSequence_test23: ok - bitSequence_test24: ok - bitSequence_test25: ok - bitSequence_test26: ok - bitSequence_bittest1: ok - bitSequence_bittest2: ok - bitSequence_bittest3: ok - bitSequence_bittest4: ok - bitSequence_bittest5: ok - bitSequence_bittest6: ok - bitSequence_bittest7: ok - bitSequence_bittest8: ok - bitSequence_bittest9: ok - bitSequence_bittest10: ok - bitSequence_bittest11: ok - bitSequence_bittest12: ok - bitSequence_bittest13: ok - bitSequence_bittest14: ok - bitSequence_bittest15: ok - bitSequence_bittest16: ok - bitSequence_bittest17: ok - bitSequence_bittest18: ok - bitSequence_bittest19: ok - bitSequence_bittest20: ok - bitSequence_bittest21: ok - bitSequence_bittest22: ok - bitSequence_bittest23: ok - bitSequence_bittest24: ok - int32_bittest1: ok - int32_bittest2: ok - int32_bittest3: ok - int32_bittest4: ok - int32_bittest5: ok - int32_bittest6: ok - int32_bittest7: ok - int32_bittest8: ok - int32_bittest9: ok - int32_bittest10: ok - int32_bittest11: ok - int32_bittest12: ok - int32_bittest13: ok - int32_bittest14: ok - int32_bittest15: ok - int32_bittest16: ok - int32_bittest17: ok - int32_bittest18: ok - int32_bittest19: ok - int32_bittest20: ok - int32_bittest21: ok - int32_bittest22: ok - int32_bittest23: ok - int32_bittest24: ok - int64_bittest1: ok - int64_bittest2: ok - int64_bittest3: ok - int64_bittest4: ok - int64_bittest5: ok - int64_bittest6: ok - int64_bittest7: ok - int64_bittest8: ok - int64_bittest9: ok - int64_bittest10: ok - int64_bittest11: ok - int64_bittest12: ok - int64_bittest13: ok - int64_bittest14: ok - int64_bittest15: ok - int64_bittest16: ok - int64_bittest17: ok - int64_bittest18: ok - int64_bittest19: ok - int64_bittest20: ok - int64_bittest21: ok - int64_bittest22: ok - int64_bittest23: ok - int64_bittest24: ok - integer_bittest1: ok - integer_bittest2: ok - integer_bittest3: ok - integer_bittest4: ok - integer_bittest5: ok - integer_bittest6: ok - integer_bittest7: ok - integer_bittest8: ok - integer_bittest9: ok - integer_bittest10: ok - integer_bittest11: ok - integer_bittest12: ok - integer_bittest13: ok - integer_bittest14: ok - integer_bittest15: ok - integer_bittest16: ok - integer_bittest17: ok - integer_bittest18: ok - integer_bittest19: ok - integer_bittest20: ok - integer_bittest22: ok - integer_bittest24: ok - int_bittest1: ok - int_bittest2: ok - int_bittest3: ok - int_bittest4: ok - int_bittest5: ok - int_bittest6: ok - int_bittest7: ok - int_bittest8: ok - int_bittest9: ok - int_bittest10: ok - int_bittest11: ok - int_bittest12: ok - int_bittest17: ok - int_bittest18: ok - int_bittest19: ok - int_bittest20: ok - int_bittest22: ok - int_bittest24: ok - natural_bittest1: ok - natural_bittest2: ok - natural_bittest3: ok - natural_bittest4: ok - natural_bittest5: ok - natural_bittest6: ok - natural_bittest9: ok - natural_bittest10: ok - natural_bittest11: ok - natural_bittest12: ok - natural_bittest13: ok - natural_bittest14: ok - natural_bittest15: ok - natural_bittest16: ok - natural_bittest17: ok - natural_bittest18: ok - natural_bittest19: ok - natural_bittest20: ok - nat_bittest1: ok - nat_bittest2: ok - nat_bittest3: ok - nat_bittest4: ok - nat_bittest5: ok - nat_bittest6: ok - nat_bittest9: ok - nat_bittest10: ok - nat_bittest11: ok - nat_bittest12: ok - nat_bittest17: ok - nat_bittest18: ok - nat_bittest19: ok - nat_bittest20: ok - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/library' - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03' -> compiled lem.2020-06-03 Processing 74/78: [lem: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "INSTALL_DIR=/home/opam/.opam/4.13.0+trunk" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03) - mkdir -p /home/opam/.opam/4.13.0+trunk/bin - rm -f /home/opam/.opam/4.13.0+trunk/bin/lem - cp src/main.native /home/opam/.opam/4.13.0+trunk/bin/lem - rm -rf /home/opam/.opam/4.13.0+trunk/share/lem - mkdir -p /home/opam/.opam/4.13.0+trunk/share/lem/library - cp library/*.lem /home/opam/.opam/4.13.0+trunk/share/lem/library - cp library/*_constants /home/opam/.opam/4.13.0+trunk/share/lem/library - make -C ocaml-lib install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - Makefile:10: warning: overriding recipe for target 'clean' - ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean' - ocamlbuild -build-dir _build_zarith -X local -X dependencies -I num_impl_zarith -use-ocamlfind -pkg zarith extract.cma extract.cmxa - make /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/META - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - Makefile:10: warning: overriding recipe for target 'clean' - ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean' - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib lem_zarith - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "" lem_zarith num_impl_zarith/META _build_zarith/extract.cma _build_zarith/extract.cmxa _build_zarith/extract.a `find _build_zarith -name '*.cmi' -o -name '*.cmx' -o -name '*.mli'` - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_pervasives_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_pervasives_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/bit.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/vector.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_string_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_string_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_show_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_show_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_relation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_relation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_sorting.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_sorting.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_pervasives.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_pervasives.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_num_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_num_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_maybe_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_maybe_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_map_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_map_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_machine_word.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_machine_word.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_list_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_list_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_function_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_function_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_word.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_word.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_either.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_either.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_map.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_map.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pmap.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set_helpers.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_set_helpers.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_show.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_show.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_string.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_string.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_assert_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_assert_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_tuple.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_tuple.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_maybe.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_maybe.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_function.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_function.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_basic_classes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_basic_classes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/either.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/either.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_bool.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem_bool.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/lem.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/xstring.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_big_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pset.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/xstring.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/xstring.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/bit.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/bit.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/vector.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/vector.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pmap.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pmap.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pset.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/pset.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_num.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_big_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/nat_big_num.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/big_int_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/rational_impl.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/big_int_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/big_int_impl.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/extract.a - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/extract.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/extract.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/META - touch /home/opam/.opam/4.13.0+trunk/lib/lem_zarith/META - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - ocamlbuild -build-dir _build_num -X local -X dependencies -I num_impl_num -use-ocamlfind -pkg num extract.cma extract.cmxa - make /home/opam/.opam/4.13.0+trunk/lib/lem_num/META - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - Makefile:10: warning: overriding recipe for target 'clean' - ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean' - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib lem_num - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/lem_num/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "" lem_num num_impl_num/META _build_num/extract.cma _build_num/extract.cmxa _build_num/extract.a `find _build_num -name '*.cmi' -o -name '*.cmx' -o -name '*.mli'` - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_pervasives_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_pervasives_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/bit.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/vector.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_string_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_string_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_show_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_show_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_relation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_relation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_sorting.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_sorting.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_pervasives.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_pervasives.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_num_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_num_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_maybe_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_maybe_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_map_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_map_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_machine_word.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_machine_word.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_list_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_list_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_function_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_function_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_word.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_word.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_either.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_either.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_map.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_map.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pmap.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set_helpers.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_set_helpers.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_show.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_show.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_string.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_string.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_assert_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_assert_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_tuple.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_tuple.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_maybe.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_maybe.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_function.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_function.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_basic_classes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_basic_classes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/either.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/either.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_bool.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem_bool.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/lem.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/xstring.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_big_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_num.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pset.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/xstring.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/xstring.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/bit.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/bit.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/vector.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/vector.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pmap.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pmap.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pset.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/pset.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_num.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_big_num.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/nat_big_num.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/big_int_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/rational_impl.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/big_int_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/big_int_impl.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/extract.a - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/extract.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/extract.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/lem_num/META - touch /home/opam/.opam/4.13.0+trunk/lib/lem_num/META - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - make /home/opam/.opam/4.13.0+trunk/lib/lem/META - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - Makefile:10: warning: overriding recipe for target 'clean' - ocamlbuild.mk:20: warning: ignoring old recipe for target 'clean' - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib lem - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/lem/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "" lem META - Installed /home/opam/.opam/4.13.0+trunk/lib/lem/META - touch /home/opam/.opam/4.13.0+trunk/lib/lem/META - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/lem.2020-06-03/ocaml-lib' - cp -R coq-lib /home/opam/.opam/4.13.0+trunk/share/lem - cp -R hol-lib /home/opam/.opam/4.13.0+trunk/share/lem - cp -R isabelle-lib /home/opam/.opam/4.13.0+trunk/share/lem -> installed lem.2020-06-03 Processing 75/78: [linksem: make] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7) - make -C src - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7/src' - OCAMLPATH is - lem.mk:13: MAKECMDGOALS is - CAML_LD_LIBRARY_PATH=/home/opam/.opam/4.13.0+trunk/lib/stublibs:/home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs:/home/opam/.opam/4.13.0+trunk/lib/ocaml - OCAML_TOPLEVEL_PATH=/home/opam/.opam/4.13.0+trunk/lib/toplevel - fatal: not a git repository (or any parent up to mount point /) - Stopping at filesystem boundary (GIT_DISCOVERY_ACROSS_FILESYSTEM not set). - Makefile:11: warning: overriding recipe for target 'clean' - no_ocamlbuild.mk:108: 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 1070, character 96 to line 1070, character 170 - Warning: unused variables: 'ac', 'args' - File "dwarf.lem", line 1071, character 96 to line 1071, character 162 - Warning: unused variables: 'ac', 'args' - File "dwarf.lem", line 1071, character 114 to line 1071, character 162 - Warning: unused variable: 'v' - File "dwarf.lem", line 1072, character 96 to line 1072, character 179 - Warning: unused variables: 'ac', 'args' - File "dwarf.lem", line 1073, character 96 to line 1073, character 244 - Warning: unused variable: 'ac' - File "dwarf.lem", line 1074, character 96 to line 1074, character 175 - Warning: unused variables: 'ac', 'args' - File "dwarf.lem", line 1075, character 96 to line 1075, character 185 - Warning: unused variables: 'ac', 'args' - File "dwarf.lem", line 1078, character 97 to line 1078, character 137 - Warning: unused variable: 'ac' - File "dwarf.lem", line 1081, character 97 to line 1081, character 128 - Warning: unused variable: 'ac' - File "dwarf.lem", line 1085, character 97 to line 1085, character 136 - Warning: unused variable: 'ac' - File "dwarf.lem", line 1087, character 149 to line 1087, character 238 - Warning: unused variable: 'vs'' - File "dwarf.lem", line 1091, character 97 to line 1091, character 137 - Warning: unused variable: 'ac' - File "dwarf.lem", line 1386, character 16 to line 1386, character 97 - Warning: unused variable: 'xs' - File "dwarf.lem", line 1501, character 3 to line 1505, character 5 - Warning: pattern-matching is not exhaustive - missing patterns '(_,[])' - File "dwarf.lem", line 1501, character 3 to line 1505, character 5 - Warning: unused variables: 'xs'', 'x' - File "dwarf.lem", line 1543, character 3 to line 1547, character 5 - Warning: unused variables: 'x1', 'x2' - File "dwarf.lem", line 1616, character 3 to line 1619, character 5 - Warning: unused variables: 'x', 'y' - File "dwarf.lem", line 1810, character 5 to line 1815, character 7 - Warning: unused variable: 'ys' - File "dwarf.lem", line 2045, character 20 to line 2045, character 38 - Warning: unused variable: 'y'' - File "dwarf.lem", line 2057, character 54 to line 2057, character 88 - Warning: unused variable: 'x' - File "dwarf.lem", line 2171, character 3 to line 2184, character 5 - Warning: unused variables: 's', 'pc'' - File "dwarf.lem", line 2237, character 3 to line 2258, character 5 - Warning: unused variables: 'n', 'n' - File "dwarf.lem", line 2397, character 3 to line 2402, character 5 - Warning: unused variables: 'bs', 'n' - File "dwarf.lem", line 2405, character 3 to line 2411, character 5 - Warning: unused variables: 'bs', 'n' - File "dwarf.lem", line 2447, character 6 to line 2448, character 43 - Warning: unused variables: 'pos', 'af' - File "dwarf.lem", line 2506, character 6 to line 2514, character 8 - Warning: unused variable: 'parents'' - File "dwarf.lem", line 2518, character 3 to line 2521, character 5 - Warning: unused variable: 'cu'' - File "dwarf.lem", line 2535, character 3 to line 2539, character 5 - Warning: unused variable: 'cu'' - File "dwarf.lem", line 2562, character 41 to line 2563, character 40 - Warning: unused variable: 'pc''' - File "dwarf.lem", line 2571, character 14 to line 2575, character 29 - Warning: unused variable: 'ul' - File "dwarf.lem", line 2708, character 3 to line 2713, character 84 - Warning: unused variable: 'offset' - File "dwarf.lem", line 2740, character 49 to line 2740, character 110 - Warning: unused variable: 'at' - File "dwarf.lem", line 2819, character 9 to line 2822, character 11 - Warning: unused variable: 'pc_abbrev'' - File "dwarf.lem", line 2878, character 9 to line 2881, character 11 - Warning: unused variable: 'pc_abbrev'' - File "dwarf.lem", line 3160, character 3 to line 3164, character 5 - Warning: unused variable: 'bs' - File "dwarf.lem", line 3167, character 3 to line 3176, character 5 - Warning: unused variables: 'bs', 'bs' - File "dwarf.lem", line 3262, character 17 to line 3266, character 19 - Warning: unused variables: 'pc''', 's', 'pc''' - File "dwarf.lem", line 3246, character 17 to line 3250, character 19 - Warning: unused variables: 'pc''', 's', 'pc''' - File "dwarf.lem", line 3355, character 12 to line 3357, character 37 - Warning: unused variable: 'ul' - File "dwarf.lem", line 3632, character 12 to line 3642, character 15 - Warning: unused variable: 'size' - File "dwarf.lem", line 3690, character 3 to line 3696, character 5 - Warning: unused variable: 'n' - File "dwarf.lem", line 3759, character 5 to line 3764, character 7 - Warning: unused variables: 'pc'', 'pc'' - File "dwarf.lem", line 3862, character 5 to line 3865, character 7 - Warning: unused variable: 'pc_loc'' - File "dwarf.lem", line 3852, character 5 to line 3855, character 7 - Warning: unused variable: 'pc_loc'' - File "dwarf.lem", line 3844, character 5 to line 3847, character 7 - Warning: unused variable: 'pc_loc'' - File "dwarf.lem", line 3830, character 5 to line 3833, character 7 - Warning: unused variable: 'pc_info'' - File "dwarf.lem", line 3933, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 3934, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 3935, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 3936, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 3937, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 3938, character 3 to line 3943, character 8 - Warning: unused variable: 'c' - File "dwarf.lem", line 4084, character 3 to line 4095, character 5 - Warning: unused variable: 'fde' - File "dwarf.lem", line 4086, character 8 to line 4086, character 128 - Warning: unused variable: 'rows' - File "dwarf.lem", line 4277, character 3 to line 4299, character 5 - Warning: unused variables: 'n', 'n' - File "dwarf.lem", line 4284, character 7 to line 4297, character 11 - Warning: unused variable: 'offset' - File "dwarf.lem", line 4138, character 9 to line 4255, character 11 - Warning: unused variable: 'size' - File "dwarf.lem", line 4233, character 13 to line 4240, character 15 - Warning: unused variable: 'vs'' - File "dwarf.lem", line 4243, character 13 to line 4252, character 15 - Warning: unused variable: 'bs' - File "dwarf.lem", line 4389, character 3 to line 4393, character 5 - Warning: pattern-matching is not exhaustive - missing patterns '([],_::_)', '(_::[],[])', '(_::[],_::_::_)', '(_::_::_,[])', '(_::_::_,_::[])' - File "dwarf.lem", line 4389, character 3 to line 4393, character 5 - Warning: unused variable: 'len' - File "dwarf.lem", line 4443, character 3 to line 4533, character 5 - Warning: unused variable: 'i' - File "dwarf.lem", line 4462, character 7 to line 4473, character 9 - Warning: unused variable: 'r'' - File "dwarf.lem", line 4475, character 7 to line 4479, character 9 - Warning: unused variable: 'i' - File "dwarf.lem", line 4548, character 3 to line 4569, character 68 - Warning: unused variable: 'final_location' - File "dwarf.lem", line 4608, character 24 to line 4608, character 39 - Warning: unused variable: 's' - File "dwarf.lem", line 4699, character 3 to line 4714, character 5 - Warning: unused variables: 'die', 'cu', 'parents' - File "dwarf.lem", line 4711, character 97 to line 4711, character 223 - Warning: unused variable: 'am' - File "dwarf.lem", line 4718, character 3 to line 4723, character 5 - Warning: unused variable: 'parents' - File "dwarf.lem", line 4727, character 3 to line 4732, character 5 - Warning: unused variable: 'parents' - File "dwarf.lem", line 4750, character 3 to line 4762, character 5 - Warning: unused variables: 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'cupdie', 'decl', 'cupdie', 'decl', 'mbyte_size', 'mmembers', 'decl', 'mbyte_size', 'mmembers', 'mtyp'' - File "dwarf.lem", line 4759, character 45 to line 4759, character 154 - Warning: unused variable: 'subrange_typ' - File "dwarf.lem", line 4779, character 3 to line 4784, character 7 - Warning: unused variable: 'cupdie' - File "dwarf.lem", line 4788, character 3 to line 4796, character 5 - Warning: unused variables: 'decl', 'atk' - File "dwarf.lem", line 4800, character 3 to line 4805, character 7 - Warning: unused variable: 'cupdie' - File "dwarf.lem", line 4808, character 3 to line 4812, character 7 - Warning: unused variable: 'cupdie' - File "dwarf.lem", line 4820, character 3 to line 4831, character 5 - Warning: unused variables: 'decl', 'decl' - File "dwarf.lem", line 4902, character 9 to line 4932, character 107 - Warning: unused variables: 'cu', 'parents' - File "dwarf.lem", line 4923, character 12 to line 4930, character 14 - Warning: unused variables: 'n', 'n' - File "dwarf.lem", line 4908, character 51 to line 4908, character 153 - Warning: unused variables: 'pos', 'av', 'af' - File "dwarf.lem", line 4979, character 3 to line 4993, character 3 - Warning: unused variables: 'n1', 'n' - File "dwarf.lem", line 5000, character 3 to line 5004, 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 5010, character 7 to line 5014, character 9 - Warning: unused variable: 'x' - File "dwarf.lem", line 5052, character 3 to line 5061, 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 5052, character 3 to line 5061, character 5 - Warning: unused variables: 'n', 'n' - File "dwarf.lem", line 5151, character 11 to line 5161, character 14 - Warning: unused variables: 'typ', 'parents', 'kind', 'removed' - File "dwarf.lem", line 5153, character 12 to line 5161, character 14 - Warning: unused variables: 'x'', 'parents'', 'offset'', 'typ'', 'removed'', 'name'', 'kind'' - File "dwarf.lem", line 5152, character 46 to line 5152, character 134 - Warning: unused variables: 'parents'', 'typ'', 'removed'', 'kind'', 'locs'' - File "dwarf.lem", line 5145, character 31 to line 5145, character 178 - Warning: unused variables: 'offset', 'typ', 'parents', 'kind', 'removed', 'locs' - File "dwarf.lem", line 5145, character 99 to line 5145, character 168 - Warning: unused variables: 'parents'', 'offset'', 'typ'', 'removed'', 'kind'', 'locs'' - File "dwarf.lem", line 5169, character 9 to line 5174, character 22 - Warning: unused variable: 'x' - File "dwarf.lem", line 5197, character 6 to line 5209, character 9 - Warning: unused variables: 'n2', 'n1', 'cu', 'parents', 'sld' - File "dwarf.lem", line 5231, character 37 to line 5231, character 74 - Warning: unused variable: 'sld' - File "dwarf.lem", line 5265, character 6 to line 5277, character 9 - Warning: unused variables: 'n2', 'n1', 'cu', 'parents', 'sld' - File "dwarf.lem", line 5266, character 7 to line 5277, character 9 - Warning: unused variable: 'e' - File "dwarf.lem", line 5289, character 34 to line 5289, character 71 - Warning: unused variable: 'sld' - File "dwarf.lem", line 5387, character 47 to line 5387, character 107 - Warning: unused variables: 'name', 'ufe' - File "dwarf.lem", line 5387, character 70 to line 5387, character 107 - Warning: unused variables: 'name'', 'ufe'' - File "dwarf.lem", line 5387, character 16 to line 5387, character 43 - Warning: unused variables: 'line', 'name' - File "dwarf.lem", line 5394, character 40 to line 5394, character 102 - Warning: unused variable: 'ufe' - File "dwarf.lem", line 5398, character 3 to line 5402, character 5 - Warning: unused variable: 'ufe'' - File "dwarf.lem", line 5490, character 3 to line 5575, character 5 - Warning: unused variables: 's', 'n2', 'n1', 'n3' - File "dwarf.lem", line 5768, character 5 to line 5795, character 8 - Warning: unused variable: 'parents' - File "dwarf.lem", line 5780, character 7 to line 5785, character 7 - Warning: unused variable: 'cupdie'' - File "dwarf.lem", line 5843, character 5 to line 5855, character 12 - Warning: unused variable: 'c' - File "dwarf.lem", line 5821, character 11 to line 5826, character 13 - Warning: unused variable: 'cupdie'' - File "dwarf.lem", line 5867, character 5 to line 5876, character 6 - Warning: unused variable: 'parents' - File "dwarf.lem", line 6129, character 8 to line 6134, character 9 - Warning: unused variables: 'subprogram_name', 'ud' - File "dwarf.lem", line 6199, character 5 to line 6200, character 48 - Warning: unused variable: 'cu' - File "dwarf.lem", line 6214, character 18 to line 6215, character 88 - Warning: unused variable: 'locs' - File "dwarf.lem", line 6261, character 3 to line 6263, 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 131, character 1 to line 131, character 20 - Warning: unused variable: 's' - File "dwarf.lem", line 132, character 1 to line 132, character 20 - Warning: unused variable: 's' - File "dwarf.lem", line 1530, character 1 to line 1530, character 91 - Warning: unused variable: 'n' - File "dwarf.lem", line 2062, character 1 to line 2080, character 20 - Warning: unused variable: 'c' - File "dwarf.lem", line 2419, character 1 to line 2437, character 5 - Warning: unused variables: 'c', 'str' - File "dwarf.lem", line 2533, character 1 to line 2539, character 5 - Warning: unused variable: 'parents' - File "dwarf.lem", line 2686, character 1 to line 2699, character 3 - Warning: unused variables: 'pp_children', 'parents' - File "dwarf.lem", line 2930, character 1 to line 2933, character 8 - Warning: unused variables: 'c', 'cuh' - File "dwarf.lem", line 3035, character 1 to line 3039, character 8 - Warning: unused variables: 'c', 'cuh' - File "dwarf.lem", line 3290, character 1 to line 3302, character 59 - Warning: unused variables: 'c', 'cuh' - File "dwarf.lem", line 3309, character 1 to line 3317, character 51 - Warning: unused variables: 'c', 'cuh' - File "dwarf.lem", line 3734, character 1 to line 3737, character 73 - Warning: unused variable: 'ufe' - File "dwarf.lem", line 3739, character 1 to line 3744, character 73 - Warning: unused variable: 'ufe' - File "dwarf.lem", line 3747, character 1 to line 3748, character 6 - Warning: unused variables: 'mcomp_dir', 'mdir', 'ufe' - File "dwarf.lem", line 4403, character 1 to line 4408, character 31 - Warning: unused variable: 'fde' - File "dwarf.lem", line 4410, character 1 to line 4419, character 10 - Warning: unused variable: 'fde' - File "dwarf.lem", line 4429, character 1 to line 4533, character 5 - Warning: unused variable: 'fi' - File "dwarf.lem", line 4742, character 1 to line 4742, character 93 - Warning: unused variable: 'parents' - File "dwarf.lem", line 5748, character 1 to line 5751, character 14 - Warning: unused variables: 'd', 'subprogram_line_extents', 'cu', 'parents' - File "dwarf.lem", line 5885, character 1 to line 5886, character 59 - Warning: unused variable: 'sup' - File "dwarf.lem", line 6177, character 1 to line 6177, character 89 - Warning: unused variables: 'n', 'm', 'is', 'n'', 'm'', 'is'' - File "dwarf.lem", line 6270, character 1 to line 6277, character 5 - Warning: unused variable: 'bs' - File "dwarf.lem", line 6281, character 1 to line 6315, 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 1490, character 3 to line 1494, character 5 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 1501, character 3 to line 1505, character 5 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 1553, character 3 to line 1557, character 5 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 1787, character 5 to line 1794, character 7 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 1997, character 5 to line 2001, character 7 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 2004, character 5 to line 2011, character 7 - Warning: pattern compilation used for target ocaml - File "dwarf.lem", line 4065, character 3 to line 4081, character 5 - Warning: pattern compilation used for target ocaml - File "memory_image.lem", line 464, character 5 to line 467, character 7 - Warning: pattern compilation used for target ocaml - File "gnu_extensions/gnu_ext_symbol_versioning.lem", line 546, character 3 to line 565, character 5 - Warning: pattern compilation used for target ocaml - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/set_extra.lem", line 83, character 1 to line 83, character 62 - Warning: compile message for constant 'Set_extra.toList' and target 'ocaml' - toList is only defined on finite sets and the order of the resulting list is unspecified and therefore might differ for different backend implementations. - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/num.lem", line 2137, character 1 to line 2137, character 43 - Warning: compile message for constant 'Num.naturalFromInteger' and target 'ocaml' - x natFromNatural might fail for too big values. The values allowed are system-dependent. However, at least 30 bit should be available, i.e. all numbers up to 2^30 = 1 073 741 824 should be OK. - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/map_extra.lem", line 64, character 1 to line 64, character 70 - Warning: compile message for constant 'Map_extra.toList' and target 'ocaml' - Map_extra.mapMaybe is only defined for the ocaml and coq backend - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/list_extra.lem", line 24, character 1 to line 24, character 35 - Warning: compile message for constant 'List_extra.head' and target 'ocaml' - head is only defined on non-empty list and should therefore be avoided. Use maching instead and handle the empty case explicitly. - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/list_extra.lem", line 39, character 1 to line 39, character 40 - Warning: compile message for constant 'List_extra.tail' and target 'ocaml' - tail is only defined on non-empty list and should therefore be avoided. Use maching instead and handle the empty case explicitly. - File "/home/opam/.opam/4.13.0+trunk/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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 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/" - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 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/" - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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. - File "main_link.ml", line 92, characters 39-63: - 92 | let _ = (prerr_endline ("Got " ^ ((Pervasives.string_of_int (List.length input_items)) ^ (" input items: {" - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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. - File "main_link.ml", line 92, characters 39-63: - 92 | let _ = (prerr_endline ("Got " ^ ((Pervasives.string_of_int (List.length input_items)) ^ (" input items: {" - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 -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 "show.ml", line 113, characters 16-40: - 113 | show_method = Pervasives.string_of_int}) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - 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 1507-1510, characters 6-9: - 1507 | ......((match xs with - 1508 | x::xs' -> mynth (Nat_big_num.sub_nat n ( (Nat_big_num.of_int 1))) - 1509 | xs' - 1510 | )). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "dwarf.ml", line 3809, characters 12-36: - 3809 | ^ (":" ^ (Pervasives.string_of_int line - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "dwarf.ml", lines 4457-4461, characters 3-4: - 4457 | ...((match (xs,lens) with - 4458 | | ([],[]) -> [] - 4459 | | ([x],[len]) -> [x] - 4460 | | (x::(((_::_) as xs')), len::(((_::_) as lens'))) -> right_space_padded_to len x :: pad_row xs' lens' - 4461 | )) - 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 5077-5081, characters 3-4: - 5077 | ...((match (find_attribute_value "DW_AT_low_pc" die1, find_attribute_value "DW_AT_entry_pc" die1) with - 5078 | | (_, Some (AV_addr n)) -> Some n - 5079 | | (Some (AV_addr n), _) -> Some n - 5080 | | (None,None) -> None - 5081 | ))....................... - 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 5129-5138, characters 2-3: - 5129 | ..(match find_attribute_value "DW_AT_location" die1 with - 5130 | | Some (AV_exprloc( n, bs)) -> location bs - 5131 | | Some (AV_block( n, bs)) -> location bs - 5132 | (* while for a location list, we take the associated pc range from - 5133 | each element of the list *) - 5134 | | Some (AV_sec_offset n) -> - 5135 | let (_,llis) = (find_location_list dloc n) in - 5136 | Some (interpret_location_list base_address1 llis) - 5137 | | None -> None - 5138 | ). - 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 2529, characters 8-11: - 2529 | (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 2747, characters 6-12: - 2747 | let offset = (pp_pos die1.die_offset) in - ^^^^^^ - Warning 26 [unused-var]: unused variable offset. - File "dwarf.ml", line 3802, characters 12-42: - 3802 | let pp_ufe (((mcomp_dir,mdir,file) as ufe) : unpacked_file_entry) : string= - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable ufe. - File "dwarf.ml", line 3807, characters 13-43: - 3807 | 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 3815, characters 18-48: - 3815 | 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 4618, characters 6-20: - 4618 | 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 4769, characters 7-9: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^ - Warning 26 [unused-var]: unused variable cu. - File "dwarf.ml", line 4769, characters 10-17: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^^^^ - Warning 26 [unused-var]: unused variable parents. - File "dwarf.ml", line 4769, characters 18-22: - 4769 | let (cu,parents,die1) = cupdie1 in - ^^^^ - Warning 26 [unused-var]: unused variable die1. - File "dwarf.ml", line 4781, characters 117-167: - 4781 | CT (CT_struct_union( cupdie1, atk, mname, mbyte_size, decl1, (Lem.option_map (fun members -> (Lem_list.map (fun (((cupdie1,mname,typ,data_member_location) as am)) -> (cupdie1,mname,(analyse_type_info_deep d false typ),data_member_location))members)) mmembers))) - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable am. - File "dwarf.ml", line 5232, characters 14-82: - 5232 | | [((removed',((name',offset',kind') as y'),typ',locs',parents') as x')] -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x'. - File "dwarf.ml", line 5250, characters 12-67: - 5250 | (fun (((removed,(name1,offset,kind),typ,locs,parents) as x)) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable x. - File "dwarf.ml", line 5889, characters 13-47: - 5889 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5931, characters 17-51: - 5931 | | Some (((cu',parents',die') as cupdie')) -> - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable cupdie'. - File "dwarf.ml", line 5950, characters 8-9: - 5950 | let c = (p_context_of_d d) in - ^ - Warning 26 [unused-var]: unused variable c. - File "dwarf.ml", line 6238, characters 15-49: - 6238 | | 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 "adaptors/harness_interface.ml", line 236, characters 25-49: - 236 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint32_wrapper.to_string hdr.elf32_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 256, characters 25-49: - 256 | ; ("There are " ^ (Pervasives.string_of_int (List.length pht) ^ (" program headers, starting at offset " ^ Uint64_wrapper.to_string hdr.elf64_phoff))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 293, characters 19-43: - 293 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 358, characters 19-43: - 358 | (let temp = (Pervasives.string_of_int i) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 422, characters 21-45: - 422 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint32_wrapper.to_bigint hdr.elf32_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 431, characters 21-45: - 431 | ("There are " ^ (Pervasives.string_of_int (List.length sht) ^ (" section headers, starting at offset 0x" ^ (unsafe_hex_string_of_natural 0 (Uint64_wrapper.to_bigint hdr.elf64_shoff) ^ ":")))) - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 602, characters 17-41: - 602 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 626, characters 17-41: - 626 | let len = (Pervasives.string_of_int (List.length rels)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 732, characters 17-41: - 732 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 771, characters 17-41: - 771 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 858, characters 17-41: - 858 | (let temp = (Pervasives.string_of_int num) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 896, characters 17-41: - 896 | let len = (Pervasives.string_of_int (List.length syms)) in bind (String_table.get_string_at nm shdr) (fun nm -> - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1069, characters 23-47: - 1069 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "adaptors/harness_interface.ml", line 1149, characters 23-47: - 1149 | let entries = (Pervasives.string_of_int (List.length s)) in - ^^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "elf_memory_image_of_elf64_file.ml", line 198, characters 20-35: - 198 | let reloc_as_triple = (fun ((_ : bool Memory_image.range_tag), (x : bool Memory_image.range_tag)) -> ((match x with - ^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable reloc_as_triple. - File "elf_memory_image_of_elf64_file.ml", line 209, characters 20-41: - 209 | let retrieved_reloc_sites = (Multimap.lookupBy0 - ^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable retrieved_reloc_sites. - File "elf_memory_image_of_elf64_file.ml", line 233, characters 20-42: - 233 | let all_annotations_length = (List.length all_annotations_list) - ^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable all_annotations_length. - File "elf_memory_image_of_elf64_file.ml", line 382, characters 81-102: - 382 | * case where the element length is still vague (Nothing). *)let range_len_matches_sec = ( Nat_big_num.equal rangeLen s.elf64_section_size) - ^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable range_len_matches_sec. - File "elf_memory_image_of_elf64_file.ml", line 384, characters 20-43: - 384 | let sec_matches_element_len = ( (Lem.option_equal Nat_big_num.equal(Some(s.elf64_section_size)) el_rec.length1)) - ^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable sec_matches_element_len. - File "command_line.ml", lines 181-204, characters 19-19: - 181 | ...................(state1 :: more) s:(command_state)list= - 182 | (let chars = (Xstring.explode s) - 183 | in - 184 | let spec = ((match chars with - 185 | '-' :: 'l' :: more -> Libname(Xstring.implode more) - ... - 201 | ; current_group = (let toAppend = ([(spec, state1.current_input_options)]) in - 202 | (match state1.current_group with Some l -> Some( List.rev_append (List.rev l) toAppend) | None -> Some(toAppend) - 203 | )) - 204 | } :: more) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "command_line.ml", lines 207-215, characters 16-19: - 207 | ................(state1 :: more):(command_state)list= ({ - 208 | input_units = (state1.input_units) - 209 | ; link_options = (state1.link_options) - 210 | ; current_input_options = (state1.current_input_options) - 211 | ; current_group = ((match state1.current_group with - 212 | None -> Some [] - 213 | | _ -> failwith "cannot nest groups" - 214 | )) - 215 | } :: more) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "command_line.ml", lines 218-226, characters 14-19: - 218 | ..............(state1 :: more):(command_state)list= ({ - 219 | input_units = (List.rev_append (List.rev state1.input_units) ((match state1.current_group with - 220 | Some l -> [Group(l)] - 221 | | None -> failwith "end group without start group" - 222 | ))) - 223 | ; link_options = (state1.link_options) - 224 | ; current_input_options = (state1.current_input_options) - 225 | ; current_group = None - 226 | } :: more) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - [] - File "input_list.ml", line 269, characters 9-10: - 269 | | _ -> failwith "impossible expanded input item" - ^ - Warning 11 [redundant-case]: this match case is unused. - File "input_list.ml", lines 277-313, characters 12-13: - 277 | ............(match input with - 278 | File(spec, options) - 279 | -> (match spec with - 280 | Filename(str) - 281 | -> elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs - ... - 310 | )))) group_with_file_lists) - 311 | in - 312 | elaborate_input_helper ( Nat_big_num.add input_pos( (Nat_big_num.of_int 1))) more_inputs ( List.rev_append (List.rev acc) (List.concat to_add)) - 313 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - BuiltinControlScript - File "input_list.ml", line 224, characters 42-47: - 224 | else let (names, seqs) = (List.split not_elf) in - ^^^^^ - Warning 26 [unused-var]: unused variable names. - File "input_list.ml", line 224, characters 49-53: - 224 | else let (names, seqs) = (List.split not_elf) in - ^^^^ - Warning 26 [unused-var]: unused variable seqs. - File "linkable_list.ml", lines 83-93, characters 13-10: - 83 | .............((match it with - 84 | (fname1, Reloc(seq), origin) -> - 85 | let _ = (prerr_endline ("Considering relocatable file " ^ fname1)) in bind (Elf_file.read_elf64_file seq) (fun e -> - 86 | return (RelocELF(elf_memory_image_of_elf64_file a fname1 e), it, opts)) - 87 | | (fname1, Shared(seq), origin) -> - ... - 90 | | (fname1, Script(seq), origin) -> - 91 | (*let _ = Missing_pervasives.errln ("Skipping linker script " ^ fname) in*) - 92 | fail "unsupported input item" - 93 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (_, ControlScript, _) - File "linkable_list.ml", line 298, characters 8-14: - 298 | let refstr = ("`" - ^^^^^^ - Warning 26 [unused-var]: unused variable refstr. - File "linkable_list.ml", line 390, characters 8-23: - 390 | let und_ref_triples = (let x2 =(Pset.from_list (tripleCompare Nat_big_num.compare compare (tripleCompare compare (tripleCompare compare compare (pairCompare compare (lexicographic_compare compare))) compare)) - ^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable und_ref_triples. - File "linker_script.ml", lines 327-343, characters 147-5: - 327 | ...................................................................................................................................................(match comp_el with - 328 | IncludeInputSection(retain_pol, irec (* fname, linkable_idx, shndx, isec, img *)) -> - 329 | let aligned_next_free = (align_up_to irec.isec.elf64_section_align next_free_addr) - 330 | in - 331 | (*let _ = errln ("Aligned start address up to 0x" ^ hex_string_of_natural aligned_next_free ^ - ... - 340 | ( Nat_big_num.add aligned_next_free (Ml_bindings.nat_big_num_of_uint64 def.def_syment.elf64_st_size), List.rev_append (List.rev addr_list) [aligned_next_free]) - 341 | (*| Hole(AddressExprFn f) -> (f next_free_addr secs, addr_list ++ [next_free_addr])*) - 342 | | ProvideSymbol(pol, name1, spec) -> (next_free_addr, List.rev_append (List.rev addr_list) [next_free_addr]) - 343 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Hole _ - File "linker_script.ml", lines 380-389, characters 40-6: - 380 | ........................................((match name1 with - 381 | "ldata-segment" -> (match user_data_segment_start with - 382 | None -> default - 383 | | Some addr -> (* fun _ -> *) addr - 384 | ) - 385 | | "text-segment" -> (match user_text_segment_start with - 386 | None -> default - 387 | | Some addr -> (* fun _ -> *) addr - 388 | ) - 389 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - "" - File "linker_script.ml", line 970, characters 10-18: - 970 | | OnlyIfRo -> - ^^^^^^^^ - Warning 11 [redundant-case]: this match case is unused. - File "linker_script.ml", line 978, characters 10-18: - 978 | | OnlyIfRw -> - ^^^^^^^^ - Warning 11 [redundant-case]: this match case is unused. - File "linker_script.ml", lines 1298-1306, characters 12-13: - 1298 | ............(match (acc_ynm, new_ynm) with - 1299 | (None, None) -> None - 1300 | | (None, Some x) -> Some x - 1301 | | (Some x, None) -> Some x - 1302 | | (Some true, Some false) -> Some true - 1303 | | (Some true, Some true) -> Some true - 1304 | | (Some false, Some false) -> Some false - 1305 | | (Some true, Some false) -> Some true - 1306 | )............ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Some false, Some true) - File "linker_script.ml", line 1305, characters 18-41: - 1305 | | (Some true, Some false) -> Some true - ^^^^^^^^^^^^^^^^^^^^^^^ - Warning 11 [redundant-case]: this match case is unused. - File "linker_script.ml", lines 1312-1320, characters 12-13: - 1312 | ............(match (acc_ynm, new_ynm) with - 1313 | (None, None) -> None - 1314 | | (None, Some x) -> Some x - 1315 | | (Some x, None) -> Some x - 1316 | | (Some true, Some false) -> Some false - 1317 | | (Some true, Some true) -> Some true - 1318 | | (Some false, Some false) -> Some false - 1319 | | (Some true, Some false) -> Some false - 1320 | )............................................................................................ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Some false, Some true) - File "linker_script.ml", line 1319, characters 18-41: - 1319 | | (Some true, Some false) -> Some false - ^^^^^^^^^^^^^^^^^^^^^^^ - Warning 11 [redundant-case]: this match case is unused. - File "linker_script.ml", lines 1562-1777, characters 40-45: - 1562 | ........................................(match tag with - 1563 | (* If it's a section, we discard it. - 1564 | * We will add a new section record at the end. (FIXME) *) - 1565 | | FileFeature(ElfSection(idx1, isec1)) -> None - 1566 | (* If it's a symbol def, we propagate it. - ... - 1774 | } - 1775 | )) - 1776 | ) (* match maybe_reloc *) - 1777 | )................ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - FileFeature - (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _|ElfSegment _) - File "linker_script.ml", lines 1409-1849, characters 54-18: - 1409 | ......................................................((match comp_el with - 1410 | | IncludeInputSection(retainpolicy, (* fname, linkable_idx, shndx, isec, img *) irec) -> - 1411 | (* We want to get the input section as a byte pattern *) - 1412 | (*let _ = errln ("Processing inclusion of input section `" ^ irec.isec.elf64_section_name_as_string - 1413 | ^ "' from file `" ^ irec.fname - ... - 1846 | SymbolDef(symbol_def_for_provide_symbol name1 size2 info other control_script_linkable_idx) - 1847 | )]) - 1848 | ) - 1849 | ))........................ - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Hole _ - File "linker_script.ml", line 2448, characters 10-11: - 2448 | | _ -> acc - ^ - Warning 11 [redundant-case]: this match case is unused. - File "linker_script.ml", lines 2483-2505, characters 55-10: - 2483 | .......................................................((match input with - 2484 | InputSection(irec) -> - 2485 | (* HACK: simulates GNU linker, but this logic ought to go elsewhere *) - 2486 | if irec.isec.elf64_section_name_as_string = ".note.GNU-stack" then None - 2487 | else - ... - 2502 | && not (flag_is_set shf_execinstr irec.isec.elf64_section_flags) - 2503 | then place_after_data - 2504 | else place_after_text - 2505 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Common (_, _, _, {def_syment=_; _ }) - File "linker_script.ml", lines 2650-2663, characters 46-18: - 2650 | ..............................................((match (maybe_idef, possible_script_defs, possible_linker_generated_def) with - 2651 | | (_, [], None) -> (*let _ = errln "no" in *) - 2652 | (((iref_idx, iref, iref_item), maybe_idef), None) - 2653 | | (None, [], Some(def)) -> (*let _ = errln "yes (was undefined)" in*) - 2654 | (((iref_idx, iref, iref_item), Some(lowest_idx, def, first_linkable_item)), Some(def)) - ... - 2660 | (((iref_idx, iref, iref_item), Some (control_script_linkable_idx, def, control_script_linkable_item)), Some(def)) - 2661 | | (_, pair1 :: pair2 :: more, _) -> (*let _ = errln "error" in*) - 2662 | failwith "ambiguous symbol binding in linker control script" - 2663 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - (Some _, [], Some _) - File "linker_script.ml", line 1085, characters 24-43: - 1085 | let acc_with_output_sec = (flush_output_sec cur_output_sec) - ^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable acc_with_output_sec. - File "linker_script.ml", line 1403, characters 20-29: - 1403 | let make_line = (fun namestr -> (fun addrstr -> (fun szstr -> (fun rhs -> ( - ^^^^^^^^^ - Warning 26 [unused-var]: unused variable make_line. - File "linker_script.ml", line 1506, characters 40-60: - 1506 | let included_global_defs = (let x2 = - ^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable included_global_defs. - File "linker_script.ml", line 1908, characters 21-38: - 1908 | (let section_tags_bare = (List.filter (fun (maybe_range, tag) -> - ^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable section_tags_bare. - File "linker_script.ml", line 2143, characters 44-49: - 2143 | let size2 = (Nat_big_num.sub_nat end_addr start_addr) - ^^^^^ - Warning 26 [unused-var]: unused variable size2. - File "linker_script.ml", line 2170, characters 24-38: - 2170 | let endpos_option2 = (data_segment_endpos option2) - ^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable endpos_option2. - File "linker_script.ml", line 2208, characters 24-47: - 2208 | let count_sections_in_image = (fun img2 -> ( - ^^^^^^^^^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable count_sections_in_image. - File "linker_script.ml", line 2480, characters 13-28: - 2480 | let place_after_rel = (find_output (Some(".rela.dyn")) (Some(sht_rela))(Pset.from_list Nat_big_num.compare [])(Pset.from_list Nat_big_num.compare [])) in - ^^^^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable place_after_rel. - File "linker_script.ml", line 2707, characters 8-20: - 2707 | let discard_line = (fun i -> ((match i with - ^^^^^^^^^^^^ - Warning 26 [unused-var]: unused variable discard_line. - File "link.ml", lines 326-330, characters 8-9: - 326 | ........(match range_tag1 with - 327 | FileFeature(ElfSection(idx1, isec1)) -> - 328 | if a.section_is_special isec1 img2 (* discard reloc sections, and we'll re-add them *) - 329 | then Some (el_name, range_tag1) else None - 330 | ) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - FileFeature - (ElfHeader _|ElfSectionHeaderTable _|ElfProgramHeaderTable _| - ElfSegment (_, {elf64_segment_body=_; elf64_segment_flags=(_, _, _); _ })) - File "link.ml", lines 645-673, characters 42-30: - 645 | ..........................................((match x.maybe_def_bound_to with - 646 | Some(ApplyReloc, Some(bound_def)) -> - 647 | (* Here we are mapping - 648 | * *from* the definition found in an input object during resolution (bound_def) - 649 | * *to* the corresponding symbol in the output image, now that we've built it. - ... - 670 | | Some(LeaveReloc, _) -> - 671 | (* We shouldn't be seeing this, given that we're applying the reloc Right Now. *) - 672 | failwith "internal error: applying reloc that is not to be applied" - 673 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some (ChangeRelocTo _, _) - File "link.ml", lines 990-993, characters 8-10: - 990 | ........((match Command_line.find_option_matching_tag (Command_line.EntryAddress( (Nat_big_num.of_int 0))) options with - 991 | None -> a.guess_entry_point output_image - 992 | | Some(Command_line.EntryAddress(x)) -> Some x - 993 | )) - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (BindFunctionsEarly|BindNonFunctionsEarly|OutputFilename _|OutputKind _| - ForceCommonDefined _|Soname _|TextSegmentStart _|RodataSegmentStart _| - LdataSegmentStart _) - File "load.ml", lines 278-292, characters 2-3: - 278 | ..(match maybe_pltgot_offset with - 279 | | Some (_, Address pltgot_offset) -> - 280 | let pltgot_addr = (Nat_big_num.add base (Ml_bindings.nat_big_num_of_uint64 pltgot_offset)) in - 281 | let _ = (prerr_endline ("Initializing PLTGOT at 0x" ^ (hex_string_of_natural pltgot_addr))) in - 282 | (* The second entry contains a linker-specific value. FreeBSD's rtld-elf - ... - 289 | | None -> - 290 | let _ = (prerr_endline ("No DT_PLTGOT in .dynamic, skipping PLTGOT initialization")) in - 291 | img2 - 292 | ). - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _| - Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 371-374, characters 19-4: - 371 | ...................((match maybe_got_offset with - 372 | | Some (_, Address got) -> got - 373 | | None -> failwith "apply_mips64_got_relocations: missing DT_PLTGOT in .dynamic" - 374 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _| - Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 382-402, characters 31-4: - 382 | ...............................((match maybe_local_gotno with - 383 | | Some (_, Numeric local_gotno) -> - 384 | (* The first entry is reserved to hold the address of the entry point in - 385 | the dynamic linker to call when lazy resolving text symbols. The second - 386 | entry is reserved by DSOs linked with GNU's ld to hold the base address - ... - 399 | | None -> - 400 | let _ = (prerr_endline "Not applying MIPS64 .got relocations: missing DT_LOCAL_GOTNO") in - 401 | (img2, got_addr) - 402 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _| - Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 408-411, characters 20-4: - 408 | ....................((match maybe_symtab_addr with - 409 | | Some (_, Address symtab_addr) -> symtab_addr - 410 | | None -> failwith "apply_mips64_got_relocations: missing DT_SYMTAB in .dynamic" - 411 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _| - Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 415-418, characters 15-4: - 415 | ...............((match maybe_gotsym with - 416 | | Some (_, Numeric gotsym) -> gotsym - 417 | | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_GOTSYM in .dynamic" - 418 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _| - Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 422-425, characters 17-4: - 422 | .................((match maybe_symtabno with - 423 | | Some (_, Numeric symtabno) -> symtabno - 424 | | None -> failwith "apply_mips64_got_relocations: missing DT_MIPS_SYMTABNO in .dynamic" - 425 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _| - Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 435-438, characters 24-4: - 435 | ........................((match maybe_cap_relocs with - 436 | | Some (_, Address cap_relocs_addr) -> Ml_bindings.nat_big_num_of_uint64 cap_relocs_addr - 437 | | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCS in .dynamic" - 438 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Size _|FName _|SOName _|Path _|RPath _|RunPath _|Library _| - Flags1 _|Flags _|Numeric _|Checksum _|RelType _|Timestamp _)) - File "load.ml", lines 442-445, characters 21-4: - 442 | .....................((match maybe_cap_relocssz with - 443 | | Some (_, Numeric cap_relocssz) -> cap_relocssz - 444 | | None -> failwith "apply_cheri_mips64_cap_relocations: missing DT_CHERI___CAPRELOCSSZ in .dynamic" - 445 | ))... - Warning 8 [partial-match]: this pattern-matching is not exhaustive. - Here is an example of a case that is not matched: - Some - (_, - (Null|Ignored|Address _|Size _|FName _|SOName _|Path _|RPath _|RunPath _| - Library _|Flags1 _|Flags _|Checksum _|RelType _|Timestamp _)) - File "load.ml", line 524, characters 8-18: - 524 | (let symtab_scn = (assert_unwrap_maybe (Lem_list.list_index f.elf64_file_interpreted_sections (Nat_big_num.to_int symtab_scnidx))) in bind (find_elf64_symbols_by_symtab_idx symtab_scnidx f) (fun triple -> - ^^^^^^^^^^ - Warning 26 [unused-var]: unused variable symtab_scn. - File "load.ml", line 528, characters 8-17: - 528 | let sym_value = (Ml_bindings.nat_big_num_of_uint64 sym_entry.elf64_st_value) in - ^^^^^^^^^ - Warning 26 [unused-var]: unused variable sym_value. - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7/src' -> compiled linksem.0.7 Processing 76/78: [linksem: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7) - make -C src install - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7/src' - OCAMLPATH is - lem.mk:13: MAKECMDGOALS is install - CAML_LD_LIBRARY_PATH=/home/opam/.opam/4.13.0+trunk/lib/stublibs:/home/opam/.opam/4.13.0+trunk/lib/ocaml/stublibs:/home/opam/.opam/4.13.0+trunk/lib/ocaml - OCAML_TOPLEVEL_PATH=/home/opam/.opam/4.13.0+trunk/lib/toplevel - fatal: not a git repository (or any parent up to mount point /) - Stopping at filesystem boundary (GIT_DISCOVERY_ACROSS_FILESYSTEM not set). - Makefile:11: warning: overriding recipe for target 'clean' - no_ocamlbuild.mk:108: warning: ignoring old recipe for target 'clean' - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib linksem - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/linksem/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "0.7" linksem META - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem/META - touch /home/opam/.opam/4.13.0+trunk/lib/linksem/META - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib linksem_zarith - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "0.7" linksem_zarith \ - build_zarith/META \ - build_zarith/linksem.cma build_zarith/linksem.cmxa \ - build_zarith/linksem.a\ - build_zarith/*.cmi \ - build_zarith/*.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/uint64_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/uint32_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/test_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/string_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/show.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/sail_interface.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/multimap.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/ml_bindings.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/missing_pervasives.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/memory_image_orderings.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/load.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linker_script.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linkable_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/link.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/ldconfig.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/input_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/hex_printing.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/harness_interface.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_types_native_uint.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_symbol_versioning.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_note.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_abi.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/filesystem_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/filesystem.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/error.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/endianness.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_types_native_uint.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_note.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_interpreted_segment.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_interpreted_section.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_file.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/dwarf_ctypes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/dwarf.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/default_printing.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/command_line.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_pattern_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_pattern.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/auxv.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/archive.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abstract_linker_script.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abis.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_x86_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_utilities.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_classes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_capability.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/uint64_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/uint32_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/test_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/string_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/show.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/sail_interface.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/multimap.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/ml_bindings.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/missing_pervasives.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/memory_image_orderings.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/load.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linker_script.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linkable_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/link.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/ldconfig.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/input_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/hex_printing.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/harness_interface.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_types_native_uint.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_symbol_versioning.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_section_to_segment_mapping.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_note.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/gnu_ext_abi.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/filesystem_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/filesystem.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/error.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/endianness.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_types_native_uint.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_note.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_memory_image_of_elf64_file.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_interpreted_segment.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_interpreted_section.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_file.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/elf64_file_of_elf_memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/dwarf_ctypes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/dwarf.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/default_printing.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/command_line.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_sequence.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_pattern_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/byte_pattern.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/auxv.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/archive.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abstract_linker_script.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abis.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_x86_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_utilities.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_riscv.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_power64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_mips64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_classes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64_capability.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_cheri_mips64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_amd64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/abi_aarch64_le.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linksem.a - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linksem.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/linksem.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/META - touch /home/opam/.opam/4.13.0+trunk/lib/linksem_zarith/META - ocamlfind remove -destdir /home/opam/.opam/4.13.0+trunk/lib linksem_num - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/linksem_num/META - ocamlfind install -destdir /home/opam/.opam/4.13.0+trunk/lib -patch-version "0.7" linksem_num \ - build_num/META \ - build_num/linksem.cma build_num/linksem.cmxa \ - build_num/linksem.a\ - build_num/*.cmi \ - build_num/*.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/uint64_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/uint32_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/test_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/string_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/show.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/sail_interface.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/multimap.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/ml_bindings.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/missing_pervasives.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/memory_image_orderings.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/load.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linker_script.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linkable_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/link.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/ldconfig.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/input_list.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/hex_printing.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/harness_interface.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_types_native_uint.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_symbol_versioning.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_note.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_abi.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/filesystem_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/filesystem.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/error.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/endianness.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_types_native_uint.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_note.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_memory_image_of_elf64_file.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_interpreted_segment.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_interpreted_section.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_file.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf64_file_of_elf_memory_image.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/dwarf_ctypes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/dwarf.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/default_printing.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/command_line.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence_wrapper.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence_impl.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_pattern_extra.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_pattern.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/auxv.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/archive.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abstract_linker_script.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abis.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_x86_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_utilities.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_classes.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_dynamic.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_capability.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_symbol_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_section_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_relocation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_program_header_table.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le_serialisation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le_elf_header.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/uint64_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/uint32_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/test_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/string_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/show.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/sail_interface.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/multimap.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/ml_bindings.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/missing_pervasives.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/memory_image_orderings.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/load.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linker_script.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linkable_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/link.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/ldconfig.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/input_list.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/hex_printing.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/harness_interface.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_types_native_uint.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_symbol_versioning.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_section_to_segment_mapping.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_note.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/gnu_ext_abi.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/filesystem_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/filesystem.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/error.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/endianness.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_types_native_uint.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_note.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_memory_image_of_elf64_file.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_interpreted_segment.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_interpreted_section.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_file.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/elf64_file_of_elf_memory_image.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/dwarf_ctypes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/dwarf.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/default_printing.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/command_line.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence_wrapper.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence_impl.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_sequence.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_pattern_extra.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/byte_pattern.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/auxv.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/archive.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abstract_linker_script.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abis.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_x86_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_utilities.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_riscv.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_power64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_mips64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_classes.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_dynamic.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64_capability.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_cheri_mips64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_amd64.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_symbol_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_section_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_relocation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_program_header_table.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le_serialisation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le_elf_header.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/abi_aarch64_le.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linksem.a - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linksem.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/linksem.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/linksem_num/META - touch /home/opam/.opam/4.13.0+trunk/lib/linksem_num/META - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/linksem.0.7/src' -> installed linksem.0.7 Processing 77/78: [sail: make isail] + /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "make" "INSTALL_DIR=/home/opam/.opam/4.13.0+trunk" "SHARE_DIR=/home/opam/.opam/4.13.0+trunk/share/sail" "isail" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14) - make -C src isail - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/src' - Makefile:51: MAKECMDGOALS is isail - ott -sort false -generate_aux_rules true -o ast.lem -picky_multiple_parses true ../language/sail.ott - Ott version 0.31 distribution of Mon 15 Jun 12:00:29 BST 2020 - lem -ocaml ast.lem - sed -i.bak -f ast.sed ast.ml - ott -sort false -generate_aux_rules true -o jib.lem -picky_multiple_parses true ../language/jib.ott - Ott version 0.31 distribution of Mon 15 Jun 12:00:29 BST 2020 - lem -ocaml jib.lem -lib . -lib gen_lib/ - sed -i.bak -f ast.sed jib.ml - echo "(* Generated file -- do not edit. *)" > manifest.ml - echo let dir=\"/home/opam/.opam/4.13.0+trunk/share/sail\" >> manifest.ml - echo let commit=\"opam\" >> manifest.ml - echo let branch=\"sail2\" >> manifest.ml - echo let version=\""0.14"\" >> manifest.ml - ocamlbuild -use-ocamlfind isail.native sail_lib.cma sail_lib.cmxa libsail.cma libsail.cmxa - ocamlfind ocamlopt unix.cmxa -I /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuildlib.cmxa -linkpkg myocamlbuild.ml /home/opam/.opam/4.13.0+trunk/lib/ocamlbuild/ocamlbuild.cmx -o myocamlbuild - ocamlfind ocamldep -package lem -package base64 -package pprint -package yojson -package linenoise -modules isail.ml > isail.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules ast.ml > ast.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules parse_ast.ml > parse_ast.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules value.ml > value.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -package linksem -modules elf_loader.ml > elf_loader.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules sail_lib.ml > sail_lib.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules util.mli > util.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o util.cmi util.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o sail_lib.cmo sail_lib.ml - + ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o sail_lib.cmo sail_lib.ml - File "sail_lib.ml", line 694, characters 16-39: - 694 | let print str = Pervasives.print_string str - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "sail_lib.ml", line 696, characters 16-39: - 696 | let prerr str = Pervasives.prerr_string str - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package linksem -I jib -I gen_lib -o elf_loader.cmo elf_loader.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parse_ast.cmo parse_ast.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o value.cmo value.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules ast_defs.ml > ast_defs.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast.cmo ast.ml - /home/opam/.opam/4.13.0+trunk/bin/ocamllex.opt -q lexer.mll - ocamlfind ocamldep -package lem -package base64 -package pprint -modules lexer.ml > lexer.ml.depends - menhir --raw-depend --ocamldep 'ocamlfind ocamldep -modules' parser.mly > parser.mly.depends - menhir --ocamlc 'ocamlfind ocamlc -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib' --infer parser.mly - ocamlfind ocamldep -package lem -package base64 -package pprint -modules parser.mli > parser.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o parser.cmi parser.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o lexer.cmo lexer.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules ast_util.mli > ast_util.mli.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast_defs.cmo ast_defs.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gdbmi.ml > gdbmi.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o ast_util.cmi ast_util.mli - /home/opam/.opam/4.13.0+trunk/bin/ocamllex.opt -q gdbmi_lexer.mll - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gdbmi_lexer.ml > gdbmi_lexer.ml.depends - menhir --raw-depend --ocamldep 'ocamlfind ocamldep -modules' gdbmi_parser.mly > gdbmi_parser.mly.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gdbmi_types.ml > gdbmi_types.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_types.cmo gdbmi_types.ml - menhir --ocamlc 'ocamlfind ocamlc -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib' --infer gdbmi_parser.mly - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gdbmi_parser.mli > gdbmi_parser.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_parser.cmi gdbmi_parser.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules interactive.mli > interactive.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules type_check.mli > type_check.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pattern_completeness.mli > pattern_completeness.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o pattern_completeness.cmi pattern_completeness.mli - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o type_check.cmi type_check.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules interpreter.ml > interpreter.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o interactive.cmi interactive.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print_sail.ml > pretty_print_sail.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules reporting.mli > reporting.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o reporting.cmi reporting.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules type_error.ml > type_error.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules error_format.ml > error_format.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o error_format.cmo error_format.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_sail.cmo pretty_print_sail.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o type_error.cmo type_error.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_lexer.cmo gdbmi_lexer.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o interpreter.cmo interpreter.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules initial_check.mli > initial_check.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -package omd -modules latex.ml > latex.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules process_file.mli > process_file.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules rewrites.mli > rewrites.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -package yojson -modules sail.ml > sail.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/c_backend.mli > jib/c_backend.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib.ml > jib.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml value2.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules value2.ml > value2.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_values.lem - + lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_values.lem - File "/home/opam/.opam/4.13.0+trunk/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 "gen_lib/sail2_values.lem", line 994, character 1 to line 994, character 79 - Warning: renaming 'while' to 'while0' for target ocaml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_values.ml > gen_lib/sail2_values.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_values.cmo gen_lib/sail2_values.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o value2.cmo value2.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_compile.mli > jib/jib_compile.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/anf.mli > jib/anf.mli.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib.cmo jib.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_util.ml > jib/jib_util.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/anf.cmi jib/anf.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_util.cmo jib/jib_util.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_compile.cmi jib/jib_compile.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -package yojson -modules jib/c_codegen.ml > jib/c_codegen.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules rewriter.mli > rewriter.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o rewriter.cmi rewriter.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constant_fold.ml > constant_fold.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o initial_check.cmi initial_check.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constant_propagation_mutrec.ml > constant_propagation_mutrec.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constant_propagation.mli > constant_propagation.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules spec_analysis.mli > spec_analysis.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_propagation.cmi constant_propagation.mli - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o spec_analysis.cmi spec_analysis.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constraint.mli > constraint.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_ir.ml > jib/jib_ir.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_interactive.mli > jib/jib_interactive.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_optimize.mli > jib/jib_optimize.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_interactive.cmi jib/jib_interactive.mli - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_optimize.cmi jib/jib_optimize.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_smt.mli > jib/jib_smt.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_ssa.mli > jib/jib_ssa.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules property.mli > property.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules smtlib.ml > smtlib.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules parser_combinators.ml > parser_combinators.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_operators_bitlists.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_operators_bitlists.ml > gen_lib/sail2_operators_bitlists.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_operators.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_operators.ml > gen_lib/sail2_operators.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_prompt.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_prompt.ml > gen_lib/sail2_prompt.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_prompt_monad.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_prompt_monad.ml > gen_lib/sail2_prompt_monad.ml.depends - lem -lib ../gen_lib -wl_pat_comp ign -wl_pat_exh ign -wl_pat_fail ign -wl_unused_vars ign -ocaml gen_lib/sail2_instr_kinds.lem - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gen_lib/sail2_instr_kinds.ml > gen_lib/sail2_instr_kinds.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_instr_kinds.cmo gen_lib/sail2_instr_kinds.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_prompt_monad.cmo gen_lib/sail2_prompt_monad.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_operators.cmo gen_lib/sail2_operators.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_prompt.cmo gen_lib/sail2_prompt.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parser_combinators.cmo parser_combinators.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_operators_bitlists.cmo gen_lib/sail2_operators_bitlists.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_ssa.cmi jib/jib_ssa.mli - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o property.cmi property.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o smtlib.cmo smtlib.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_smt_fuzz.ml > jib/jib_smt_fuzz.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_smt.cmi jib/jib_smt.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package omd -I jib -I gen_lib -o latex.cmo latex.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules manifest.ml > manifest.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules nl_flow.mli > nl_flow.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules ocaml_backend.ml > ocaml_backend.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o manifest.cmo manifest.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o rewrites.cmi rewrites.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print_coq.ml > pretty_print_coq.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print_common.ml > pretty_print_common.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules state.ml > state.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_common.cmo pretty_print_common.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o state.cmo state.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print_lem.ml > pretty_print_lem.ml.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o process_file.cmi process_file.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules profile.ml > profile.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules specialize.mli > specialize.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules splice.ml > splice.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules toFromInterp_backend.ml > toFromInterp_backend.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ocaml_backend.cmo ocaml_backend.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/c_backend.cmi jib/c_backend.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -I jib -I gen_lib -o jib/c_codegen.cmo jib/c_codegen.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_fold.cmo constant_fold.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_propagation_mutrec.cmo constant_propagation_mutrec.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o constraint.cmi constraint.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_ir.cmo jib/jib_ir.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_smt_fuzz.cmo jib/jib_smt_fuzz.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o nl_flow.cmi nl_flow.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_coq.cmo pretty_print_coq.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_lem.cmo pretty_print_lem.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o profile.cmo profile.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o specialize.cmi specialize.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o splice.cmo splice.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_backend.cmo toFromInterp_backend.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules slice.mli > slice.mli.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules graph.mli > graph.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o graph.cmi graph.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi.cmo gdbmi.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -I jib -I gen_lib -o sail.cmo sail.ml - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o slice.cmi slice.mli - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -package linenoise -I jib -I gen_lib -o isail.cmo isail.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules util.ml > util.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o util.cmx util.ml - + ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o util.cmx util.ml - File "util.ml", line 129, characters 21-39: - 129 | let l' = List.sort Pervasives.compare l in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "util.ml", line 337, characters 18-36: - 337 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "util.ml", line 343, characters 18-36: - 343 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o sail_lib.cmx sail_lib.ml - + ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o sail_lib.cmx sail_lib.ml - File "sail_lib.ml", line 694, characters 16-39: - 694 | let print str = Pervasives.print_string str - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "sail_lib.ml", line 696, characters 16-39: - 696 | let prerr str = Pervasives.prerr_string str - ^^^^^^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package linksem -I jib -I gen_lib -o elf_loader.cmx elf_loader.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parse_ast.cmx parse_ast.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o value.cmx value.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast.cmx ast.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules parser.ml > parser.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parser.cmx parser.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o lexer.cmx lexer.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules ast_util.ml > ast_util.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast_defs.cmx ast_defs.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules reporting.ml > reporting.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o error_format.cmx error_format.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o reporting.cmx reporting.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast_util.cmx ast_util.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules gdbmi_parser.ml > gdbmi_parser.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_types.cmx gdbmi_types.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_parser.cmx gdbmi_parser.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules interactive.ml > interactive.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules type_check.ml > type_check.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules bitfield.ml > bitfield.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o bitfield.cmo bitfield.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules initial_check.ml > initial_check.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o initial_check.cmx initial_check.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constraint.ml > constraint.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o profile.cmx profile.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules nl_flow.ml > nl_flow.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pattern_completeness.ml > pattern_completeness.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o bitfield.cmx bitfield.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constraint.cmx constraint.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o nl_flow.cmx nl_flow.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pattern_completeness.cmx pattern_completeness.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o type_check.cmx type_check.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o interactive.cmx interactive.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_sail.cmx pretty_print_sail.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o type_error.cmx type_error.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi_lexer.cmx gdbmi_lexer.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o interpreter.cmx interpreter.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules process_file.ml > process_file.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print.ml > pretty_print.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules pretty_print.mli > pretty_print.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print.cmi pretty_print.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules rewriter.ml > rewriter.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_common.cmx pretty_print_common.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o rewriter.cmx rewriter.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o state.cmx state.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_lem.cmx pretty_print_lem.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules rewrites.ml > rewrites.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules constant_propagation.ml > constant_propagation.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_fold.cmx constant_fold.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules spec_analysis.ml > spec_analysis.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules graph.ml > graph.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o graph.cmx graph.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o spec_analysis.cmx spec_analysis.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_propagation.cmx constant_propagation.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules monomorphise.ml > monomorphise.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules monomorphise.mli > monomorphise.mli.depends - ocamlfind ocamlc -c -g -package lem -package base64 -package pprint -I jib -I gen_lib -o monomorphise.cmi monomorphise.mli - ocamlfind ocamldep -package lem -package base64 -package pprint -modules optimize.ml > optimize.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o optimize.cmo optimize.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules property.ml > property.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parser_combinators.cmx parser_combinators.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_propagation_mutrec.cmx constant_propagation_mutrec.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o monomorphise.cmx monomorphise.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o optimize.cmx optimize.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o property.cmx property.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_values.cmx gen_lib/sail2_values.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules scattered.ml > scattered.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o scattered.cmo scattered.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o manifest.cmx manifest.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print.cmx pretty_print.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print_coq.cmx pretty_print_coq.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o rewrites.cmx rewrites.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o scattered.cmx scattered.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/c_backend.ml > jib/c_backend.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/anf.ml > jib/anf.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o value2.cmx value2.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib.cmx jib.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_util.cmx jib/jib_util.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_compile.ml > jib/jib_compile.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/anf.cmx jib/anf.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_interactive.ml > jib/jib_interactive.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_optimize.ml > jib/jib_optimize.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_compile.cmx jib/jib_compile.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_interactive.cmx jib/jib_interactive.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_optimize.cmx jib/jib_optimize.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_smt.ml > jib/jib_smt.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules jib/jib_ssa.ml > jib/jib_ssa.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_ir.cmx jib/jib_ir.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_instr_kinds.cmx gen_lib/sail2_instr_kinds.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_prompt_monad.cmx gen_lib/sail2_prompt_monad.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_operators.cmx gen_lib/sail2_operators.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_prompt.cmx gen_lib/sail2_prompt.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I gen_lib -I jib -o gen_lib/sail2_operators_bitlists.cmx gen_lib/sail2_operators_bitlists.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_ssa.cmx jib/jib_ssa.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o smtlib.cmx smtlib.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_smt.cmx jib/jib_smt.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package omd -I jib -I gen_lib -o latex.cmx latex.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o process_file.cmx process_file.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules specialize.ml > specialize.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ocaml_backend.cmx ocaml_backend.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/c_backend.cmx jib/c_backend.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -I jib -I gen_lib -o jib/c_codegen.cmx jib/c_codegen.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_smt_fuzz.cmx jib/jib_smt_fuzz.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o specialize.cmx specialize.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o splice.cmx splice.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_backend.cmx toFromInterp_backend.ml - ocamlfind ocamldep -package lem -package base64 -package pprint -modules slice.ml > slice.ml.depends - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o gdbmi.cmx gdbmi.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -I jib -I gen_lib -o sail.cmx sail.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o slice.cmx slice.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -package yojson -package linenoise -I jib -I gen_lib -o isail.cmx isail.ml - ocamlfind ocamlopt -linkpkg -g -package lem -package base64 -package pprint -package omd -package linksem -package yojson -package linenoise -package zarith -I gen_lib -I jib util.cmx sail_lib.cmx elf_loader.cmx parse_ast.cmx value.cmx ast.cmx parser.cmx lexer.cmx ast_defs.cmx error_format.cmx reporting.cmx ast_util.cmx initial_check.cmx bitfield.cmx profile.cmx constraint.cmx nl_flow.cmx pattern_completeness.cmx type_check.cmx interactive.cmx pretty_print_sail.cmx type_error.cmx interpreter.cmx rewriter.cmx constant_fold.cmx graph.cmx spec_analysis.cmx constant_propagation.cmx constant_propagation_mutrec.cmx gdbmi_types.cmx gdbmi_parser.cmx gdbmi_lexer.cmx gdbmi.cmx gen_lib/sail2_instr_kinds.cmx gen_lib/sail2_values.cmx gen_lib/sail2_operators.cmx gen_lib/sail2_prompt_monad.cmx gen_lib/sail2_prompt.cmx gen_lib/sail2_operators_bitlists.cmx value2.cmx jib.cmx jib/jib_util.cmx jib/anf.cmx jib/jib_compile.cmx jib/jib_interactive.cmx jib/jib_optimize.cmx jib/c_backend.cmx jib/c_codegen.cmx jib/jib_ir.cmx jib/jib_ssa.cmx parser_combinators.cmx property.cmx smtlib.cmx jib/jib_smt.cmx jib/jib_smt_fuzz.cmx latex.cmx manifest.cmx pretty_print_common.cmx state.cmx pretty_print_lem.cmx monomorphise.cmx optimize.cmx rewrites.cmx ocaml_backend.cmx pretty_print.cmx pretty_print_coq.cmx scattered.cmx process_file.cmx specialize.cmx splice.cmx toFromInterp_backend.cmx sail.cmx slice.cmx isail.cmx -o isail.native - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o util.cmo util.ml - + ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o util.cmo util.ml - File "util.ml", line 129, characters 21-39: - 129 | let l' = List.sort Pervasives.compare l in - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "util.ml", line 337, characters 18-36: - 337 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - File "util.ml", line 343, characters 18-36: - 343 | let compare = Pervasives.compare - ^^^^^^^^^^^^^^^^^^ - Alert deprecated: module Stdlib.Pervasives - Use Stdlib instead. - - If you need to stay compatible with OCaml < 4.07, you can use the - stdlib-shims library: https://github.com/ocaml/stdlib-shims - ocamlfind ocamlc -a util.cmo sail_lib.cmo -o sail_lib.cma - ocamlfind ocamlopt -a util.cmx sail_lib.cmx -o sail_lib.cmxa - ocamlfind ocamldep -package lem -package base64 -package pprint -modules toFromInterp_lib_mword.ml > toFromInterp_lib_mword.ml.depends - ocamlfind ocamldep -package lem -package base64 -package pprint -modules toFromInterp_lib_bitlist.ml > toFromInterp_lib_bitlist.ml.depends - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/anf.cmo jib/anf.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o ast_util.cmo ast_util.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/c_backend.cmo jib/c_backend.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constant_propagation.cmo constant_propagation.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o constraint.cmo constraint.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o graph.cmo graph.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o initial_check.cmo initial_check.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o interactive.cmo interactive.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_compile.cmo jib/jib_compile.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_optimize.cmo jib/jib_optimize.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_ssa.cmo jib/jib_ssa.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_smt.cmo jib/jib_smt.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o jib/jib_interactive.cmo jib/jib_interactive.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o monomorphise.cmo monomorphise.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o nl_flow.cmo nl_flow.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o parser.cmo parser.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pattern_completeness.cmo pattern_completeness.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o pretty_print.cmo pretty_print.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o process_file.cmo process_file.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o property.cmo property.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o reporting.cmo reporting.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o rewriter.cmo rewriter.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o rewrites.cmo rewrites.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o spec_analysis.cmo spec_analysis.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o specialize.cmo specialize.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o slice.cmo slice.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_lib_mword.cmo toFromInterp_lib_mword.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_lib_bitlist.cmo toFromInterp_lib_bitlist.ml - ocamlfind ocamlc -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o type_check.cmo type_check.ml - ocamlfind ocamlc -a -I gen_lib -I jib parse_ast.cmo util.cmo sail_lib.cmo elf_loader.cmo value.cmo ast.cmo parser.cmo lexer.cmo ast_defs.cmo error_format.cmo reporting.cmo ast_util.cmo gen_lib/sail2_values.cmo jib.cmo jib/jib_util.cmo initial_check.cmo bitfield.cmo profile.cmo constraint.cmo nl_flow.cmo pattern_completeness.cmo type_check.cmo jib/anf.cmo graph.cmo interactive.cmo pretty_print_sail.cmo type_error.cmo jib/jib_compile.cmo jib/jib_interactive.cmo jib/jib_optimize.cmo rewriter.cmo spec_analysis.cmo jib/c_backend.cmo interpreter.cmo constant_fold.cmo constant_propagation.cmo constant_propagation_mutrec.cmo jib/jib_ir.cmo jib/jib_ssa.cmo parser_combinators.cmo property.cmo smtlib.cmo jib/jib_smt.cmo latex.cmo manifest.cmo pretty_print_common.cmo state.cmo pretty_print_lem.cmo monomorphise.cmo optimize.cmo rewrites.cmo ocaml_backend.cmo pretty_print.cmo pretty_print_coq.cmo scattered.cmo process_file.cmo specialize.cmo splice.cmo slice.cmo toFromInterp_backend.cmo toFromInterp_lib_mword.cmo toFromInterp_lib_bitlist.cmo -o libsail.cma - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_lib_mword.cmx toFromInterp_lib_mword.ml - ocamlfind ocamlopt -c -g -annot -bin-annot -w y -package lem -package base64 -package pprint -I jib -I gen_lib -o toFromInterp_lib_bitlist.cmx toFromInterp_lib_bitlist.ml - ocamlfind ocamlopt -a -I gen_lib -I jib util.cmx sail_lib.cmx elf_loader.cmx parse_ast.cmx value.cmx ast.cmx parser.cmx lexer.cmx ast_defs.cmx error_format.cmx reporting.cmx ast_util.cmx initial_check.cmx bitfield.cmx profile.cmx constraint.cmx gen_lib/sail2_values.cmx jib.cmx jib/jib_util.cmx nl_flow.cmx pattern_completeness.cmx type_check.cmx jib/anf.cmx graph.cmx interactive.cmx pretty_print_sail.cmx type_error.cmx jib/jib_compile.cmx jib/jib_interactive.cmx jib/jib_optimize.cmx rewriter.cmx spec_analysis.cmx jib/c_backend.cmx interpreter.cmx constant_fold.cmx constant_propagation.cmx constant_propagation_mutrec.cmx jib/jib_ir.cmx jib/jib_ssa.cmx parser_combinators.cmx property.cmx smtlib.cmx jib/jib_smt.cmx latex.cmx manifest.cmx pretty_print_common.cmx state.cmx pretty_print_lem.cmx monomorphise.cmx optimize.cmx rewrites.cmx ocaml_backend.cmx pretty_print.cmx pretty_print_coq.cmx scattered.cmx process_file.cmx specialize.cmx splice.cmx slice.cmx toFromInterp_backend.cmx toFromInterp_lib_mword.cmx toFromInterp_lib_bitlist.cmx -o libsail.cmxa - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/src' - ln -f -s src/isail.native sail -> compiled sail.0.14 Processing 78/78: [sail: make install] + /home/opam/.opam/opam-init/hooks/sandbox.sh "install" "make" "INSTALL_DIR=/home/opam/.opam/4.13.0+trunk" "SHARE_DIR=/home/opam/.opam/4.13.0+trunk/share/sail" "install" (CWD=/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14) - if [ -z "/home/opam/.opam/4.13.0+trunk/share/sail" ]; then echo SHARE_DIR is unset; false; fi - mkdir -p /home/opam/.opam/4.13.0+trunk/bin - cp src/isail.native /home/opam/.opam/4.13.0+trunk/bin/sail - mkdir -p /home/opam/.opam/4.13.0+trunk/share/sail - make -C lib/isabelle all - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/lib/isabelle' - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_instr_kinds.lem - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_values.lem - File "../../src/gen_lib/sail2_values.lem", line 482, character 3 to line 500, character 5 - Warning: pattern compilation used for target isabelle - File "../../src/gen_lib/sail2_values.lem", line 482, character 3 to line 500, character 5 - Warning: pattern compilation used for target isabelle - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/num.lem", line 2137, character 1 to line 2137, character 43 - Warning: compile message for constant 'Num.naturalFromInteger' and target 'isabelle' - 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. - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_operators.lem - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_prompt_monad.lem - File "../../src/gen_lib/sail2_prompt_monad.lem", line 174, character 1 to line 181, character 11 - Warning: unused variable: 'addr_sz' - File "../../src/gen_lib/sail2_prompt_monad.lem", line 189, character 1 to line 192, character 60 - Warning: unused variable: 'addr_size' - File "../../src/gen_lib/sail2_prompt_monad.lem", line 196, character 1 to line 201, character 5 - Warning: unused variable: 'addr_size' - File "../../src/gen_lib/sail2_prompt_monad.lem", line 82, character 1 to line 82, character 52 - Warning: renaming 'exit' to 'exit0' for target isabelle - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_prompt.lem - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_operators_mwords.lem - File "../../src/gen_lib/sail2_operators_mwords.lem", line 325, character 1 to line 326, character 53 - Warning: unused variable: 'out_len' - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_operators_bitlists.lem - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 303, character 1 to line 304, character 53 - Warning: unused variable: 'out_len' - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_state_monad.lem - File "../../src/gen_lib/sail2_state_monad.lem", line 151, character 1 to line 153, character 16 - Warning: unused variable: 'addr_size' - File "../../src/gen_lib/sail2_state_monad.lem", line 191, character 1 to line 191, character 67 - Warning: unused variable: 'addr_size' - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_state.lem - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_state_lifting.lem - lem -isa -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_string.lem - File "../../src/gen_lib/sail2_string.lem", line 45, character 3 to line 53, character 5 - Warning: pattern compilation used for target isabelle - File "../../src/gen_lib/sail2_string.lem", line 45, character 3 to line 53, character 5 - Warning: pattern compilation used for target isabelle - File "../../src/gen_lib/sail2_string.lem", line 62, character 7 to line 65, character 9 - Warning: pattern compilation used for target isabelle - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/lib/isabelle' - make -C lib/hol all-scripts - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/lib/hol' - lem -hol -outdir . -auxiliary_level none -lib ../../src/lem_interp -lib ../../src/gen_lib ../../src/gen_lib/sail2_instr_kinds.lem ../../src/gen_lib/sail2_values.lem ../../src/gen_lib/sail2_operators.lem ../../src/gen_lib/sail2_operators_mwords.lem ../../src/gen_lib/sail2_operators_bitlists.lem ../../src/gen_lib/sail2_state_monad.lem ../../src/gen_lib/sail2_state.lem ../../src/gen_lib/sail2_string.lem sail2_prompt_monad.lem sail2_prompt.lem - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 303, character 1 to line 304, character 53 - Warning: unused variable: 'out_len' - File "../../src/gen_lib/sail2_operators_mwords.lem", line 325, character 1 to line 326, character 53 - Warning: unused variable: 'out_len' - File "sail2_prompt.lem", line 13, character 1 to line 13, character 37 - Warning: unused variable: 'msg' - File "sail2_prompt_monad.lem", line 25, character 1 to line 25, character 44 - Warning: unused variable: 'msg' - File "sail2_prompt_monad.lem", line 47, character 1 to line 47, character 55 - Warning: unused variables: 'wk', 'addrsize', 'addr', 'sz' - File "../../src/gen_lib/sail2_state_monad.lem", line 151, character 1 to line 153, character 16 - Warning: unused variable: 'addr_size' - File "../../src/gen_lib/sail2_state_monad.lem", line 191, character 1 to line 191, character 67 - Warning: unused variable: 'addr_size' - File "../../src/gen_lib/sail2_values.lem", line 482, character 3 to line 500, character 5 - Warning: pattern compilation used for target hol - File "/home/opam/.opam/4.13.0+trunk/share/lem/library/num.lem", line 2137, character 1 to line 2137, character 43 - Warning: compile message for constant 'Num.naturalFromInteger' and target 'hol' - 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 "../../src/gen_lib/sail2_values.lem", line 12, character 1 to line 12, character 39 - Warning: renaming 'pow' to 'pow0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 10, character 1 to line 10, character 43 - Warning: renaming 'uint_maybe' to 'uint_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 12, character 5 to line 12, character 13 - Warning: renaming 'uint_fail' to 'uint_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 13, character 5 to line 13, character 15 - Warning: renaming 'uint_nondet' to 'uint_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 18, character 1 to line 18, character 43 - Warning: renaming 'sint_maybe' to 'sint_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 20, character 5 to line 20, character 13 - Warning: renaming 'sint_fail' to 'sint_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 21, character 5 to line 21, character 15 - Warning: renaming 'sint_nondet' to 'sint_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 26, character 1 to line 26, character 48 - Warning: renaming 'extz_vec' to 'extz_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 29, character 1 to line 29, character 48 - Warning: renaming 'exts_vec' to 'exts_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 32, character 1 to line 32, character 51 - Warning: renaming 'zero_extend' to 'zero_extend0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 35, character 1 to line 35, character 51 - Warning: renaming 'sign_extend' to 'sign_extend0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 38, character 1 to line 38, character 32 - Warning: renaming 'zeros' to 'zeros0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 44, character 1 to line 44, character 55 - Warning: renaming 'vector_truncate' to 'vector_truncate0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 47, character 1 to line 47, character 58 - Warning: renaming 'vector_truncateLSB' to 'vector_truncateLSB0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 61, character 1 to line 61, character 49 - Warning: renaming 'access_vec_inc' to 'access_vec_inc0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 64, character 1 to line 64, character 49 - Warning: renaming 'access_vec_dec' to 'access_vec_dec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 67, character 1 to line 67, character 62 - Warning: renaming 'update_vec_inc' to 'update_vec_inc0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 69, character 5 to line 69, character 24 - Warning: renaming 'update_vec_inc_maybe' to 'update_vec_inc_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 70, character 5 to line 70, character 23 - Warning: renaming 'update_vec_inc_fail' to 'update_vec_inc_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 71, character 5 to line 71, character 25 - Warning: renaming 'update_vec_inc_nondet' to 'update_vec_inc_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 73, character 1 to line 73, character 62 - Warning: renaming 'update_vec_dec' to 'update_vec_dec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 75, character 5 to line 75, character 24 - Warning: renaming 'update_vec_dec_maybe' to 'update_vec_dec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 76, character 5 to line 76, character 23 - Warning: renaming 'update_vec_dec_fail' to 'update_vec_dec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 77, character 5 to line 77, character 25 - Warning: renaming 'update_vec_dec_nondet' to 'update_vec_dec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 79, character 1 to line 79, character 67 - Warning: renaming 'subrange_vec_inc' to 'subrange_vec_inc0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 82, character 1 to line 82, character 67 - Warning: renaming 'subrange_vec_dec' to 'subrange_vec_dec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 85, character 1 to line 85, character 87 - Warning: renaming 'update_subrange_vec_inc' to 'update_subrange_vec_inc0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 88, character 1 to line 88, character 87 - Warning: renaming 'update_subrange_vec_dec' to 'update_subrange_vec_dec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 91, character 1 to line 91, character 52 - Warning: renaming 'concat_vec' to 'concat_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 94, character 1 to line 94, character 45 - Warning: renaming 'cons_vec' to 'cons_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 96, character 5 to line 96, character 18 - Warning: renaming 'cons_vec_maybe' to 'cons_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 97, character 5 to line 97, character 17 - Warning: renaming 'cons_vec_fail' to 'cons_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 98, character 5 to line 98, character 19 - Warning: renaming 'cons_vec_nondet' to 'cons_vec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 100, character 1 to line 100, character 37 - Warning: renaming 'cast_unit_vec' to 'cast_unit_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 102, character 5 to line 102, character 23 - Warning: renaming 'cast_unit_vec_maybe' to 'cast_unit_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 103, character 5 to line 103, character 22 - Warning: renaming 'cast_unit_vec_fail' to 'cast_unit_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 104, character 5 to line 104, character 24 - Warning: renaming 'cast_unit_vec_nondet' to 'cast_unit_vec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 106, character 1 to line 106, character 45 - Warning: renaming 'vec_of_bit' to 'vec_of_bit0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 108, character 5 to line 108, character 20 - Warning: renaming 'vec_of_bit_maybe' to 'vec_of_bit_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 109, character 5 to line 109, character 19 - Warning: renaming 'vec_of_bit_fail' to 'vec_of_bit_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 110, character 5 to line 110, character 21 - Warning: renaming 'vec_of_bit_nondet' to 'vec_of_bit_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 112, character 1 to line 112, character 27 - Warning: renaming 'msb' to 'msb0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 115, character 1 to line 115, character 57 - Warning: renaming 'int_of_vec_maybe' to 'int_of_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 117, character 5 to line 117, character 19 - Warning: renaming 'int_of_vec_fail' to 'int_of_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 119, character 5 to line 119, character 14 - Warning: renaming 'int_of_vec' to 'int_of_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 121, character 1 to line 121, character 40 - Warning: renaming 'string_of_bits' to 'string_of_bits0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 124, character 1 to line 124, character 48 - Warning: renaming 'decimal_string_of_bits' to 'decimal_string_of_bits0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 127, character 1 to line 127, character 49 - Warning: renaming 'and_vec' to 'and_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 128, character 1 to line 128, character 49 - Warning: renaming 'or_vec' to 'or_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 129, character 1 to line 129, character 49 - Warning: renaming 'xor_vec' to 'xor_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 130, character 1 to line 130, character 36 - Warning: renaming 'not_vec' to 'not_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 144, character 1 to line 144, character 51 - Warning: renaming 'add_vec' to 'add_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 145, character 1 to line 145, character 51 - Warning: renaming 'adds_vec' to 'adds_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 146, character 1 to line 146, character 51 - Warning: renaming 'sub_vec' to 'sub_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 147, character 1 to line 147, character 51 - Warning: renaming 'subs_vec' to 'subs_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 148, character 1 to line 148, character 51 - Warning: renaming 'mult_vec' to 'mult_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 149, character 1 to line 149, character 51 - Warning: renaming 'mults_vec' to 'mults_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 157, character 1 to line 157, character 57 - Warning: renaming 'add_vec_int' to 'add_vec_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 158, character 1 to line 158, character 57 - Warning: renaming 'sub_vec_int' to 'sub_vec_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 159, character 1 to line 159, character 57 - Warning: renaming 'mult_vec_int' to 'mult_vec_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 164, character 1 to line 164, character 57 - Warning: renaming 'add_int_vec' to 'add_int_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 165, character 1 to line 165, character 57 - Warning: renaming 'sub_int_vec' to 'sub_int_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 166, character 1 to line 166, character 57 - Warning: renaming 'mult_int_vec' to 'mult_int_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 176, character 5 to line 176, character 16 - Warning: renaming 'add_vec_bool' to 'add_vec_bool0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 177, character 5 to line 177, character 21 - Warning: renaming 'add_vec_bit_maybe' to 'add_vec_bit_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 178, character 5 to line 178, character 20 - Warning: renaming 'add_vec_bit_fail' to 'add_vec_bit_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 179, character 5 to line 179, character 22 - Warning: renaming 'add_vec_bit_nondet' to 'add_vec_bit_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 171, character 1 to line 171, character 53 - Warning: renaming 'add_vec_bit' to 'add_vec_bit0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 182, character 5 to line 182, character 17 - Warning: renaming 'adds_vec_bool' to 'adds_vec_bool0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 183, character 5 to line 183, character 22 - Warning: renaming 'adds_vec_bit_maybe' to 'adds_vec_bit_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 184, character 5 to line 184, character 21 - Warning: renaming 'adds_vec_bit_fail' to 'adds_vec_bit_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 185, character 5 to line 185, character 23 - Warning: renaming 'adds_vec_bit_nondet' to 'adds_vec_bit_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 172, character 1 to line 172, character 53 - Warning: renaming 'adds_vec_bit' to 'adds_vec_bit0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 188, character 5 to line 188, character 16 - Warning: renaming 'sub_vec_bool' to 'sub_vec_bool0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 189, character 5 to line 189, character 21 - Warning: renaming 'sub_vec_bit_maybe' to 'sub_vec_bit_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 190, character 5 to line 190, character 20 - Warning: renaming 'sub_vec_bit_fail' to 'sub_vec_bit_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 191, character 5 to line 191, character 22 - Warning: renaming 'sub_vec_bit_nondet' to 'sub_vec_bit_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 173, character 1 to line 173, character 53 - Warning: renaming 'sub_vec_bit' to 'sub_vec_bit0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 194, character 5 to line 194, character 17 - Warning: renaming 'subs_vec_bool' to 'subs_vec_bool0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 195, character 5 to line 195, character 22 - Warning: renaming 'subs_vec_bit_maybe' to 'subs_vec_bit_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 196, character 5 to line 196, character 21 - Warning: renaming 'subs_vec_bit_fail' to 'subs_vec_bit_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 197, character 5 to line 197, character 23 - Warning: renaming 'subs_vec_bit_nondet' to 'subs_vec_bit_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 174, character 1 to line 174, character 53 - Warning: renaming 'subs_vec_bit' to 'subs_vec_bit0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 222, character 1 to line 222, character 52 - Warning: renaming 'shiftl' to 'shiftl0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 223, character 1 to line 223, character 52 - Warning: renaming 'shiftr' to 'shiftr0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 224, character 1 to line 224, character 52 - Warning: renaming 'arith_shiftr' to 'arith_shiftr0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 225, character 1 to line 225, character 52 - Warning: renaming 'rotl' to 'rotl0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 226, character 1 to line 226, character 52 - Warning: renaming 'rotr' to 'rotr0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 233, character 1 to line 233, character 56 - Warning: renaming 'mod_vec' to 'mod_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 234, character 1 to line 234, character 64 - Warning: renaming 'mod_vec_maybe' to 'mod_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 235, character 1 to line 235, character 86 - Warning: renaming 'mod_vec_fail' to 'mod_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 236, character 1 to line 236, character 86 - Warning: renaming 'mod_vec_nondet' to 'mod_vec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 242, character 1 to line 242, character 57 - Warning: renaming 'quot_vec' to 'quot_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 243, character 1 to line 243, character 65 - Warning: renaming 'quot_vec_maybe' to 'quot_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 244, character 1 to line 244, character 87 - Warning: renaming 'quot_vec_fail' to 'quot_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 245, character 1 to line 245, character 87 - Warning: renaming 'quot_vec_nondet' to 'quot_vec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 251, character 1 to line 251, character 58 - Warning: renaming 'quots_vec' to 'quots_vec0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 252, character 1 to line 252, character 66 - Warning: renaming 'quots_vec_maybe' to 'quots_vec_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 253, character 1 to line 253, character 88 - Warning: renaming 'quots_vec_fail' to 'quots_vec_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 254, character 1 to line 254, character 88 - Warning: renaming 'quots_vec_nondet' to 'quots_vec_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 260, character 1 to line 260, character 58 - Warning: renaming 'mod_vec_int' to 'mod_vec_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 261, character 1 to line 261, character 66 - Warning: renaming 'mod_vec_int_maybe' to 'mod_vec_int_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 262, character 1 to line 262, character 88 - Warning: renaming 'mod_vec_int_fail' to 'mod_vec_int_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 263, character 1 to line 263, character 88 - Warning: renaming 'mod_vec_int_nondet' to 'mod_vec_int_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 269, character 1 to line 269, character 59 - Warning: renaming 'quot_vec_int' to 'quot_vec_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 270, character 1 to line 270, character 67 - Warning: renaming 'quot_vec_int_maybe' to 'quot_vec_int_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 271, character 1 to line 271, character 89 - Warning: renaming 'quot_vec_int_fail' to 'quot_vec_int_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 272, character 1 to line 272, character 89 - Warning: renaming 'quot_vec_int_nondet' to 'quot_vec_int_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 278, character 1 to line 278, character 54 - Warning: renaming 'replicate_bits' to 'replicate_bits0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 281, character 1 to line 281, character 44 - Warning: renaming 'duplicate' to 'duplicate0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 283, character 5 to line 283, character 19 - Warning: renaming 'duplicate_maybe' to 'duplicate_maybe0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 284, character 5 to line 284, character 18 - Warning: renaming 'duplicate_fail' to 'duplicate_fail0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 285, character 5 to line 285, character 20 - Warning: renaming 'duplicate_nondet' to 'duplicate_nondet0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 289, character 1 to line 289, character 47 - Warning: renaming 'reverse_endianness' to 'reverse_endianness0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 292, character 1 to line 292, character 62 - Warning: renaming 'get_slice_int' to 'get_slice_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 295, character 1 to line 295, character 73 - Warning: renaming 'set_slice_int' to 'set_slice_int0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 298, character 1 to line 298, character 56 - Warning: renaming 'slice' to 'slice0' for target hol - File "../../src/gen_lib/sail2_operators_bitlists.lem", line 302, character 1 to line 302, character 84 - Warning: renaming 'set_slice' to 'set_slice0' for target hol - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14/lib/hol' - cp -r lib /home/opam/.opam/4.13.0+trunk/share/sail - mkdir -p /home/opam/.opam/4.13.0+trunk/share/sail/src - cp src/elf_loader.ml /home/opam/.opam/4.13.0+trunk/share/sail/src - cp src/sail_lib.ml /home/opam/.opam/4.13.0+trunk/share/sail/src - cp src/util.ml /home/opam/.opam/4.13.0+trunk/share/sail/src - cp -r src/gen_lib /home/opam/.opam/4.13.0+trunk/share/sail/src - cp -r src/lem_interp /home/opam/.opam/4.13.0+trunk/share/sail/src - make install_libsail - make[1]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14' - make uninstall_libsail - make[2]: Entering directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14' - ocamlfind remove sail - ocamlfind: [WARNING] No such file: /home/opam/.opam/4.13.0+trunk/lib/sail/META - make[2]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14' - ocamlfind install sail src/META src/_build/libsail.* $(find src/_build \( -name '*.mli' -or -name '*.cmi' -or -name '*.cmx' \) -and -not -name 'myocamlbuild.*') - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_lib_bitlist.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_lib_bitlist.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_lib_mword.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_lib_mword.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/isail.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/isail.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/slice.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_backend.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/toFromInterp_backend.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/splice.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/splice.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/specialize.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ocaml_backend.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ocaml_backend.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/process_file.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/latex.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/latex.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/smtlib.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/smtlib.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/value2.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/value2.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/scattered.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/scattered.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewrites.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_coq.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_coq.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/manifest.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/manifest.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/property.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/optimize.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/optimize.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/monomorphise.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_propagation_mutrec.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_propagation_mutrec.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parser_combinators.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parser_combinators.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/monomorphise.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/monomorphise.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_propagation.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/spec_analysis.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/graph.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_fold.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_fold.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_lem.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_lem.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/state.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/state.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewriter.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_common.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_common.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/interpreter.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/interpreter.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_lexer.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_lexer.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/type_error.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/type_error.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_sail.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pretty_print_sail.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/interactive.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/type_check.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pattern_completeness.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/nl_flow.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constraint.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/bitfield.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/bitfield.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/profile.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/profile.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/initial_check.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_parser.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_types.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_types.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast_util.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/reporting.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/error_format.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/error_format.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast_defs.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast_defs.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/lexer.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/lexer.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parser.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/value.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/value.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parse_ast.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parse_ast.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/elf_loader.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/elf_loader.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail_lib.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail_lib.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/util.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/slice.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/graph.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/graph.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/slice.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/specialize.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/nl_flow.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constraint.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/specialize.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/process_file.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewrites.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/nl_flow.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/property.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/property.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constraint.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/spec_analysis.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_propagation.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/spec_analysis.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/constant_propagation.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/initial_check.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewriter.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewriter.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_operators_bitlists.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_operators_bitlists.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_prompt.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_prompt.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_operators.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_operators.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_prompt_monad.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_prompt_monad.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_instr_kinds.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_instr_kinds.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_values.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/sail2_values.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_smt_fuzz.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_smt_fuzz.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/c_codegen.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/c_codegen.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/c_backend.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_smt.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_ssa.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_ir.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_ir.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_optimize.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_interactive.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_compile.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/anf.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_util.cmx - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_util.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/c_backend.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_smt.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_ssa.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_ssa.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_smt.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_optimize.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_interactive.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_optimize.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_interactive.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_compile.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/anf.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/anf.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/jib_compile.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/c_backend.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/rewrites.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/process_file.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/initial_check.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/reporting.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/reporting.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/interactive.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/type_check.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pattern_completeness.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/pattern_completeness.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/type_check.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/interactive.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_parser.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/gdbmi_parser.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast_util.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/ast_util.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parser.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/parser.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/util.cmi - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/util.mli - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/libsail.mllib - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/libsail.cmxa - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/libsail.cma - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/libsail.a - Installed /home/opam/.opam/4.13.0+trunk/lib/sail/META - make[1]: Leaving directory '/home/opam/.opam/4.13.0+trunk/.opam-switch/build/sail.0.14' -> installed sail.0.14 Done. # Run eval $(opam env) to update the current shell environment 2021-09-04 13:30.05 ---> saved as "b89f73a13148b00aff66cbef0fd7ce329b0a68ebd6f61528d755e5083976fa62" Job succeeded