- cmucl-cvs - mailman3.common-lisp.net

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Put debugging stuff for osx:install at the beginning of the script
by Raymond Toy (＠rtoy) 05 Aug '24

05 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 07f31438 by Raymond Toy at 2024-08-05T11:21:11-07:00 Put debugging stuff for osx:install at the beginning of the script - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -154,12 +154,12 @@ osx:install: paths: - snapshot/ script: - - /opt/local/bin/curl -o cmucl-$version-darwin.tar.bz2 $download_url/cmucl-$version-darwin.tar.bz2 - - mkdir snapshot - - (cd snapshot; tar xjf ../cmucl-$version-darwin.tar.bz2) - echo PATH = $PATH - ls -F /usr/local/bin - type -all gitlab-runner + - /opt/local/bin/curl -o cmucl-$version-darwin.tar.bz2 $download_url/cmucl-$version-darwin.tar.bz2 + - mkdir snapshot + - (cd snapshot; tar xjf ../cmucl-$version-darwin.tar.bz2) osx:build: stage: build View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/07f31438528e9d910932309… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/07f31438528e9d910932309… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Add test stages for OpenSUSE
by Raymond Toy (＠rtoy) 05 Aug '24

05 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 0b5e55e9 by Raymond Toy at 2024-08-05T09:20:42-07:00 Add test stages for OpenSUSE - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -299,3 +299,32 @@ opensuse:build: # describe return something that make-dist.sh doesn't like. - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 +opensuse:test: + stage: test + tags: + - linux + artifacts: + paths: + - ansi-test/test.out + - test.log + needs: + # Needs artifacts from build (dist/) + - job: opensuse:build + artifacts: true + script: + - bin/run-unit-tests.sh -l dist/bin/lisp 2>&1 | tee test.log + +opensuse:ansi-test: + stage: ansi-test + tags: + - linux + artifacts: + paths: + - ansi-test/test.out + needs: + # Needs artifacts from build (dist/) + - job: opensuse:build + artifacts: true + script: + - bin/run-ansi-tests.sh -l dist/bin/lisp + View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/0b5e55e9d3195c8d93020bb… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/0b5e55e9d3195c8d93020bb… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Use correct dependency on opensuse:install
by Raymond Toy (＠rtoy) 04 Aug '24

04 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 60af3248 by Raymond Toy at 2024-08-04T15:11:17-07:00 Use correct dependency on opensuse:install - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -283,7 +283,7 @@ opensuse:build: - linux-3/*.log - linux-4/ needs: - - job: linux:opensuse + - job: opensuse:install artifacts: true script: # Do cross compile first View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/60af324892714f0ae7912e0… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/60af324892714f0ae7912e0… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Re-enable opensuse jobs
by Raymond Toy (＠rtoy) 04 Aug '24

04 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 2a666eba by Raymond Toy at 2024-08-04T15:07:49-07:00 Re-enable opensuse jobs Update the dependencies that were previously incorrect. Decided to do it this way so that the OpenSUSE runner is separate from the other runners. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -259,43 +259,43 @@ linux:static-analyzer: - make -C linux-4/lisp clean - make -C linux-4/lisp CFLAGS=-fanalyzer > analyzer.log 2>&1 -#opensuse:install: -# stage: install -# tags: -# - opensus -# artifacts: -# paths: -# - snapshot/ -# script: -# - wget -nv $download_url/cmucl-$version-linux.tar.bz2 -# - wget -nv $download_url/cmucl-$version-linux.extra.tar.bz2 -# - mkdir snapshot -# - (cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2) -# -#opensuse:build: -# stage: build -# tags: -# - opensuse -# artifacts: -# paths: -# - dist/ -# - linux-2/*.log -# - linux-3/*.log -# - linux-4/ -# needs: -# - job: linux:install -# artifacts: true -# script: -# # Do cross compile first -# #- bin/create-target.sh xtarget x86_linux_clang -# #- bin/create-target.sh xcross x86_linux_clang -# #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp -# # Regular build using the cross-compiled result or snapshot. The -# # analyzer job requires gcc, so make sure we build with gcc here -# # instead of clang. -# - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp -# # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp -# # Use -V to specify the version in case some tag makes git -# # describe return something that make-dist.sh doesn't like. -# - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 +opensuse:install: + stage: install + tags: + - opensuse + artifacts: + paths: + - snapshot/ + script: + - wget -nv $download_url/cmucl-$version-linux.tar.bz2 + - wget -nv $download_url/cmucl-$version-linux.extra.tar.bz2 + - mkdir snapshot + - (cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2) + +opensuse:build: + stage: build + tags: + - opensuse + artifacts: + paths: + - dist/ + - linux-2/*.log + - linux-3/*.log + - linux-4/ + needs: + - job: linux:opensuse + artifacts: true + script: + # Do cross compile first + #- bin/create-target.sh xtarget x86_linux_clang + #- bin/create-target.sh xcross x86_linux_clang + #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp + # Regular build using the cross-compiled result or snapshot. The + # analyzer job requires gcc, so make sure we build with gcc here + # instead of clang. + - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp + # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp + # Use -V to specify the version in case some tag makes git + # describe return something that make-dist.sh doesn't like. + - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/2a666eba78b9580d3003210… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/2a666eba78b9580d3003210… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Comment out opensuse jobs; use tags for runner instead
by Raymond Toy (＠rtoy) 04 Aug '24

04 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 14f56cee by Raymond Toy at 2024-08-04T13:32:40-07:00 Comment out opensuse jobs; use tags for runner instead Another attempt. For the OpenSUSE runner, add "linux" as a tag so that this runner will run jobs when the linux tag is set. Hopefully. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -259,43 +259,43 @@ linux:static-analyzer: - make -C linux-4/lisp clean - make -C linux-4/lisp CFLAGS=-fanalyzer > analyzer.log 2>&1 -opensuse:install: - stage: install - tags: - - opensus - artifacts: - paths: - - snapshot/ - script: - - wget -nv $download_url/cmucl-$version-linux.tar.bz2 - - wget -nv $download_url/cmucl-$version-linux.extra.tar.bz2 - - mkdir snapshot - - (cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2) - -opensuse:build: - stage: build - tags: - - opensuse - artifacts: - paths: - - dist/ - - linux-2/*.log - - linux-3/*.log - - linux-4/ - needs: - - job: linux:install - artifacts: true - script: - # Do cross compile first - #- bin/create-target.sh xtarget x86_linux_clang - #- bin/create-target.sh xcross x86_linux_clang - #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp - # Regular build using the cross-compiled result or snapshot. The - # analyzer job requires gcc, so make sure we build with gcc here - # instead of clang. - - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp - # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp - # Use -V to specify the version in case some tag makes git - # describe return something that make-dist.sh doesn't like. - - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 +#opensuse:install: +# stage: install +# tags: +# - opensus +# artifacts: +# paths: +# - snapshot/ +# script: +# - wget -nv $download_url/cmucl-$version-linux.tar.bz2 +# - wget -nv $download_url/cmucl-$version-linux.extra.tar.bz2 +# - mkdir snapshot +# - (cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2) +# +#opensuse:build: +# stage: build +# tags: +# - opensuse +# artifacts: +# paths: +# - dist/ +# - linux-2/*.log +# - linux-3/*.log +# - linux-4/ +# needs: +# - job: linux:install +# artifacts: true +# script: +# # Do cross compile first +# #- bin/create-target.sh xtarget x86_linux_clang +# #- bin/create-target.sh xcross x86_linux_clang +# #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp +# # Regular build using the cross-compiled result or snapshot. The +# # analyzer job requires gcc, so make sure we build with gcc here +# # instead of clang. +# - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp +# # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp +# # Use -V to specify the version in case some tag makes git +# # describe return something that make-dist.sh doesn't like. +# - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/14f56cee49e267ae48e6a56… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/14f56cee49e267ae48e6a56… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-add-opensuse-runner] Add new OpenSUSE install and build jobs
by Raymond Toy (＠rtoy) 04 Aug '24

04 Aug '24

Raymond Toy pushed to branch rtoy-add-opensuse-runner at cmucl / cmucl Commits: 3e79a3ff by Raymond Toy at 2024-08-04T13:28:27-07:00 Add new OpenSUSE install and build jobs Previous attempt was wrong, so let's just add separate install and build jobs for OpenSUSE. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== @@ -19,7 +19,6 @@ linux:install: stage: install tags: - linux - - opensuse artifacts: paths: - snapshot/ @@ -33,7 +32,6 @@ linux:build: stage: build tags: - linux - - opensuse artifacts: paths: - dist/ @@ -260,3 +258,44 @@ linux:static-analyzer: # having the logs go to the console too. - make -C linux-4/lisp clean - make -C linux-4/lisp CFLAGS=-fanalyzer > analyzer.log 2>&1 + +opensuse:install: + stage: install + tags: + - opensus + artifacts: + paths: + - snapshot/ + script: + - wget -nv $download_url/cmucl-$version-linux.tar.bz2 + - wget -nv $download_url/cmucl-$version-linux.extra.tar.bz2 + - mkdir snapshot + - (cd snapshot; tar xjf ../cmucl-$version-linux.tar.bz2; tar xjf ../cmucl-$version-linux.extra.tar.bz2) + +opensuse:build: + stage: build + tags: + - opensuse + artifacts: + paths: + - dist/ + - linux-2/*.log + - linux-3/*.log + - linux-4/ + needs: + - job: linux:install + artifacts: true + script: + # Do cross compile first + #- bin/create-target.sh xtarget x86_linux_clang + #- bin/create-target.sh xcross x86_linux_clang + #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp + # Regular build using the cross-compiled result or snapshot. The + # analyzer job requires gcc, so make sure we build with gcc here + # instead of clang. + - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp + # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp + # Use -V to specify the version in case some tag makes git + # describe return something that make-dist.sh doesn't like. + - bin/make-dist.sh -V `git describe --dirty` -I dist linux-4 + View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/3e79a3ffacaac75841f4836… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/3e79a3ffacaac75841f4836… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl] Pushed new branch rtoy-add-opensuse-runner
by Raymond Toy (＠rtoy) 04 Aug '24

04 Aug '24

Raymond Toy pushed new branch rtoy-add-opensuse-runner at cmucl / cmucl -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/tree/rtoy-add-opensuse-runner You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][issue-306-lisp.c] 13 commits: Abort if make_var cannot allocate memory with malloc
by Raymond Toy (＠rtoy) 25 Jul '24

25 Jul '24

Raymond Toy pushed to branch issue-306-lisp.c at cmucl / cmucl Commits: 0319c582 by Carl Shapiro at 2024-04-28T12:05:17-07:00 Abort if make_var cannot allocate memory with malloc There are two calls to malloc in this function. Previously, just the first checked for an error. This change adds a similar check to the second call. - - - - - f4e19102 by Carl Shapiro at 2024-07-22T17:59:28-07:00 Add a .dir-locals.el file for Emacs This matches the settings in the .editorconfig file. - - - - - 1b169581 by Carl Shapiro at 2024-07-23T06:42:31+00:00 Merge branch 'dirlocalsel' into 'master' Add a .dir-locals.el file for Emacs See merge request cmucl/cmucl!228 - - - - - 1b3171cd by Carl Shapiro at 2024-07-25T07:12:17+00:00 Merge branch 'vars-c-unchecked-malloc' into 'master' Abort if make_var cannot allocate memory with malloc See merge request cmucl/cmucl!216 - - - - - 8e31e57e by Raymond Toy at 2024-07-25T13:15:44+00:00 Fix #342: Add CI to run static analyzer on C code - - - - - 4e53aac5 by Raymond Toy at 2024-07-25T13:15:50+00:00 Merge branch 'issue-342-add-ci-static-analyzer' into 'master' Fix #342: Add CI to run static analyzer on C code Closes #342 See merge request cmucl/cmucl!239 - - - - - b6a449dd by Raymond Toy at 2024-07-25T13:16:27+00:00 Fix #341: Update version features in cross-compile scripts - - - - - 5ad8c86e by Raymond Toy at 2024-07-25T13:16:29+00:00 Merge branch 'issue-341-update-version-feature-for-xcompile' into 'master' Fix #341: Update version features in cross-compile scripts Closes #341 See merge request cmucl/cmucl!238 - - - - - aabe67a0 by Raymond Toy at 2024-07-25T13:16:53+00:00 Fix #340: Use +ascii-limit+ in srctran.lisp - - - - - 8a2dbcb3 by Raymond Toy at 2024-07-25T13:16:57+00:00 Merge branch 'issue-340-srctran-use-ascii-limit' into 'master' Fix #340: Use +ascii-limit+ in srctran.lisp Closes #340 and #337 See merge request cmucl/cmucl!237 - - - - - a5e42f73 by Raymond Toy at 2024-07-25T14:58:09+00:00 Fix #336: Change declaration from "ignore" to "ignorable" - - - - - 76b67529 by Raymond Toy at 2024-07-25T14:58:12+00:00 Merge branch 'issue-336-3-standard-ignorable' into 'master' Fix #336: Change declaration from "ignore" to "ignorable" Closes #336 See merge request cmucl/cmucl!236 - - - - - c4488c0c by Raymond Toy at 2024-07-25T15:30:06-07:00 Merge branch 'master' into issue-306-lisp.c Mostly to get the CI analyzer job. - - - - - 11 changed files: - + .dir-locals.el - .gitlab-ci.yml - src/compiler/srctran.lisp - src/compiler/x86/call.lisp - src/lisp/vars.c - src/tools/cross-scripts/cross-x86-netbsd.lisp - src/tools/cross-scripts/cross-x86-osx-freebsd.lisp - src/tools/cross-scripts/cross-x86-osx-solaris.lisp - src/tools/cross-scripts/cross-x86-ppc-darwin.lisp - src/tools/cross-scripts/cross-x86-sparc.lisp - src/tools/cross-scripts/cross-x86-x86.lisp Changes: ===================================== .dir-locals.el ===================================== @@ -0,0 +1,6 @@ +((nil + (indent-tabs-mode . t) + (require-final-newline . t) + (tab-width . 8)) + (c-mode + (c-basic-offset . 4))) ===================================== .gitlab-ci.yml ===================================== @@ -10,6 +10,7 @@ stages: - test - ansi-test - benchmark + - analyze cache: @@ -36,7 +37,7 @@ linux:build: - dist/ - linux-2/*.log - linux-3/*.log - - linux-4/*.log + - linux-4/ needs: - job: linux:install artifacts: true @@ -45,8 +46,10 @@ linux:build: #- bin/create-target.sh xtarget x86_linux_clang #- bin/create-target.sh xcross x86_linux_clang #- bin/cross-build-world.sh -crl -B boot-2020-04-1 xtarget xcross src/tools/cross-scripts/cross-x86-x86.lisp snapshot/bin/lisp - # Regular build using the cross-compiled result or snapshot - - bin/build.sh $bootstrap -R -C "x86_linux_clang" -o snapshot/bin/lisp + # Regular build using the cross-compiled result or snapshot. The + # analyzer job requires gcc, so make sure we build with gcc here + # instead of clang. + - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp # - bin/build.sh $bootstrap -R -C "x86_linux" -o snapshot/bin/lisp # Use -V to specify the version in case some tag makes git # describe return something that make-dist.sh doesn't like. @@ -62,6 +65,8 @@ linux:cross-build: - linux-2/*.log - linux-3/*.log - linux-4/*.log + # The lisp directory is needed for the static analyzer job. + - linux-4/lisp needs: # Normally need the linux:install stage to get the compiler to @@ -232,3 +237,24 @@ osx:benchmark: - CMUCL=../../snapshot/bin/lisp ./run-cmucl.sh - CMUCL=../../dist/bin/lisp ./run-cmucl.sh - ../../snapshot/bin/lisp -load report + +# Optional job that runs the static analyzer. It needs the files from +# the linux-4 directory built in the linux:build job. +linux:static-analyzer: + stage: analyze + when: manual + tags: + - linux + artifacts: + paths: + - analyzer.log + needs: + - job: linux:build + artifacts: true + script: + # Analysis can generate huge amounts of output. For now just save + # the results to the log file instead of also having it go to the + # console. If someday there's less or no output, we can consider + # having the logs go to the console too. + - make -C linux-4/lisp clean + - make -C linux-4/lisp CFLAGS=-fanalyzer > analyzer.log 2>&1 ===================================== src/compiler/srctran.lisp ===================================== @@ -3313,8 +3313,8 @@ #+(and unicode (not unicode-bootstrap)) '(let* ((ac (char-code a)) (bc (char-code b))) - (if (and (<= ac #x7f) - (<= bc #x7f)) + (if (and (<= ac +ascii-limit+) + (<= bc +ascii-limit+)) ;; ASCII (let ((sum (logxor ac bc))) (or (zerop sum) ===================================== src/compiler/x86/call.lisp ===================================== @@ -49,7 +49,9 @@ ;;; No problems. ;#+nil (def-vm-support-routine make-return-pc-passing-location (standard) - (declare (ignore standard)) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. + (declare (ignorable standard)) (make-wired-tn (primitive-type-or-lose 'system-area-pointer *backend*) sap-stack-sc-number return-pc-save-offset)) ;;; @@ -77,7 +79,9 @@ ;;; No problems ;#+nil (def-vm-support-routine make-old-fp-passing-location (standard) - (declare (ignore standard)) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. + (declare (ignorable standard)) (make-wired-tn *fixnum-primitive-type* control-stack-sc-number ocfp-save-offset)) ;;; ===================================== src/lisp/vars.c ===================================== @@ -128,6 +128,10 @@ make_var(char *name, boolean perm) name = buffer; } var->name = (char *) malloc(strlen(name) + 1); + if (var->name == NULL) { + perror("malloc"); + exit(1); + } strcpy(var->name, name); var->clock = 0; var->permanent = perm; ===================================== src/tools/cross-scripts/cross-x86-netbsd.lisp ===================================== @@ -22,7 +22,7 @@ :conservative-float-type :hash-new :random-mt19937 - :cmu :cmu20 :cmu20a ; Version features + :cmu :cmu21 :cmu21e ; Version features :double-double ; double-double float support ) ;; Features to remove from current *features* here. Normally don't ===================================== src/tools/cross-scripts/cross-x86-osx-freebsd.lisp ===================================== @@ -26,7 +26,7 @@ :complex-fp-vops :hash-new :random-mt19937 - :cmu :cmu20 :cmu20b ; Version features + :cmu :cmu21 :cmu21e ; Version features :double-double ; double-double float support :linkage-table ===================================== src/tools/cross-scripts/cross-x86-osx-solaris.lisp ===================================== @@ -26,7 +26,7 @@ :complex-fp-vops :hash-new :random-mt19937 - :cmu :cmu20 :cmu20b ; Version features + :cmu :cmu21 :cmu21e ; Version features :double-double ; double-double float support :linkage-table ===================================== src/tools/cross-scripts/cross-x86-ppc-darwin.lisp ===================================== @@ -17,7 +17,7 @@ :darwin ; Darwin OS (Mac OS X) :bsd ; We're a BSD-type OS :cmu ; Announce this is CMUCL - :cmu20 :cmu20a ; (Mostly) current version identifier + :cmu21 :cmu21e ; (Mostly) current version identifier :gencgc ; Generational GC is supported on ppc. :relative-package-names :modular-arith ; Modular arithmetic ===================================== src/tools/cross-scripts/cross-x86-sparc.lisp ===================================== @@ -23,7 +23,7 @@ :hash-new :random-mt19937 ; MT-19937 generator :cmu ; Announce this is CMUCL - :cmu20 :cmu20b ; Current version identifier + :cmu21 :cmu21e ; Current version identifier :modular-arith ; Modular arithmetic :double-double ; Double-double float support :executable ===================================== src/tools/cross-scripts/cross-x86-x86.lisp ===================================== @@ -21,7 +21,7 @@ :conservative-float-type :hash-new :random-xoroshiro ; RNG - :cmu :cmu20 :cmu20a ; Version features + :cmu :cmu21 :cmu21e ; Version features :double-double ; double-double float support ) ;; Features to remove from current *features* here. Normally don't View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/97331203e14b0e88f482fe… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/97331203e14b0e88f482fe… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][master] 2 commits: Fix #336: Change declaration from "ignore" to "ignorable"
by Raymond Toy (＠rtoy) 25 Jul '24

25 Jul '24

Raymond Toy pushed to branch master at cmucl / cmucl Commits: a5e42f73 by Raymond Toy at 2024-07-25T14:58:09+00:00 Fix #336: Change declaration from "ignore" to "ignorable" - - - - - 76b67529 by Raymond Toy at 2024-07-25T14:58:12+00:00 Merge branch 'issue-336-3-standard-ignorable' into 'master' Fix #336: Change declaration from "ignore" to "ignorable" Closes #336 See merge request cmucl/cmucl!236 - - - - - 1 changed file: - src/compiler/x86/call.lisp Changes: ===================================== src/compiler/x86/call.lisp ===================================== @@ -49,7 +49,9 @@ ;;; No problems. ;#+nil (def-vm-support-routine make-return-pc-passing-location (standard) - (declare (ignore standard)) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. + (declare (ignorable standard)) (make-wired-tn (primitive-type-or-lose 'system-area-pointer *backend*) sap-stack-sc-number return-pc-save-offset)) ;;; @@ -77,7 +79,9 @@ ;;; No problems ;#+nil (def-vm-support-routine make-old-fp-passing-location (standard) - (declare (ignore standard)) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. + (declare (ignorable standard)) (make-wired-tn *fixnum-primitive-type* control-stack-sc-number ocfp-save-offset)) ;;; View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/8a2dbcb3f8b7262f186f55… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/8a2dbcb3f8b7262f186f55… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][issue-306-lisp.c] Clean up formatting of args of check_ptr
by Raymond Toy (＠rtoy) 25 Jul '24

25 Jul '24

Raymond Toy pushed to branch issue-306-lisp.c at cmucl / cmucl Commits: 97331203 by Raymond Toy at 2024-07-25T06:55:48-07:00 Clean up formatting of args of check_ptr - - - - - 1 changed file: - src/lisp/lisp.c Changes: ===================================== src/lisp/lisp.c ===================================== @@ -45,7 +45,7 @@ static void -check_ptr(const void* ptr, const char* msg) +check_ptr(const void *ptr, const char *msg) { if (ptr == NULL) { perror(msg); View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/97331203e14b0e88f482fe9… -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/97331203e14b0e88f482fe9… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0