Author: psmith Date: Sun Mar 18 19:27:10 2007 New Revision: 107

Modified: branches/home/psmith/restructure/src/io/async-fd.lisp Log: up max buffer size

Modified: branches/home/psmith/restructure/src/io/async-fd.lisp ============================================================================== --- branches/home/psmith/restructure/src/io/async-fd.lisp (original) +++ branches/home/psmith/restructure/src/io/async-fd.lisp Sun Mar 18 19:27:10 2007 @@ -168,7 +168,7 @@ (when close-pending (close-async-fd async-fd)))))

-(defconstant +MAX-BUFFER-SIZE-BYTES+ (* 1024 1024)) +(defconstant +MAX-BUFFER-SIZE-BYTES+ (* 1024 1024 15))

(defmacro realloc-buffer(async-fd accessor size) `(let ((buffer (,accessor ,async-fd)))