aboutsummaryrefslogtreecommitdiff
path: root/gnu/installer/tests.scm
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2022-11-24 10:02:51 +0200
committerEfraim Flashner <efraim@flashner.co.il>2022-11-24 22:22:38 +0200
commit255450bed2b24b9dd21745e2675aa0ecf38a2a79 (patch)
tree20742c20ddf4574f9af182201b8d740b6178f448 /gnu/installer/tests.scm
parent564dcaa1fa06254aeedb0934b4f3bd1c26f9f53c (diff)
downloadguix-255450bed2b24b9dd21745e2675aa0ecf38a2a79.tar.gz
guix-255450bed2b24b9dd21745e2675aa0ecf38a2a79.zip
gnu: arm-trusted-firmware: Update to 2.8.
* gnu/packages/firmware.scm (make-arm-trusted-firmware): Update to 2.8. [arguments]: Remove trailing #t from phases. Clean up regexes.
Diffstat (limited to 'gnu/installer/tests.scm')
0 files changed, 0 insertions, 0 deletions
w exceptions within the workers and make sure they ;; remain alive. (test-equal "exceptions" 4242 (let* ((pool (make-pool 10)) (result 0) (1+! (let ((lock (make-mutex))) (lambda () (with-mutex lock (set! result (+ result 1))))))) (let loop ((i 10)) (unless (zero? i) (pool-enqueue! pool (lambda () (throw 'whatever))) (loop (- i 1)))) (let loop ((i 4242)) (unless (zero? i) (pool-enqueue! pool 1+!) (loop (- i 1)))) (let poll () (unless (pool-idle? pool) (pk 'busy result) (sleep 1) (poll))) result)) (test-end)