Author: psmith Date: Tue Feb 6 20:17:03 2007 New Revision: 75
Modified: branches/home/psmith/restructure/src/statemachine/state-machine.lisp Log: Removed close con in sm if process-packet returns null (is allowed)
Modified: branches/home/psmith/restructure/src/statemachine/state-machine.lisp ============================================================================== --- branches/home/psmith/restructure/src/statemachine/state-machine.lisp (original) +++ branches/home/psmith/restructure/src/statemachine/state-machine.lisp Tue Feb 6 20:17:03 2007 @@ -65,8 +65,7 @@ (error 'not-implemented-yet-read-resize-failure)))))) (format-log t "state-machine::process-read - incoming packet: ~A~%" incoming-packet) (when incoming-packet - (when (not (process-incoming-packet sm incoming-packet)) - (close-sm sm)))))) + (process-incoming-packet sm incoming-packet)))))
;The connection is write ready. ;See if theres anything ready to be written in the SM