Detect some uses of multiple-value-list in LOOP
[sbcl.git] / tests / bug-414.lisp
blobd57a30d1b8dec7b555f42fd2003f63a0eda2bda9
1 ;;; compiling and disassembling this used to give
2 ;;;
3 ;;; WARNING: bogus form-number in form! The source file has probably
4 ;;; been changed too much to cope with.
5 ;;;
6 ;;; but the symptoms have disappeared.
7 (defun bug-414 (x y z)
8 (declare (optimize debug))
9 (list x y z))