projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add test for my commit 0e8649... of last week
[sbcl.git]
/
tests
/
compiler.pure.lisp
diff --git
a/tests/compiler.pure.lisp
b/tests/compiler.pure.lisp
index
7002c7c
..
4ef01f1
100644
(file)
--- a/
tests/compiler.pure.lisp
+++ b/
tests/compiler.pure.lisp
@@
-4935,3
+4935,8
@@
(typep x '(member 1 3 15)))))
`(function ((or (integer 1 1) (integer 3 3)))
(values (member t) &optional)))))
(typep x '(member 1 3 15)))))
`(function ((or (integer 1 1) (integer 3 3)))
(values (member t) &optional)))))
+
+(with-test (:name :quietly-row-major-index-no-dimensions)
+ (assert (handler-case
+ (compile nil `(lambda (x) (array-row-major-index x)))
+ (warning () nil))))