From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Philipp Stephani
+=C2=A0 (let ((descr (should-error (mod-test-sum 1 2 3))))
+=C2=A0 =C2=A0 (should (eq (car descr) 'wrong-number-of-arguments))
=
+=C2=A0 =C2=A0 (should (stringp (nth 1 descr)))
+=C2=A0 =C2=A0 (should (eq 0
+=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 (string-match &quo= t;#<module function at \\(0x\\)?[0-9a-fA-F]+>"
+=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 (nth 1 descr))))
+=C2=A0 =C2=A0 (should (=3D (nth 2 descr) 3))))