common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

Adjust a test.

Browse source
This commit is contained in:
Stas Boukarev 2021-09-28 00:06:28 +03:00
parent 31baf047ec
commit 2471368915
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/compiler-2.pure.lisp
View file

@ -3355,7 +3355,7 @@
-913097464 -913097464
5))) 5)))
39))))) 39)))))
'(values (or (integer -21 -21) (integer 0 0)) (integer -38 0) &optional))) '(values (or (integer -21 -20) bit) (integer -38 0) &optional)))
(assert (assert
(equal (caddr (equal (caddr
(sb-kernel:%simple-fun-type (sb-kernel:%simple-fun-type
@ -3369,7 +3369,7 @@
913097464 913097464
5))) 5)))
39))))) 39)))))
'(values (or (integer 337 337) (integer 22 22)) (integer -38 -1) &optional)))) '(values (or (integer 21 22) (integer 336 337)) (integer -38 0) &optional))))
(with-test (:name :boundp-ir2-optimizer) (with-test (:name :boundp-ir2-optimizer)
(checked-compile-and-assert (checked-compile-and-assert