Revision: 6289 Author: ek.kato Date: Thu Mar 25 01:57:13 2010 Log: * test/uim-test-utils-new.scm (uim-sh-read-block) : Workaround not to get incorrect results.
http://code.google.com/p/uim/source/detail?r=6289 Modified: /trunk/test/uim-test-utils-new.scm ======================================= --- /trunk/test/uim-test-utils-new.scm Sun Mar 22 06:28:08 2009 +++ /trunk/test/uim-test-utils-new.scm Thu Mar 25 01:57:13 2010 @@ -86,6 +86,8 @@ (block (read-block 4096 in)) ((not (eof-object? block)))) (display block out) + (if (not (char-ready? in)) + (sys-nanosleep 1000000)) ;; 0.001 sec (loop (uim-sh-select in 1)))))))) (if (string-prefix? "Error:" result) (error (string-trim-both result)) To unsubscribe from this group, send email to uim-commit+unsubscribegooglegroups.com or reply to this email with the words "REMOVE ME" as the subject.
