[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
- To: (BUG LISP) at MIT-MC
- From: RWK at MIT-MC (Robert W. Kerns)
- Date: Sat, 16 Dec 78 23:57:00 GMT
- Original-date: 16 DEC 1978 1857-EST
(DEFUN FOO-SFA (SELF OP DATA)
(CASEQ OP (WHICH-OPERATIONS '(CHARPOS TYO))
(T (FORMAT T '|~&Operation = ~S, Data = ~S~&| OP DATA)
0))) ;need to return a fixnum
Operation = CHARPOS, DATA = #SFA-|FOO|-234153
Barf. It should probably pass in NIL as the third argument if there's no
second argument to the CHARPOS.
Also, if you don't return a fixnum, it complains about "Wrong type argument".
This is clearly the wrong error message from the user's point of view.
Probably something like "Illegal return value" would make more sense.