Raymond Toy pushed to branch issue-460-ci-fails-if-unit-tests-do at cmucl / cmucl
Commits:
-
ef57f813
by Raymond Toy at 2025-12-18T16:29:42-08:00
2 changed files:
Changes:
| ... | ... | @@ -47,12 +47,19 @@ mkdir test-tmp |
| 47 | 47 | ln -s /bin/ls test-tmp/ls-link
|
| 48 | 48 | |
| 49 | 49 | # Set the timestamps on 64-bit-timestamp-2038.txt and
|
| 50 | -# 64-bit-timestamp-2106.txt. The time for the first file is a
|
|
| 51 | -# negative value for a 32-bit time_t. The second file won't fit in a
|
|
| 52 | -# 32-bit time_t value. It's ok if this doesn't work in general, as
|
|
| 53 | -# long as it works on Linux for the stat test in tests/os.lisp.
|
|
| 54 | -touch -d "1 April 2038" tests/resources/64-bit-timestamp-2038.txt
|
|
| 55 | -touch -d "1 April 2106" tests/resources/64-bit-timestamp-2106.txt
|
|
| 50 | +# 64-bit-timestamp-2106.txt, but only for OSes where we know this
|
|
| 51 | +# works. (This is so we don't an annoying error message from touch
|
|
| 52 | +# that doesn't accept the -d option, like MacOS 10.13.) The time for
|
|
| 53 | +# the first file is a negative value for a 32-bit time_t. The second
|
|
| 54 | +# file won't fit in a 32-bit time_t value. It's ok if this doesn't
|
|
| 55 | +# work in general, as long as it works on Linux for the stat test in
|
|
| 56 | +# tests/os.lisp.
|
|
| 57 | +case `uname -s` in
|
|
| 58 | + Linux)
|
|
| 59 | + touch -d "1 April 2038" tests/resources/64-bit-timestamp-2038.txt
|
|
| 60 | + touch -d "1 April 2106" tests/resources/64-bit-timestamp-2106.txt
|
|
| 61 | + ;;
|
|
| 62 | +esac
|
|
| 56 | 63 | |
| 57 | 64 | # Cleanup temp files and directories that we created during testing.
|
| 58 | 65 | function cleanup {
|
| ... | ... | @@ -51,6 +51,7 @@ |
| 51 | 51 | (assert-equal 2153718000 st-atime)
|
| 52 | 52 | (assert-equal 2153718000 st-mtime))))
|
| 53 | 53 | |
| 54 | +#+linux
|
|
| 54 | 55 | (define-test stat.64-bit-timestamp-2106
|
| 55 | 56 | (:tag :issues)
|
| 56 | 57 | (let ((test-file #.(merge-pathnames "resources/64-bit-timestamp-2106.txt"
|