Diff of the two buildlogs: -- --- b1/build.log 2024-05-28 17:56:16.224905167 +0000 +++ b2/build.log 2024-05-28 18:01:31.475512175 +0000 @@ -1,6 +1,6 @@ I: pbuilder: network access will be disabled during build -I: Current time: Mon Jun 30 12:17:58 -12 2025 -I: pbuilder-time-stamp: 1751329078 +I: Current time: Wed May 29 07:56:19 +14 2024 +I: pbuilder-time-stamp: 1716918979 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/unstable-reproducible-base.tgz] I: copying local configuration @@ -29,52 +29,84 @@ dpkg-source: info: applying 0002-Fix-compilation-with-OCaml-4.08.0.patch I: Not using root during the build. I: Installing the build-deps -I: user script /srv/workspace/pbuilder/2542098/tmp/hooks/D02_print_environment starting +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/D01_modify_environment starting +debug: Running on ionos11-amd64. +I: Changing host+domainname to test build reproducibility +I: Adding a custom variable just for the fun of it... +I: Changing /bin/sh to bash +'/bin/sh' -> '/bin/bash' +lrwxrwxrwx 1 root root 9 May 28 17:56 /bin/sh -> /bin/bash +I: Setting pbuilder2's login shell to /bin/bash +I: Setting pbuilder2's GECOS to second user,second room,second work-phone,second home-phone,second other +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/D01_modify_environment finished +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/D02_print_environment starting I: set - BUILDDIR='/build/reproducible-path' - BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' - BUILDUSERNAME='pbuilder1' - BUILD_ARCH='amd64' - DEBIAN_FRONTEND='noninteractive' - DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=42 ' - DISTRIBUTION='unstable' - HOME='/root' - HOST_ARCH='amd64' + BASH=/bin/sh + BASHOPTS=checkwinsize:cmdhist:complete_fullquote:extquote:force_fignore:globasciiranges:globskipdots:hostcomplete:interactive_comments:patsub_replacement:progcomp:promptvars:sourcepath + BASH_ALIASES=() + BASH_ARGC=() + BASH_ARGV=() + BASH_CMDS=() + BASH_LINENO=([0]="12" [1]="0") + BASH_LOADABLES_PATH=/usr/local/lib/bash:/usr/lib/bash:/opt/local/lib/bash:/usr/pkg/lib/bash:/opt/pkg/lib/bash:. + BASH_SOURCE=([0]="/tmp/hooks/D02_print_environment" [1]="/tmp/hooks/D02_print_environment") + BASH_VERSINFO=([0]="5" [1]="2" [2]="21" [3]="1" [4]="release" [5]="x86_64-pc-linux-gnu") + BASH_VERSION='5.2.21(1)-release' + BUILDDIR=/build/reproducible-path + BUILDUSERGECOS='second user,second room,second work-phone,second home-phone,second other' + BUILDUSERNAME=pbuilder2 + BUILD_ARCH=amd64 + DEBIAN_FRONTEND=noninteractive + DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=20 ' + DIRSTACK=() + DISTRIBUTION=unstable + EUID=0 + FUNCNAME=([0]="Echo" [1]="main") + GROUPS=() + HOME=/root + HOSTNAME=i-capture-the-hostname + HOSTTYPE=x86_64 + HOST_ARCH=amd64 IFS=' ' - INVOCATION_ID='948d4b5a281a45008414a1e117aee519' - LANG='C' - LANGUAGE='en_US:en' - LC_ALL='C' - MAIL='/var/mail/root' - OPTIND='1' - PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' - PBCURRENTCOMMANDLINEOPERATION='build' - PBUILDER_OPERATION='build' - PBUILDER_PKGDATADIR='/usr/share/pbuilder' - PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' - PBUILDER_SYSCONFDIR='/etc' - PPID='2542098' - PS1='# ' - PS2='> ' + INVOCATION_ID=da7f3df3b5ba485e877990e49e11b571 + LANG=C + LANGUAGE=et_EE:et + LC_ALL=C + MACHTYPE=x86_64-pc-linux-gnu + MAIL=/var/mail/root + OPTERR=1 + OPTIND=1 + OSTYPE=linux-gnu + PATH=/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path + PBCURRENTCOMMANDLINEOPERATION=build + PBUILDER_OPERATION=build + PBUILDER_PKGDATADIR=/usr/share/pbuilder + PBUILDER_PKGLIBDIR=/usr/lib/pbuilder + PBUILDER_SYSCONFDIR=/etc + PIPESTATUS=([0]="0") + POSIXLY_CORRECT=y + PPID=2258299 PS4='+ ' - PWD='/' - SHELL='/bin/bash' - SHLVL='2' - SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.Fse8XjIE/pbuilderrc_2vIm --distribution unstable --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/unstable-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.Fse8XjIE/b1 --logfile b1/build.log ocamlsdl_0.9.1-4.dsc' - SUDO_GID='110' - SUDO_UID='105' - SUDO_USER='jenkins' - TERM='unknown' - TZ='/usr/share/zoneinfo/Etc/GMT+12' - USER='root' - _='/usr/bin/systemd-run' - http_proxy='http://213.165.73.152:3128' + PWD=/ + SHELL=/bin/bash + SHELLOPTS=braceexpand:errexit:hashall:interactive-comments:posix + SHLVL=3 + SUDO_COMMAND='/usr/bin/timeout -k 24.1h 24h /usr/bin/ionice -c 3 /usr/bin/nice -n 11 /usr/bin/unshare --uts -- /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.Fse8XjIE/pbuilderrc_1rDW --distribution unstable --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/unstable-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.Fse8XjIE/b2 --logfile b2/build.log ocamlsdl_0.9.1-4.dsc' + SUDO_GID=111 + SUDO_UID=106 + SUDO_USER=jenkins + TERM=unknown + TZ=/usr/share/zoneinfo/Etc/GMT-14 + UID=0 + USER=root + _='I: set' + http_proxy=http://46.16.76.132:3128 I: uname -a - Linux ionos5-amd64 6.7.12+bpo-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.7.12-1~bpo12+1 (2024-05-06) x86_64 GNU/Linux + Linux i-capture-the-hostname 6.1.0-21-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.90-1 (2024-05-03) x86_64 GNU/Linux I: ls -l /bin - lrwxrwxrwx 1 root root 7 Jun 29 14:05 /bin -> usr/bin -I: user script /srv/workspace/pbuilder/2542098/tmp/hooks/D02_print_environment finished + lrwxrwxrwx 1 root root 7 May 27 07:42 /bin -> usr/bin +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy @@ -483,7 +515,7 @@ Get: 288 http://deb.debian.org/debian unstable/main amd64 libsdl-mixer1.2-dev amd64 1.2.12-18 [97.3 kB] Get: 289 http://deb.debian.org/debian unstable/main amd64 libsdl-ttf2.0-0 amd64 2.0.11-6+b1 [18.8 kB] Get: 290 http://deb.debian.org/debian unstable/main amd64 libsdl-ttf2.0-dev amd64 2.0.11-6+b1 [27.9 kB] -Fetched 240 MB in 9s (26.6 MB/s) +Fetched 240 MB in 10s (23.8 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package libpython3.11-minimal: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 ... 19717 files and directories currently installed.) @@ -1407,8 +1439,8 @@ Setting up tzdata (2024a-4) ... Current default time zone: 'Etc/UTC' -Local time is now: Tue Jul 1 00:18:57 UTC 2025. -Universal Time is now: Tue Jul 1 00:18:57 UTC 2025. +Local time is now: Tue May 28 18:00:48 UTC 2024. +Universal Time is now: Tue May 28 18:00:48 UTC 2024. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up libsysprof-capture-4-dev:amd64 (46.0-1) ... @@ -1676,7 +1708,11 @@ Building tag database... -> Finished parsing the build-deps I: Building the package -I: Running cd /build/reproducible-path/ocamlsdl-0.9.1/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../ocamlsdl_0.9.1-4_source.changes +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/A99_set_merged_usr starting +Not re-configuring usrmerge for unstable +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/A99_set_merged_usr finished +hostname: Name or service not known +I: Running cd /build/reproducible-path/ocamlsdl-0.9.1/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-genchanges -S > ../ocamlsdl_0.9.1-4_source.changes dpkg-buildpackage: info: source package ocamlsdl dpkg-buildpackage: info: source version 0.9.1-4 dpkg-buildpackage: info: source distribution unstable @@ -1790,7 +1826,7 @@ Configure finished, type 'make' to build. make[1]: Leaving directory '/build/reproducible-path/ocamlsdl-0.9.1' dh_auto_build - make -j42 + make -j20 make[1]: Entering directory '/build/reproducible-path/ocamlsdl-0.9.1' make -C src all make[2]: Entering directory '/build/reproducible-path/ocamlsdl-0.9.1/src' @@ -1818,103 +1854,9 @@ ocamlc.opt -ccopt "-Wdate-time -D_FORTIFY_SOURCE=2 -I/usr/include/SDL -D_GNU_SOURCE=1 -D_REENTRANT -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/build/reproducible-path/ocamlsdl-0.9.1=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection " sdlloader_stub.c ocamlc.opt -ccopt "-Wdate-time -D_FORTIFY_SOURCE=2 -I/usr/include/SDL -D_GNU_SOURCE=1 -D_REENTRANT -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/build/reproducible-path/ocamlsdl-0.9.1=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection " sdlmixer_stub.c ocamlc.opt -ccopt "-Wdate-time -D_FORTIFY_SOURCE=2 -I/usr/include/SDL -D_GNU_SOURCE=1 -D_REENTRANT -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/build/reproducible-path/ocamlsdl-0.9.1=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection " sdlgfx_stub.c -ocamlc.opt -c -g sdltimer.ml -ocamlopt.opt -c -unsafe sdltimer.ml -ocamlc.opt -c -g sdl.ml -ocamlc.opt -c -g sdlcdrom.ml -ocamlc.opt -c -g sdljoystick.ml -ocamlc.opt -c -g sdlmouse.ml -ocamlc.opt sdlmixer.mli ocamlopt.opt -c -unsafe sdl.ml ocamlopt.opt -c -unsafe sdlcdrom.ml -ocamlopt.opt -c -unsafe sdljoystick.ml -ocamlopt.opt -c -unsafe sdlmouse.ml -ocamlc.opt -c -g sdlkey.ml -File "sdltimer.ml", line 26, characters 0-65: -26 | external get_ticks : unit -> int = "sdltimer_get_ticks" "noalloc" - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -ocamlc.opt sdlevent.mli -ocamlc.opt -c -g sdlvideo.ml -ocamlc.opt sdlwm.mli -ocamlc.opt -I +lablGL sdlgl.mli -ocamlc.opt sdlttf.mli -ocamlc.opt sdlloader.mli -ocamlc.opt sdlgfx.mli -ocamlopt.opt -c -unsafe sdlkey.ml -File "sdlcdrom.ml", line 86, characters 2-16: -86 | cd_play_tracks cdrom (num - 1) 0 1 0;; - ^^^^^^^^^^^^^^ -Warning 6 [labels-omitted]: labels start_track, start_frame, num_tracks, num_frames were omitted in the application of this function. -File "sdltimer.ml", line 26, characters 0-65: -26 | external get_ticks : unit -> int = "sdltimer_get_ticks" "noalloc" - ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -File "sdlmouse.ml", line 55, characters 9-23: -55 | then s.[7-i] <- '@' - ^^^^^^^^^^^^^^ -Alert deprecated: Stdlib.String.set -Use Bytes.set/BytesLabels.set instead. -ocamlc.opt -c -g sdlmixer.ml -File "sdlcdrom.ml", line 86, characters 2-16: -86 | cd_play_tracks cdrom (num - 1) 0 1 0;; - ^^^^^^^^^^^^^^ -Warning 6 [labels-omitted]: labels start_track, start_frame, num_tracks, num_frames were omitted in the application of this function. -File "sdlmouse.ml", line 55, characters 9-23: -55 | then s.[7-i] <- '@' - ^^^^^^^^^^^^^^ -Alert deprecated: Stdlib.String.unsafe_set -ocamlc.opt -c -g sdlwm.ml -ocamlc.opt -c -I +lablGL -g sdlgl.ml -ocamlc.opt -c -g sdlttf.ml -ocamlc.opt -c -g sdlloader.ml -ocamlc.opt -c -g sdlevent.ml -ocamlc.opt -c -g sdlgfx.ml -In file included from common.c:28: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.c:23: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.c: In function 'mlsdl_cons': -common.c:41:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 41 | m=alloc_small(2,Tag_cons); - | ^~~~~~~~~~~~~~~~ -File "sdlvideo.ml", lines 210-211, characters 0-33: -210 | external must_lock : surface -> bool -211 | = "ml_SDL_MustLock" "noalloc" -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -File "sdlvideo.ml", lines 214-215, characters 0-38: -214 | external unlock : surface -> unit -215 | = "ml_SDL_UnlockSurface" "noalloc" -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -common.c: In function 'mlsdl_lookup_from_c': -common.c:67:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 67 | invalid_argument ("ml_lookup_from_c"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -common.c: In function 'mlsdl_lookup_to_c': -common.c:80:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 80 | invalid_argument ("ml_lookup_to_c"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ -common.c: In function 'abstract_ptr': -common.c:89:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 89 | value v = alloc_small(1, Abstract_tag); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -common.c: In function 'Val_some': -common.c:104:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 104 | r = alloc_small(1, 0); - | ^~~~~~~~~~~~ -ocamlopt.opt -c -unsafe sdlvideo.ml -ocamlopt.opt -c -unsafe sdlmixer.ml -In file included from sdlevent_stub.c:24: +In file included from sdlmouse_stub.c:4: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | @@ -1928,170 +1870,69 @@ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c: In function 'raise_event_exn': -sdlevent_stub.c:34:9: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 34 | exn = caml_named_value("sdlevent_exn"); - | ^ -sdlevent_stub.c:40:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead - 40 | raise_with_string(*exn, msg); - | ^~~~~~~~~~~~~~~~~~~ -ocamlmklib -v -o sdlmixer -oc sdlmixerstub sdlmixer.cmo -lSDL -lSDL_mixer -sdlevent_stub.c: In function 'find_mlsdl_keysym': -sdlevent_stub.c:75:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 75 | table = caml_named_value("rev_keycode_table"); - | ^ -sdlevent_stub.c: In function 'find_sdl_keysym': -sdlevent_stub.c:86:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 86 | table = caml_named_value("keycode_table"); - | ^ -sdlevent_stub.c: In function 'value_of_keyevent': -sdlevent_stub.c:99:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 99 | r = alloc_small(6, 0); +ocamlopt.opt -c -unsafe sdltimer.ml +sdlmouse_stub.c: In function 'mlsdlevent_get_mouse_state': +sdlmouse_stub.c:39:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 39 | v = alloc_small(3, 0); | ^~~~~~~~~~~~ -sdlevent_stub.c:109:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 109 | v = alloc_small(1, tag); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c: In function 'value_of_SDLEvent': -sdlevent_stub.c:134:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 134 | r = alloc_small(2, 0); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c:137:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 137 | v = alloc_small(1, 0); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c:146:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 146 | r = alloc_small(6, 0); - | ^~~~~~~~~~~~~~ -ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader.cmo -lSDL -lSDL_image -sdlevent_stub.c:153:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 153 | v = alloc_small(1, 3); - | ^~~~~~~~~~~~~~ -In file included from sdlloader_stub.c:27: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -sdlevent_stub.c:159:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 159 | r = alloc_small(5, 0); - | ^~~~~~~~~~~~~~ -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c:166:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 166 | v = alloc_small(1, tag); - | ^~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c:170:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 170 | r = alloc_small(3, 0); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c:174:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 174 | v = alloc_small(1, 6); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c:178:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 178 | r = alloc_small(4, 0); - | ^~~~~~~~~~~~~~ -sdlloader_stub.c: In function 'sdlloader_raise_exception': -sdlloader_stub.c:38:16: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 38 | loader_exn = caml_named_value("SDLloader_exception"); - | ^ -sdlevent_stub.c:183:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 183 | v = alloc_small(1, 7); - | ^~~~~~~~~~~~~~ -sdlloader_stub.c:44:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead - 44 | raise_with_string(*loader_exn, msg); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c:187:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 187 | r = alloc_small(3, 0); - | ^~~~~~~~~~~~~~ -sdlloader_stub.c: In function 'ml_IMG_Load': -sdlloader_stub.c:51:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 51 | enter_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlloader_stub.c:53:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 53 | leave_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlevent_stub.c:191:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 191 | v = alloc_small(1, 8); - | ^~~~~~~~~~~~~~ -sdlevent_stub.c:196:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 196 | r = alloc_small(3, 0); +sdlmouse_stub.c: In function 'ml_SDL_CreateCursor': +sdlmouse_stub.c:55:13: warning: "caml_bigarray" is deprecated: use "caml_ba_array" instead + 55 | struct caml_bigarray *b_data = Bigarray_val(data); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:55:13: warning: "Bigarray_val" is deprecated: use "Caml_ba_array_val" instead + 55 | struct caml_bigarray *b_data = Bigarray_val(data); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:56:13: warning: "caml_bigarray" is deprecated: use "caml_ba_array" instead + 56 | struct caml_bigarray *b_mask = Bigarray_val(mask); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:56:13: warning: "Bigarray_val" is deprecated: use "Caml_ba_array_val" instead + 56 | struct caml_bigarray *b_mask = Bigarray_val(mask); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:62:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 62 | invalid_argument("Sdl_mouse.create_cursor: wrong data/mask format"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:70:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 70 | r = alloc_small(3, 0); | ^~~~~~~~~~~~~~ -+ /usr/bin/ocamlc -a -o sdlmixer.cma sdlmixer.cmo -dllib -lsdlmixerstub -cclib -lsdlmixerstub -cclib -lSDL -cclib -lSDL_mixer -ocamlmklib -v -o sdlttf -oc sdlttfstub sdlttf.cmo -lSDL -lSDL_ttf -In file included from sdlrwops_stub.c:4: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -sdlevent_stub.c:201:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 201 | v = alloc_small(1, tag); - | ^~~~~~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c:211:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 211 | v = alloc_small(2, 11); - | ^~~~~~~~~~~~~~~ -+ /usr/bin/ocamlc -a -o sdlloader.cma sdlloader.cmo -dllib -lsdlloaderstub -cclib -lsdlloaderstub -cclib -lSDL -cclib -lSDL_image -sdlevent_stub.c:219:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 219 | v = alloc_small(1, 12); - | ^~~~~~~~~~~~~~~ -sdlrwops_stub.c: In function 'mlsdl_mem_close': -sdlrwops_stub.c:75:13: warning: "remove_global_root" is deprecated: use "caml_remove_global_root" instead - 75 | remove_global_root(base); - | ^~~~~~~~~~~~~~~ -sdlrwops_stub.c:76:13: warning: "stat_free" is deprecated: use "caml_stat_free" instead - 76 | stat_free(pdata); - | ^~~~~~~ -sdlrwops_stub.c: In function 'mlsdl_rwops_finalise': -sdlrwops_stub.c:86:13: warning: "stat_free" is deprecated: use "caml_stat_free" instead - 86 | stat_free(rwops); - | ^~~~~~~ -sdlrwops_stub.c: In function 'mlsdl_rw_from_mem': -sdlrwops_stub.c:95:13: warning: "stat_alloc" is deprecated: use "caml_stat_alloc" instead - 95 | rwops = stat_alloc(sizeof *rwops); - | ^~~~~~~~~~~~~~~~~~~~~~~~ -sdlrwops_stub.c:96:13: warning: "stat_alloc" is deprecated: use "caml_stat_alloc" instead - 96 | pdata = stat_alloc(sizeof *pdata); - | ^~~~~~~~~~~~~~~~~~~~~~~~ -sdlrwops_stub.c:103:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 103 | pdata->base = String_val(buff); - | ^ -sdlrwops_stub.c:105:13: warning: "register_global_root" is deprecated: use "caml_register_global_root" instead - 105 | register_global_root(base); - | ^~~~~~~~~~~~~~~~~ -sdlrwops_stub.c:107:13: warning: "string_length" is deprecated: use "caml_string_length" instead - 107 | pdata->max = string_length(buff); - | ^~~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c: In function 'SDLEvent_of_value': -In file included from sdlttf_stub.c:24: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -sdlevent_stub.c:323:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 323 | invalid_argument("SDLEvent_of_value"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -In file included from sdlmixer_stub.c:28: +sdlmouse_stub.c: In function 'ml_SDL_GetCursor': +sdlmouse_stub.c:103:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 103 | r = alloc_small(3, 0); + | ^~~~~~~~~~~~ +sdlmouse_stub.c: In function 'ml_SDL_Cursor_data': +sdlmouse_stub.c:121:13: warning: "alloc_bigarray_dims" is deprecated: use "caml_ba_alloc_dims" instead + 121 | b_data = alloc_bigarray_dims(BIGARRAY_UINT8 | + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:121:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead + 121 | b_data = alloc_bigarray_dims(BIGARRAY_UINT8 | + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:122:41: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead + 122 | BIGARRAY_C_LAYOUT | + | ^~~~~~~~~~~~ +sdlmouse_stub.c:123:41: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead + 123 | BIGARRAY_EXTERNAL, + | ^~~~~~~~~~~ +sdlmouse_stub.c:127:13: warning: "alloc_bigarray_dims" is deprecated: use "caml_ba_alloc_dims" instead + 127 | b_mask = alloc_bigarray_dims(BIGARRAY_UINT8 | + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:127:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead + 127 | b_mask = alloc_bigarray_dims(BIGARRAY_UINT8 | + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmouse_stub.c:128:41: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead + 128 | BIGARRAY_C_LAYOUT | + | ^~~~~~~~~~~~ +sdlmouse_stub.c:129:41: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead + 129 | BIGARRAY_EXTERNAL, + | ^~~~~~~~~~~ +sdlmouse_stub.c:134:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 134 | v = alloc_small(6, 0); + | ^~~~~~~~~~~~ +ocamlopt.opt -c -unsafe sdljoystick.ml +In file included from /usr/include/SDL/SDL.h:31, + from sdl_stub.c:30: +/usr/include/SDL/SDL_audio.h:46:13: warning: "callback" is deprecated: use "caml_callback" instead + 46 | void (SDLCALL *callback)(void *userdata, Uint8 *stream, int len); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +In file included from sdlcdrom_stub.c:24: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | @@ -2105,50 +1946,24 @@ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_raise_exception': -sdlmixer_stub.c:62:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 62 | mixer_exn = caml_named_value("SDLmixer_exception"); - | ^ -ocamlmklib -v -o sdlgfx -oc sdlgfxstub sdlgfx.cmo -lSDL -lSDL_gfx -In file included from sdlcdrom_stub.c:24: +In file included from sdlkey_stub.c:5: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | -sdlmixer_stub.c:68:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead - 68 | raise_with_string(*mixer_exn, msg); - | ^~~~~~~~~~~~~~~~~~~~~~~~~ +sdlcdrom_stub.c: In function 'sdlcdrom_raise_exception': In file included from common.h:27: /usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition 403 | #define Val_none Val_int(0) | -sdlttf_stub.c: In function 'ML_FONT': -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdlttf_stub.c:59:13: warning: "alloc_custom" is deprecated: use "caml_alloc_custom" instead - 59 | v = alloc_custom(&sdl_ttf_ops, sizeof(*b), 0, 1); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlevent_stub.c: In function 'mlsdlevent_wait': -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdlttf_stub.c: In function 'sdlttf_raise_exception': -sdlcdrom_stub.c: In function 'sdlcdrom_raise_exception': -sdlttf_stub.c:76:13: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 76 | ttf_exn = caml_named_value("SDLttf_exception"); - | ^ sdlcdrom_stub.c:45:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 45 | cdrom_exn = caml_named_value("SDLcdrom_exception"); | ^ -sdlevent_stub.c:406:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 406 | enter_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlttf_stub.c:77:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead - 77 | raise_with_string(*ttf_exn, msg); - | ^~~~~~~~~~~~~~~~~~~~~~~ sdlcdrom_stub.c:46:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead 46 | raise_with_string(*cdrom_exn, msg); | ^~~~~~~~~~~~~~~~~~~~~~~~~ +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ sdlcdrom_stub.c: In function 'sdlcdrom_raise_nocd': sdlcdrom_stub.c:56:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 56 | cdrom_exn = caml_named_value("SDLcdrom_nocd"); @@ -2156,204 +1971,106 @@ sdlcdrom_stub.c:57:13: warning: "raise_constant" is deprecated: use "caml_raise_constant" instead 57 | raise_constant(*cdrom_exn); | ^~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_version': -sdlevent_stub.c:408:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 408 | leave_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlmixer_stub.c:118:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 118 | r = alloc_small(3, 0); - | ^~~~~~~~~~~~ -sdlevent_stub.c: In function 'mlsdlevent_wait_event': -sdlcdrom_stub.c: In function 'sdlcdrom_drive_name': -sdlcdrom_stub.c:83:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 83 | return copy_string((char *)name); - | ^~~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_query_specs': -sdlevent_stub.c:418:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 418 | enter_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlmixer_stub.c:155:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 155 | query = alloc_small(3, 0); - | ^~~~~~~~~~~~~~~~~ -sdlevent_stub.c:420:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 420 | leave_blocking_section(); - | ^~~~~~~~~~~~~~~ -+ /usr/bin/ocamlc -a -o sdlttf.cma sdlttf.cmo -dllib -lsdlttfstub -cclib -lsdlttfstub -cclib -lSDL -cclib -lSDL_ttf -sdlcdrom_stub.c: In function 'sdlcdrom_info': -sdlttf_stub.c: In function 'ml_TTF_FontFaceFamilyName': -sdlcdrom_stub.c:191:13: warning: "alloc" is deprecated: use "caml_alloc" instead - 191 | a = alloc(cd->numtracks, 0); - | ^~~~~~~~~~~~~~~~~~~~ -sdlttf_stub.c:183:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 183 | ML_1(TTF_FontFaceFamilyName, SDL_FONT, copy_string) - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlttf_stub.c: In function 'ml_TTF_FontFaceStyleName': -sdlcdrom_stub.c:194:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 194 | t = alloc_small(4, 0); - | ^~~~~~~~~~~~~~~~ -sdlttf_stub.c:184:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 184 | ML_1(TTF_FontFaceStyleName, SDL_FONT, copy_string) - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -In file included from /usr/include/SDL/SDL.h:31, - from sdl_stub.c:30: -/usr/include/SDL/SDL_audio.h:46:13: warning: "callback" is deprecated: use "caml_callback" instead - 46 | void (SDLCALL *callback)(void *userdata, Uint8 *stream, int len); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlttf_stub.c: In function 'sdlttf_size_text': -sdlttf_stub.c:199:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 199 | v = alloc_small(2, 0); - | ^~~~~~~~~~~~ -sdlcdrom_stub.c:204:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 204 | v = alloc_small(4, 0); - | ^~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_set_music_cmd': -sdlmixer_stub.c:252:13: warning: "raise_out_of_memory" is deprecated: use "caml_raise_out_of_memory" instead - 252 | raise_out_of_memory(); - | ^~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_group_available': -sdlmixer_stub.c:312:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead - 312 | raise_not_found(); - | ^~~~~~~~~~ -+ /usr/bin/ocamlc -a -o sdlgfx.cma sdlgfx.cmo -dllib -lsdlgfxstub -cclib -lsdlgfxstub -cclib -lSDL -cclib -lSDL_gfx -sdlmixer_stub.c: In function 'sdlmixer_group_oldest': -sdlmixer_stub.c:327:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead - 327 | raise_not_found(); - | ^~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_group_newer': -sdlmixer_stub.c:336:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead - 336 | raise_not_found(); - | ^~~~~~~~~~ -sdlttf_stub.c: In function 'sdlttf_glyph_metrics': -In file included from sdlwm_stub.c:3: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -sdlttf_stub.c:318:13: warning: "alloc" is deprecated: use "caml_alloc" instead - 318 | result = alloc(4, 0); - | ^~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -In file included from sdlkey_stub.c:5: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -sdlttf_stub.c: In function 'sdlttf_size_utf8': -sdlttf_stub.c:335:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 335 | v = alloc_small(2, 0); - | ^~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_volume_channel': -sdlmixer_stub.c:400:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead - 400 | return copy_double(Mix_Volume(Int_val(chn), -1) / (double) MIX_MAX_VOLUME); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ sdlkey_stub.c: In function 'ml_SDL_GetKeyName': -sdlmixer_stub.c: In function 'sdlmixer_volume_chunk': sdlkey_stub.c:9:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead 9 | return copy_string(SDL_GetKeyName(Int_val(key))); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlwm_stub.c: In function 'ml_SDL_WM_GetCaption': -sdlmixer_stub.c:406:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead - 406 | return copy_double(Mix_VolumeChunk(SDL_CHUNK(chunk), -1) / (double) MIX_MAX_VOLUME); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlwm_stub.c:16:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 16 | s1 = copy_string(title); - | ^~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_volume_music': -sdlwm_stub.c:17:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 17 | s2 = copy_string(icon); - | ^~~~~~~~~~~~~ -sdlwm_stub.c:18:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 18 | v = alloc_small(2, 0); - | ^~~~~~~~~~~~ +sdlcdrom_stub.c: In function 'sdlcdrom_drive_name': +sdlcdrom_stub.c:83:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 83 | return copy_string((char *)name); + | ^~~~~~~~~~~~~~~~~~~~~~~ sdlkey_stub.c: In function 'ml_SDL_GetKeyState': sdlkey_stub.c:31:13: warning: "alloc_bigarray" is deprecated: use "caml_ba_alloc" instead 31 | value v = alloc_bigarray(BIGARRAY_UINT8 | | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ sdlkey_stub.c:31:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead -sdlmixer_stub.c:412:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead - 412 | return copy_double(Mix_VolumeMusic(-1) / (double) MIX_MAX_VOLUME); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ sdlkey_stub.c:32:34: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead 32 | BIGARRAY_C_LAYOUT | | ^~~~~~~~~~~~~ sdlkey_stub.c:33:34: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead 33 | BIGARRAY_EXTERNAL, 1, data, &llen); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_fading_channel': -sdlmixer_stub.c:524:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 524 | invalid_argument("Sdlmixer.fading_channel"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_paused_channel': +sdlcdrom_stub.c: In function 'sdlcdrom_info': +File "sdltimer.ml", line 26, characters 0-65: +26 | external get_ticks : unit -> int = "sdltimer_get_ticks" "noalloc" + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +In file included from sdljoystick_stub.c:24: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | In file included from /usr/include/SDL/SDL.h:41: /usr/include/SDL/SDL_timer.h:41:13: warning: "callback" is deprecated: use "caml_callback" instead 41 | extern DECLSPEC int SDLCALL SDL_SetTimer(Uint32 interval, SDL_TimerCallback callback); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ /usr/include/SDL/SDL_timer.h:42:13: warning: "callback" is deprecated: use "caml_callback" instead 42 | extern DECLSPEC SDL_TimerID SDLCALL SDL_AddTimer(Uint32 interval, SDL_NewTimerCallback callback, void *param); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c:553:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 553 | invalid_argument("Sdlmixer.paused_channel"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmixer_stub.c: In function 'sdlmixer_playing': -sdlmixer_stub.c:594:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 594 | invalid_argument("Sdlmixer.playing_channel"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdljoystick_stub.c: In function 'mlsdljoystick_raise_exception': +sdljoystick_stub.c:39:18: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 39 | joystick_exn = caml_named_value("SDLjoystick_exception"); + | ^ +sdljoystick_stub.c:40:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead + 40 | raise_with_string(*joystick_exn, msg); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdljoystick_stub.c: In function 'ml_SDL_JoystickName': +sdljoystick_stub.c:44:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 44 | ML_1(SDL_JoystickName, Int_val, copy_string) + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlcdrom_stub.c:191:13: warning: "alloc" is deprecated: use "caml_alloc" instead + 191 | a = alloc(cd->numtracks, 0); + | ^~~~~~~~~~~~~~~~~~~~ +sdlcdrom_stub.c:194:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 194 | t = alloc_small(4, 0); + | ^~~~~~~~~~~~~~~~ In file included from sdl_stub.c:32: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | +sdlcdrom_stub.c:204:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 204 | v = alloc_small(4, 0); + | ^~~~~~~~~~~~~~ +sdljoystick_stub.c: In function 'ml_SDL_JoystickGetBall': In file included from /usr/lib/ocaml/caml/callback.h:24, from sdl_stub.c:24: /usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition 403 | #define Val_none Val_int(0) | +sdljoystick_stub.c:79:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 79 | v = alloc_small(2, 0); + | ^~~~~~~~~~~~ common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead 96 | void enter_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -ocamlopt.opt -c -unsafe sdlevent.ml sdl_stub.c: In function 'sdl_init': sdl_stub.c:78:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead 78 | raise_with_string(*caml_named_value("SDL_init_exception"), | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -In file included from sdlmouse_stub.c:4: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | sdl_stub.c: In function 'sdl_init_subsystem': sdl_stub.c:99:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead 99 | raise_with_string(*caml_named_value("SDL_init_exception"), | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ +File "sdlcdrom.ml", line 86, characters 2-16: +86 | cd_play_tracks cdrom (num - 1) 0 1 0;; + ^^^^^^^^^^^^^^ +Warning 6 [labels-omitted]: labels start_track, start_frame, num_tracks, num_frames were omitted in the application of this function. sdl_stub.c: In function 'sdl_version': -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ sdl_stub.c:131:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 131 | r = alloc_small(3, 0); | ^~~~~~~~~~~~ @@ -2367,144 +2084,48 @@ sdl_stub.c:144:13: warning: "stat_alloc" is deprecated: use "caml_stat_alloc" instead 144 | char * s = stat_alloc(namelen + 1 + vallen + 1); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c: In function 'mlsdlevent_get_mouse_state': -sdlmouse_stub.c:39:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 39 | v = alloc_small(3, 0); - | ^~~~~~~~~~~~ sdl_stub.c:154:13: warning: "raise_out_of_memory" is deprecated: use "caml_raise_out_of_memory" instead 154 | if (putenv(s) == -1) raise_out_of_memory(); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c: In function 'ml_SDL_CreateCursor': -sdlmouse_stub.c:55:13: warning: "caml_bigarray" is deprecated: use "caml_ba_array" instead - 55 | struct caml_bigarray *b_data = Bigarray_val(data); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:55:13: warning: "Bigarray_val" is deprecated: use "Caml_ba_array_val" instead - 55 | struct caml_bigarray *b_data = Bigarray_val(data); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:56:13: warning: "caml_bigarray" is deprecated: use "caml_ba_array" instead - 56 | struct caml_bigarray *b_mask = Bigarray_val(mask); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:56:13: warning: "Bigarray_val" is deprecated: use "Caml_ba_array_val" instead - 56 | struct caml_bigarray *b_mask = Bigarray_val(mask); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:62:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead - 62 | invalid_argument("Sdl_mouse.create_cursor: wrong data/mask format"); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:70:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 70 | r = alloc_small(3, 0); - | ^~~~~~~~~~~~~~ -ocamlmklib -v -o sdl -oc sdlstub sdl.cmo sdlcdrom.cmo sdltimer.cmo sdljoystick.cmo sdlkey.cmo sdlmouse.cmo sdlevent.cmo sdlvideo.cmo sdlwm.cmo sdlgl.cmo -lSDL -sdlmouse_stub.c: In function 'ml_SDL_GetCursor': -sdlmouse_stub.c:103:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 103 | r = alloc_small(3, 0); - | ^~~~~~~~~~~~ -sdlmouse_stub.c: In function 'ml_SDL_Cursor_data': -sdlmouse_stub.c:121:13: warning: "alloc_bigarray_dims" is deprecated: use "caml_ba_alloc_dims" instead - 121 | b_data = alloc_bigarray_dims(BIGARRAY_UINT8 | - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:121:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead - 121 | b_data = alloc_bigarray_dims(BIGARRAY_UINT8 | - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:122:41: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead - 122 | BIGARRAY_C_LAYOUT | - | ^~~~~~~~~~~~ -sdlmouse_stub.c:123:41: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead - 123 | BIGARRAY_EXTERNAL, - | ^~~~~~~~~~~ -sdlmouse_stub.c:127:13: warning: "alloc_bigarray_dims" is deprecated: use "caml_ba_alloc_dims" instead - 127 | b_mask = alloc_bigarray_dims(BIGARRAY_UINT8 | - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:127:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead - 127 | b_mask = alloc_bigarray_dims(BIGARRAY_UINT8 | - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlmouse_stub.c:128:41: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead - 128 | BIGARRAY_C_LAYOUT | - | ^~~~~~~~~~~~ -sdlmouse_stub.c:129:41: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead - 129 | BIGARRAY_EXTERNAL, - | ^~~~~~~~~~~ -sdlmouse_stub.c:134:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 134 | v = alloc_small(6, 0); - | ^~~~~~~~~~~~ -File "sdlvideo.ml", lines 210-211, characters 0-33: -210 | external must_lock : surface -> bool -211 | = "ml_SDL_MustLock" "noalloc" -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -File "sdlvideo.ml", lines 214-215, characters 0-38: -214 | external unlock : surface -> unit -215 | = "ml_SDL_UnlockSurface" "noalloc" -Alert deprecated: [@@noalloc] should be used instead of "noalloc" -+ /usr/bin/ocamlc -a -o sdl.cma sdl.cmo sdlcdrom.cmo sdltimer.cmo sdljoystick.cmo sdlkey.cmo sdlmouse.cmo sdlevent.cmo sdlvideo.cmo sdlwm.cmo sdlgl.cmo -dllib -lsdlstub -cclib -lsdlstub -cclib -lSDL -In file included from sdljoystick_stub.c:24: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from sdlgl_stub.c:4: +ocamlopt.opt -c -unsafe sdlkey.ml +In file included from common.c:28: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -In file included from common.h:27: +In file included from common.c:23: /usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition 403 | #define Val_none Val_int(0) | common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead 96 | void enter_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdljoystick_stub.c: In function 'mlsdljoystick_raise_exception': -sdljoystick_stub.c:39:18: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] - 39 | joystick_exn = caml_named_value("SDLjoystick_exception"); - | ^ -sdljoystick_stub.c:40:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead - 40 | raise_with_string(*joystick_exn, msg); - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdljoystick_stub.c: In function 'ml_SDL_JoystickName': -sdljoystick_stub.c:44:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead - 44 | ML_1(SDL_JoystickName, Int_val, copy_string) - | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -sdlgl_stub.c: In function 'ml_SDL_GL_SwapBuffers': -sdlgl_stub.c:13:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 13 | enter_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlgl_stub.c:15:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 15 | leave_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdlgl_stub.c: In function 'ml_SDL_GL_GetAttribute': -sdlgl_stub.c:53:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 53 | a = alloc_small(1, i); - | ^~~~~~~~~~~~~~ -sdljoystick_stub.c: In function 'ml_SDL_JoystickGetBall': -sdljoystick_stub.c:79:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 79 | v = alloc_small(2, 0); +common.c: In function 'mlsdl_cons': +common.c:41:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 41 | m=alloc_small(2,Tag_cons); + | ^~~~~~~~~~~~~~~~ +common.c: In function 'mlsdl_lookup_from_c': +common.c:67:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 67 | invalid_argument ("ml_lookup_from_c"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +common.c: In function 'mlsdl_lookup_to_c': +common.c:80:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 80 | invalid_argument ("ml_lookup_to_c"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ +common.c: In function 'abstract_ptr': +common.c:89:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 89 | value v = alloc_small(1, Abstract_tag); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +common.c: In function 'Val_some': +common.c:104:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 104 | r = alloc_small(1, 0); | ^~~~~~~~~~~~ -sdlgl_stub.c: In function 'ml_SDL_GL_to_raw': -sdlgl_stub.c:75:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead - 75 | raw = alloc_small (SIZE_RAW+1, 0); - | ^~~~~~~~~~~~~~~~~~~~~~~~ In file included from sdlvideo_stub.c:6: common.h:72: warning: "Val_none" redefined 72 | #define Val_none Val_unit | -In file included from sdltimer_stub.c:24: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | In file included from common.h:27: /usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition 403 | #define Val_none Val_int(0) @@ -2512,22 +2133,9 @@ common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead 96 | void enter_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead 97 | void leave_blocking_section(void); | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -sdltimer_stub.c: In function 'sdltimer_delay': -sdltimer_stub.c:33:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 33 | enter_blocking_section(); - | ^~~~~~~~~~~~~~~ -sdltimer_stub.c:35:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 35 | leave_blocking_section(); - | ^~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'Val_SDLSurface': sdlvideo_stub.c:70:13: warning: "alloc_custom" is deprecated: use "caml_alloc_custom" instead 70 | s = alloc_custom(&sdl_surface_ops, @@ -2556,7 +2164,6 @@ sdlvideo_stub.c:150:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 150 | Store_field(v, 4, copy_int32(fmt->Gmask)); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -ocamlmklib -v -o sdlmixer -oc sdlmixerstub sdlmixer.cmx -lSDL -lSDL_mixer sdlvideo_stub.c:151:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 151 | Store_field(v, 5, copy_int32(fmt->Bmask)); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @@ -2566,11 +2173,74 @@ sdlvideo_stub.c:161:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 161 | Store_field(v,15, copy_int32(fmt->colorkey)); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -+ /usr/bin/ocamlopt -a -o sdlmixer.cmxa sdlmixer.cmx -cclib -lsdlmixerstub -cclib -lSDL -cclib -lSDL_mixer +In file included from sdlrwops_stub.c:4: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlrwops_stub.c: In function 'mlsdl_mem_close': +sdlrwops_stub.c:75:13: warning: "remove_global_root" is deprecated: use "caml_remove_global_root" instead + 75 | remove_global_root(base); + | ^~~~~~~~~~~~~~~ +sdlrwops_stub.c:76:13: warning: "stat_free" is deprecated: use "caml_stat_free" instead + 76 | stat_free(pdata); + | ^~~~~~~ +sdlrwops_stub.c: In function 'mlsdl_rwops_finalise': +sdlrwops_stub.c:86:13: warning: "stat_free" is deprecated: use "caml_stat_free" instead + 86 | stat_free(rwops); + | ^~~~~~~ +sdlrwops_stub.c: In function 'mlsdl_rw_from_mem': +sdlrwops_stub.c:95:13: warning: "stat_alloc" is deprecated: use "caml_stat_alloc" instead + 95 | rwops = stat_alloc(sizeof *rwops); + | ^~~~~~~~~~~~~~~~~~~~~~~~ +sdlrwops_stub.c:96:13: warning: "stat_alloc" is deprecated: use "caml_stat_alloc" instead + 96 | pdata = stat_alloc(sizeof *pdata); + | ^~~~~~~~~~~~~~~~~~~~~~~~ +In file included from sdlgl_stub.c:4: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +sdlrwops_stub.c:103:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 103 | pdata->base = String_val(buff); + | ^ +ocamlopt.opt -c -unsafe sdlmouse.ml +sdlrwops_stub.c:105:13: warning: "register_global_root" is deprecated: use "caml_register_global_root" instead + 105 | register_global_root(base); + | ^~~~~~~~~~~~~~~~~ +sdlrwops_stub.c:107:13: warning: "string_length" is deprecated: use "caml_string_length" instead + 107 | pdata->max = string_length(buff); + | ^~~~~~~~~~~~~~~~~~~~~~~ +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlgl_stub.c: In function 'ml_SDL_GL_SwapBuffers': +sdlgl_stub.c:13:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 13 | enter_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlgl_stub.c:15:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 15 | leave_blocking_section(); + | ^~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_sdl_palette_ncolors': sdlvideo_stub.c:214:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 214 | invalid_argument("surface not palettized"); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlgl_stub.c: In function 'ml_SDL_GL_GetAttribute': sdlvideo_stub.c: In function 'ml_sdl_palette_get_color': sdlvideo_stub.c:226:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 226 | invalid_argument("surface not palettized"); @@ -2578,13 +2248,20 @@ sdlvideo_stub.c:228:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 228 | invalid_argument("out of bounds palette access"); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlgl_stub.c:53:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 53 | a = alloc_small(1, i); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:230:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 230 | v = alloc_small(3, 0); | ^~~~~~~~~~~~ +sdlgl_stub.c: In function 'ml_SDL_GL_to_raw': sdlvideo_stub.c: In function 'ml_SDL_SetPalette': sdlvideo_stub.c:249:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 249 | invalid_argument("surface not palettized"); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlgl_stub.c:75:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 75 | raw = alloc_small (SIZE_RAW+1, 0); + | ^~~~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c:251:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 251 | invalid_argument("out of bounds palette access"); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @@ -2592,108 +2269,467 @@ sdlvideo_stub.c:273:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 273 | result = alloc_small(10, 0); | ^~~~~~~~~~~~~~~~~~ +In file included from sdlevent_stub.c:24: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | sdlvideo_stub.c: In function 'ml_SDL_VideoDriverName': +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | sdlvideo_stub.c:298:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead 298 | return copy_string(buff); | ^~~~~~~~~~~~~~~ +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_ListModes': +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c:322:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 322 | r = alloc_small(2, 0); | ^~~~~~~~~~~~~~~~ sdlvideo_stub.c:327:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 327 | v = alloc_small(1, 0); | ^~~~~~~~~~~~~~ +sdlevent_stub.c: In function 'raise_event_exn': +sdlevent_stub.c:34:9: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 34 | exn = caml_named_value("sdlevent_exn"); + | ^ sdlvideo_stub.c: In function 'ml_sdl_surface_info': sdlvideo_stub.c:348:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 348 | v = alloc_small(6, 0); | ^~~~~~~~~~~~ +sdlevent_stub.c:40:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead + 40 | raise_with_string(*exn, msg); + | ^~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c: In function 'find_mlsdl_keysym': +In file included from sdlwm_stub.c:3: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +sdlevent_stub.c:75:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 75 | table = caml_named_value("rev_keycode_table"); + | ^ +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_MapRGB': sdlvideo_stub.c:438:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 438 | return copy_int32(p); | ^~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_GetRGB': +sdlevent_stub.c: In function 'find_sdl_keysym': +In file included from sdltimer_stub.c:24: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | sdlvideo_stub.c:448:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 448 | v = alloc_small(3, 0); | ^~~~~~~~~~~~ +sdlevent_stub.c:86:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 86 | table = caml_named_value("keycode_table"); + | ^ +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +sdlwm_stub.c: In function 'ml_SDL_WM_GetCaption': +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_GetRGBA': +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlwm_stub.c:16:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 16 | s1 = copy_string(title); + | ^~~~~~~~~~~~~~ +sdltimer_stub.c: In function 'sdltimer_delay': +sdlwm_stub.c:17:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 17 | s2 = copy_string(icon); + | ^~~~~~~~~~~~~ +sdltimer_stub.c:33:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 33 | enter_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlwm_stub.c:18:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 18 | v = alloc_small(2, 0); + | ^~~~~~~~~~~~ +sdltimer_stub.c:35:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 35 | leave_blocking_section(); + | ^~~~~~~~~~~~~~~ sdlvideo_stub.c:464:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 464 | c = alloc_small(3, 0); | ^~~~~~~~~~~~~~ -ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader_stub.o -lSDL -lSDL_image +sdlevent_stub.c: In function 'value_of_keyevent': sdlvideo_stub.c:468:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 468 | v = alloc_small(2, 0); | ^~~~~~~~~~~~~~ +sdlevent_stub.c:99:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 99 | r = alloc_small(6, 0); + | ^~~~~~~~~~~~ +sdlevent_stub.c:109:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 109 | v = alloc_small(1, tag); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_CreateRGBSurfaceFrom': sdlvideo_stub.c:518:13: warning: "caml_bigarray" is deprecated: use "caml_ba_array" instead 518 | struct caml_bigarray *barr = Bigarray_val(pixels); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c: In function 'value_of_SDLEvent': sdlvideo_stub.c:518:13: warning: "Bigarray_val" is deprecated: use "Caml_ba_array_val" instead 518 | struct caml_bigarray *barr = Bigarray_val(pixels); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -In file included from sdlgfx_stub.c:6: -common.h:72: warning: "Val_none" redefined - 72 | #define Val_none Val_unit - | -In file included from common.h:27: -/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition - 403 | #define Val_none Val_int(0) - | -+ x86_64-linux-gnu-gcc -shared -Wl,-z,relro -Wl,-z,now -Wl,-z,relro -Wl,-z,now -o ./dllsdlloaderstub.so sdlloader_stub.o -lSDL -lSDL_image -common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead - 96 | void enter_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ -common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead - 97 | void leave_blocking_section(void); - | ^~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c:134:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 134 | r = alloc_small(2, 0); + | ^~~~~~~~~~~~~~ +sdlevent_stub.c:137:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 137 | v = alloc_small(1, 0); + | ^~~~~~~~~~~~~~ +sdlevent_stub.c:146:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 146 | r = alloc_small(6, 0); + | ^~~~~~~~~~~~~~ +sdlevent_stub.c:153:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 153 | v = alloc_small(1, 3); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_get_color_key': +sdlevent_stub.c:159:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 159 | r = alloc_small(5, 0); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:599:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 599 | return copy_int32(surf->format->colorkey); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c:166:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 166 | v = alloc_small(1, tag); + | ^~~~~~~~~~~~~~~~ +sdlevent_stub.c:170:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 170 | r = alloc_small(3, 0); + | ^~~~~~~~~~~~~~ +sdlevent_stub.c:174:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 174 | v = alloc_small(1, 6); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_bigarray_pixels': -ocamlopt.opt -c -unsafe sdlwm.ml +sdlevent_stub.c:178:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 178 | r = alloc_small(4, 0); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:715:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead 715 | invalid_argument("wrong pixel format"); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -ocamlopt.opt -c -I +lablGL -unsafe sdlgl.ml +sdlevent_stub.c:183:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 183 | v = alloc_small(1, 7); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:720:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead 720 | b_flag |= BIGARRAY_UINT8; break; | ^~~~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c:187:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 187 | r = alloc_small(3, 0); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:723:13: warning: "BIGARRAY_UINT16" is deprecated: use "CAML_BA_UINT16" instead 723 | b_flag |= BIGARRAY_UINT16; break; | ^~~~~~~~~~~~~~~~~~~~~~~~~ -ocamlopt.opt -c -unsafe sdlttf.ml +sdlevent_stub.c:191:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 191 | v = alloc_small(1, 8); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:726:13: warning: "BIGARRAY_UINT8" is deprecated: use "CAML_BA_UINT8" instead 726 | b_flag |= BIGARRAY_UINT8; break; | ^~~~~~~~~~~~~~~~~~~~~~~~ -ocamlopt.opt -c -unsafe sdlloader.ml +sdlevent_stub.c:196:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 196 | r = alloc_small(3, 0); + | ^~~~~~~~~~~~~~ sdlvideo_stub.c:729:13: warning: "BIGARRAY_INT32" is deprecated: use "CAML_BA_INT32" instead 729 | b_flag |= BIGARRAY_INT32; break; | ^~~~~~~~~~~~~~~~~~~~~~~~ sdlvideo_stub.c:733:13: warning: "BIGARRAY_C_LAYOUT" is deprecated: use "CAML_BA_C_LAYOUT" instead 733 | b_flag |= BIGARRAY_C_LAYOUT | BIGARRAY_EXTERNAL ; | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -ocamlopt.opt -c -unsafe sdlgfx.ml sdlvideo_stub.c:733:13: warning: "BIGARRAY_EXTERNAL" is deprecated: use "CAML_BA_EXTERNAL" instead sdlvideo_stub.c:734:13: warning: "alloc_bigarray" is deprecated: use "caml_ba_alloc" instead 734 | return alloc_bigarray(b_flag, 1, surf->pixels, &dim); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c:201:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 201 | v = alloc_small(1, tag); + | ^~~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_get_pixel': +sdlevent_stub.c:211:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 211 | v = alloc_small(2, 11); + | ^~~~~~~~~~~~~~~ sdlvideo_stub.c:795:13: warning: "copy_int32" is deprecated: use "caml_copy_int32" instead 795 | return copy_int32(pixel); | ^~~~~~~~~~~~~~~ +sdlevent_stub.c:219:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 219 | v = alloc_small(1, 12); + | ^~~~~~~~~~~~~~~ sdlvideo_stub.c: In function 'ml_SDL_get_pixel_color': sdlvideo_stub.c:805:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead 805 | v = alloc_small(3, 0); | ^~~~~~~~~~~~ -ocamlmklib -v -o sdlgfx -oc sdlgfxstub sdlgfx.cmx -lSDL -lSDL_gfx -ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader.cmx -lSDL -lSDL_image +ocamlopt.opt -c -unsafe sdlvideo.ml +sdlevent_stub.c: In function 'SDLEvent_of_value': +sdlevent_stub.c:323:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 323 | invalid_argument("SDLEvent_of_value"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlevent_stub.c: In function 'mlsdlevent_wait': +sdlevent_stub.c:406:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 406 | enter_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlevent_stub.c:408:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 408 | leave_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlevent_stub.c: In function 'mlsdlevent_wait_event': +sdlevent_stub.c:418:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 418 | enter_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlevent_stub.c:420:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 420 | leave_blocking_section(); + | ^~~~~~~~~~~~~~~ +ocamlc.opt -c -g sdl.ml +In file included from sdlloader_stub.c:27: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlloader_stub.c: In function 'sdlloader_raise_exception': +sdlloader_stub.c:38:16: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 38 | loader_exn = caml_named_value("SDLloader_exception"); + | ^ +sdlloader_stub.c:44:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead + 44 | raise_with_string(*loader_exn, msg); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlloader_stub.c: In function 'ml_IMG_Load': +sdlloader_stub.c:51:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 51 | enter_blocking_section(); + | ^~~~~~~~~~~~~~~ +sdlloader_stub.c:53:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 53 | leave_blocking_section(); + | ^~~~~~~~~~~~~~~ +In file included from sdlttf_stub.c:24: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlttf_stub.c: In function 'ML_FONT': +ocamlc.opt -c -g sdlcdrom.ml +sdlttf_stub.c:59:13: warning: "alloc_custom" is deprecated: use "caml_alloc_custom" instead + 59 | v = alloc_custom(&sdl_ttf_ops, sizeof(*b), 0, 1); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlttf_stub.c: In function 'sdlttf_raise_exception': +sdlttf_stub.c:76:13: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 76 | ttf_exn = caml_named_value("SDLttf_exception"); + | ^ +sdlttf_stub.c:77:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead + 77 | raise_with_string(*ttf_exn, msg); + | ^~~~~~~~~~~~~~~~~~~~~~~ +sdlttf_stub.c: In function 'ml_TTF_FontFaceFamilyName': +sdlttf_stub.c:183:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 183 | ML_1(TTF_FontFaceFamilyName, SDL_FONT, copy_string) + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlttf_stub.c: In function 'ml_TTF_FontFaceStyleName': +sdlttf_stub.c:184:13: warning: "copy_string" is deprecated: use "caml_copy_string" instead + 184 | ML_1(TTF_FontFaceStyleName, SDL_FONT, copy_string) + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlttf_stub.c: In function 'sdlttf_size_text': +sdlttf_stub.c:199:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 199 | v = alloc_small(2, 0); + | ^~~~~~~~~~~~ +File "sdlmouse.ml", line 55, characters 9-23: +55 | then s.[7-i] <- '@' + ^^^^^^^^^^^^^^ +Alert deprecated: Stdlib.String.unsafe_set +sdlttf_stub.c: In function 'sdlttf_glyph_metrics': +sdlttf_stub.c:318:13: warning: "alloc" is deprecated: use "caml_alloc" instead + 318 | result = alloc(4, 0); + | ^~~~~~~~~~~~ +sdlttf_stub.c: In function 'sdlttf_size_utf8': +sdlttf_stub.c:335:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 335 | v = alloc_small(2, 0); + | ^~~~~~~~~~~~ +ocamlc.opt -c -g sdltimer.ml +ocamlc.opt -c -g sdljoystick.ml +File "sdlvideo.ml", lines 210-211, characters 0-33: +210 | external must_lock : surface -> bool +211 | = "ml_SDL_MustLock" "noalloc" +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +File "sdlvideo.ml", lines 214-215, characters 0-38: +214 | external unlock : surface -> unit +215 | = "ml_SDL_UnlockSurface" "noalloc" +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +In file included from sdlmixer_stub.c:28: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +ocamlc.opt -c -g sdlkey.ml +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_raise_exception': +sdlmixer_stub.c:62:15: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] + 62 | mixer_exn = caml_named_value("SDLmixer_exception"); + | ^ +sdlmixer_stub.c:68:13: warning: "raise_with_string" is deprecated: use "caml_raise_with_string" instead + 68 | raise_with_string(*mixer_exn, msg); + | ^~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_version': +sdlmixer_stub.c:118:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 118 | r = alloc_small(3, 0); + | ^~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_query_specs': +sdlmixer_stub.c:155:13: warning: "alloc_small" is deprecated: use "caml_alloc_small" instead + 155 | query = alloc_small(3, 0); + | ^~~~~~~~~~~~~~~~~ +File "sdlcdrom.ml", line 86, characters 2-16: +86 | cd_play_tracks cdrom (num - 1) 0 1 0;; + ^^^^^^^^^^^^^^ +Warning 6 [labels-omitted]: labels start_track, start_frame, num_tracks, num_frames were omitted in the application of this function. +sdlmixer_stub.c: In function 'sdlmixer_set_music_cmd': +sdlmixer_stub.c:252:13: warning: "raise_out_of_memory" is deprecated: use "caml_raise_out_of_memory" instead + 252 | raise_out_of_memory(); + | ^~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_group_available': +sdlmixer_stub.c:312:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead + 312 | raise_not_found(); + | ^~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_group_oldest': +sdlmixer_stub.c:327:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead + 327 | raise_not_found(); + | ^~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_group_newer': +sdlmixer_stub.c:336:13: warning: "raise_not_found" is deprecated: use "caml_raise_not_found" instead + 336 | raise_not_found(); + | ^~~~~~~~~~ +In file included from sdlgfx_stub.c:6: +common.h:72: warning: "Val_none" redefined + 72 | #define Val_none Val_unit + | +In file included from common.h:27: +/usr/lib/ocaml/caml/mlvalues.h:403: note: this is the location of the previous definition + 403 | #define Val_none Val_int(0) + | +ocamlc.opt -c -g sdlmouse.ml +common.h:96:13: warning: "enter_blocking_section" is deprecated: use "caml_enter_blocking_section" instead + 96 | void enter_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_volume_channel': +common.h:97:13: warning: "leave_blocking_section" is deprecated: use "caml_leave_blocking_section" instead + 97 | void leave_blocking_section(void); + | ^~~~~~~~~~~~~~~~~~~~~~ +ocamlc.opt sdlevent.mli +sdlmixer_stub.c:400:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead + 400 | return copy_double(Mix_Volume(Int_val(chn), -1) / (double) MIX_MAX_VOLUME); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_volume_chunk': +File "sdltimer.ml", line 26, characters 0-65: +26 | external get_ticks : unit -> int = "sdltimer_get_ticks" "noalloc" + ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +sdlmixer_stub.c:406:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead + 406 | return copy_double(Mix_VolumeChunk(SDL_CHUNK(chunk), -1) / (double) MIX_MAX_VOLUME); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_volume_music': +sdlmixer_stub.c:412:13: warning: "copy_double" is deprecated: use "caml_copy_double" instead + 412 | return copy_double(Mix_VolumeMusic(-1) / (double) MIX_MAX_VOLUME); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_fading_channel': +sdlmixer_stub.c:524:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 524 | invalid_argument("Sdlmixer.fading_channel"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_paused_channel': +sdlmixer_stub.c:553:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 553 | invalid_argument("Sdlmixer.paused_channel"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +sdlmixer_stub.c: In function 'sdlmixer_playing': +sdlmixer_stub.c:594:13: warning: "invalid_argument" is deprecated: use "caml_invalid_argument" instead + 594 | invalid_argument("Sdlmixer.playing_channel"); + | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +ocamlc.opt -c -g sdlvideo.ml +ocamlc.opt sdlwm.mli +ocamlc.opt -I +lablGL sdlgl.mli +File "sdlmouse.ml", line 55, characters 9-23: +55 | then s.[7-i] <- '@' + ^^^^^^^^^^^^^^ +Alert deprecated: Stdlib.String.set +Use Bytes.set/BytesLabels.set instead. +ocamlc.opt sdlttf.mli +ocamlc.opt sdlloader.mli +ocamlc.opt sdlmixer.mli +ocamlc.opt sdlgfx.mli +ocamlopt.opt -c -unsafe sdlevent.ml +File "sdlvideo.ml", lines 210-211, characters 0-33: +210 | external must_lock : surface -> bool +211 | = "ml_SDL_MustLock" "noalloc" +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +File "sdlvideo.ml", lines 214-215, characters 0-38: +214 | external unlock : surface -> unit +215 | = "ml_SDL_UnlockSurface" "noalloc" +Alert deprecated: [@@noalloc] should be used instead of "noalloc" +ocamlc.opt -c -g sdlevent.ml +ocamlc.opt -c -g sdlwm.ml +ocamlc.opt -c -I +lablGL -g sdlgl.ml +ocamlc.opt -c -g sdlloader.ml +ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader_stub.o -lSDL -lSDL_image ++ x86_64-linux-gnu-gcc -shared -Wl,-z,relro -Wl,-z,now -Wl,-z,relro -Wl,-z,now -o ./dllsdlloaderstub.so sdlloader_stub.o -lSDL -lSDL_image +ocamlc.opt -c -g sdlttf.ml +ocamlc.opt -c -g sdlmixer.ml +ocamlopt.opt -c -unsafe sdlwm.ml +ocamlopt.opt -c -I +lablGL -unsafe sdlgl.ml +ocamlopt.opt -c -unsafe sdlttf.ml +ocamlopt.opt -c -unsafe sdlloader.ml +ocamlopt.opt -c -unsafe sdlmixer.ml +ocamlopt.opt -c -unsafe sdlgfx.ml +ocamlmklib -v -o sdl -oc sdlstub sdl.cmo sdlcdrom.cmo sdltimer.cmo sdljoystick.cmo sdlkey.cmo sdlmouse.cmo sdlevent.cmo sdlvideo.cmo sdlwm.cmo sdlgl.cmo -lSDL ++ x86_64-linux-gnu-ar rcs ./libsdlloaderstub.a sdlloader_stub.o ++ /usr/bin/ocamlc -a -o sdl.cma sdl.cmo sdlcdrom.cmo sdltimer.cmo sdljoystick.cmo sdlkey.cmo sdlmouse.cmo sdlevent.cmo sdlvideo.cmo sdlwm.cmo sdlgl.cmo -dllib -lsdlstub -cclib -lsdlstub -cclib -lSDL +ocamlmklib -v -o sdlttf -oc sdlttfstub sdlttf.cmo -lSDL -lSDL_ttf ++ /usr/bin/ocamlc -a -o sdlttf.cma sdlttf.cmo -dllib -lsdlttfstub -cclib -lsdlttfstub -cclib -lSDL -cclib -lSDL_ttf +ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader.cmo -lSDL -lSDL_image ++ /usr/bin/ocamlc -a -o sdlloader.cma sdlloader.cmo -dllib -lsdlloaderstub -cclib -lsdlloaderstub -cclib -lSDL -cclib -lSDL_image +ocamlmklib -v -o sdlmixer -oc sdlmixerstub sdlmixer.cmo -lSDL -lSDL_mixer +ocamlc.opt -c -g sdlgfx.ml ++ /usr/bin/ocamlc -a -o sdlmixer.cma sdlmixer.cmo -dllib -lsdlmixerstub -cclib -lsdlmixerstub -cclib -lSDL -cclib -lSDL_mixer ocamlmklib -v -o sdl -oc sdlstub sdl.cmx sdlcdrom.cmx sdltimer.cmx sdljoystick.cmx sdlkey.cmx sdlmouse.cmx sdlevent.cmx sdlvideo.cmx sdlwm.cmx sdlgl.cmx -lSDL -+ /usr/bin/ocamlopt -a -o sdlgfx.cmxa sdlgfx.cmx -cclib -lsdlgfxstub -cclib -lSDL -cclib -lSDL_gfx + /usr/bin/ocamlopt -a -o sdl.cmxa sdl.cmx sdlcdrom.cmx sdltimer.cmx sdljoystick.cmx sdlkey.cmx sdlmouse.cmx sdlevent.cmx sdlvideo.cmx sdlwm.cmx sdlgl.cmx -cclib -lsdlstub -cclib -lSDL -+ /usr/bin/ocamlopt -a -o sdlloader.cmxa sdlloader.cmx -cclib -lsdlloaderstub -cclib -lSDL -cclib -lSDL_image -+ x86_64-linux-gnu-ar rcs ./libsdlloaderstub.a sdlloader_stub.o ocamlmklib -v -o sdlttf -oc sdlttfstub sdlttf.cmx -lSDL -lSDL_ttf + /usr/bin/ocamlopt -a -o sdlttf.cmxa sdlttf.cmx -cclib -lsdlttfstub -cclib -lSDL -cclib -lSDL_ttf +ocamlmklib -v -o sdlloader -oc sdlloaderstub sdlloader.cmx -lSDL -lSDL_image ++ /usr/bin/ocamlopt -a -o sdlloader.cmxa sdlloader.cmx -cclib -lsdlloaderstub -cclib -lSDL -cclib -lSDL_image +ocamlmklib -v -o sdlgfx -oc sdlgfxstub sdlgfx.cmo -lSDL -lSDL_gfx +ocamlmklib -v -o sdlmixer -oc sdlmixerstub sdlmixer.cmx -lSDL -lSDL_mixer ++ /usr/bin/ocamlc -a -o sdlgfx.cma sdlgfx.cmo -dllib -lsdlgfxstub -cclib -lsdlgfxstub -cclib -lSDL -cclib -lSDL_gfx ++ /usr/bin/ocamlopt -a -o sdlmixer.cmxa sdlmixer.cmx -cclib -lsdlmixerstub -cclib -lSDL -cclib -lSDL_mixer +ocamlmklib -v -o sdlgfx -oc sdlgfxstub sdlgfx.cmx -lSDL -lSDL_gfx ++ /usr/bin/ocamlopt -a -o sdlgfx.cmxa sdlgfx.cmx -cclib -lsdlgfxstub -cclib -lSDL -cclib -lSDL_gfx ocamlmklib -v -o sdlttf -oc sdlttfstub sdlttf_stub.o -lSDL -lSDL_ttf + x86_64-linux-gnu-gcc -shared -Wl,-z,relro -Wl,-z,now -Wl,-z,relro -Wl,-z,now -o ./dllsdlttfstub.so sdlttf_stub.o -lSDL -lSDL_ttf ocamlmklib -v -o sdlmixer -oc sdlmixerstub sdlmixer_stub.o -lSDL -lSDL_mixer @@ -2817,9 +2853,9 @@ dpkg-gencontrol: warning: Depends field of package libsdl-ocaml-dev: substitution variable ${shlibs:Depends} used, but is not defined dh_md5sums dh_builddeb -dpkg-deb: building package 'libsdl-ocaml-dev' in '../libsdl-ocaml-dev_0.9.1-4_amd64.deb'. -dpkg-deb: building package 'libsdl-ocaml-dbgsym' in '../libsdl-ocaml-dbgsym_0.9.1-4_amd64.deb'. dpkg-deb: building package 'libsdl-ocaml' in '../libsdl-ocaml_0.9.1-4_amd64.deb'. +dpkg-deb: building package 'libsdl-ocaml-dbgsym' in '../libsdl-ocaml-dbgsym_0.9.1-4_amd64.deb'. +dpkg-deb: building package 'libsdl-ocaml-dev' in '../libsdl-ocaml-dev_0.9.1-4_amd64.deb'. dpkg-genbuildinfo --build=binary -O../ocamlsdl_0.9.1-4_amd64.buildinfo dpkg-genchanges --build=binary -O../ocamlsdl_0.9.1-4_amd64.changes dpkg-genchanges: info: binary-only upload (no source code included) @@ -2827,12 +2863,14 @@ dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: not including original source code in upload I: copying local configuration +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/B01_cleanup starting +I: user script /srv/workspace/pbuilder/2258299/tmp/hooks/B01_cleanup finished I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env -I: removing directory /srv/workspace/pbuilder/2542098 and its subdirectories -I: Current time: Mon Jun 30 12:19:12 -12 2025 -I: pbuilder-time-stamp: 1751329152 +I: removing directory /srv/workspace/pbuilder/2258299 and its subdirectories +I: Current time: Wed May 29 08:01:30 +14 2024 +I: pbuilder-time-stamp: 1716919290