Strange error

[eliot (eliot handelman)]

Can anyone explain to me the source of this error? LOOP is from rascal;
I loaded it and did a save-system.

> (defun te2 (expr)
	 (loop for elt in expr do (format t "~s~%" elt))) 
TE2

> (te2)
Error: TE2 requires one argument,
       but only zero were supplied.
Error signalled by TE2.

Error: 8 is an illegal ihs index.
Error signalled by SYSTEM:UNIVERSAL-ERROR-HANDLER.

Broken at SYSTEM:UNIVERSAL-ERROR-HANDLER.