master: t
stassats via Sbcl-commits <[email protected]> Thu, 09 Jul 2026 18:10:21 +0000
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via acf8f1e89317b44e1db71487d43cc89a9dab63a6 (commit)
from 77215fb2f3e1765a9c26aee521be38f6e2f2260a (commit)
- Log -----------------------------------------------------------------
commit acf8f1e89317b44e1db71487d43cc89a9dab63a6
Author: Stas Boukarev <[email protected]>
Date: Thu Jul 9 20:30:46 2026 +0300
t
---
tests/arm64-codegen.impure.lisp | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/tests/arm64-codegen.impure.lisp b/tests/arm64-codegen.impure.lisp
index 942016144..a80c0a156 100644
--- a/tests/arm64-codegen.impure.lisp
+++ b/tests/arm64-codegen.impure.lisp
@@ -13,11 +13,13 @@
(look-for
(format nil ", LSL #~D]" left-shift)))
;; some line should have an LDR with an "extended" index
- (assert
- (= (count-if (lambda (line)
- (and (search "LDR" line) (search look-for line)))
- lines)
- 1)))))
+ (unless
+ (= (count-if (lambda (line)
+ (and (search "LDR" line) (search look-for line)))
+ lines)
+ 1)
+ (error "~{~a~%~}" lines)
+ ))))
(try 'unsigned-short 1)
(try 'unsigned-int 2)
(try 'unsigned-long 3)))
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL