Re: IN on SFA'S

[EB@MIT-AI]

    "D) IN
        The value returned should be a fixnum that is the next binary value in
     the input stream.  The argument is the EOF value."

Behavior from LISP:

(setq sfa (sfa-create '(lambda (sfa op arg)
			  (cond ((eq op 'which-operations) '(in))
				(t arg))) ;; i.e. IN ==> EOF always
		      0 'foo))
(in sfa)

;NIL NON-FIXNUM VALUE