From: SourceForge.net <no...@so...> - 2004-06-01 13:29:35
|
Bugs item #964268, was opened at 2004-06-01 09:29 Message generated for change (Tracker Item Submitted) made by Item Submitter You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=110894&aid=964268&group_id=10894 Category: 25. Channel System Group: development: 8.5a2 Status: Open Resolution: None Priority: 5 Submitted By: Don Porter (dgp) Assigned to: Andreas Kupries (andreas_kupries) Summary: new io.test faillures Initial Comment: ==== io-38.2 Tcl_SetChannelBufferSize, Tcl_GetChannelBufferSize FAILED ==== Contents of test case: set f [open $path(longfile) r] set l "" lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize 10000 lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize 1 lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize -1 lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize 0 lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize 100000 lappend l [fconfigure $f -buffersize] fconfigure $f -buffersize 10000000 lappend l [fconfigure $f -buffersize] close $f set l ---- Test generated error; Return code was: 1 ---- Return code should have been one of: 0 2 ---- errorInfo: bad value for -buffersize: must not be less than 10 or greater than 1Mbyte. while executing "fconfigure $f -buffersize 1" ("uplevel" body line 7) invoked from within "uplevel 1 $script" ---- errorCode: NONE ==== io-38.2 FAILED ==== io-39.11 Tcl_SetChannelOption, Tcl_GetChannelOption, buffer size FAILED ==== Contents of test case: file delete $path(test1) set f [open $path(test1) w] fconfigure $f -buffersize -10 set x [fconfigure $f -buffersize] close $f set x ---- Test generated error; Return code was: 1 ---- Return code should have been one of: 0 2 ---- errorInfo: bad value for -buffersize: must not be less than 10 or greater than 1Mbyte. while executing "fconfigure $f -buffersize -10" ("uplevel" body line 4) invoked from within "uplevel 1 $script" ---- errorCode: NONE ==== io-39.11 FAILED ==== io-39.12 Tcl_SetChannelOption, Tcl_GetChannelOption buffer size FAILED ==== Contents of test case: file delete $path(test1) set f [open $path(test1) w] fconfigure $f -buffersize 10000000 set x [fconfigure $f -buffersize] close $f set x ---- Test generated error; Return code was: 1 ---- Return code should have been one of: 0 2 ---- errorInfo: bad value for -buffersize: must not be less than 10 or greater than 1Mbyte. while executing "fconfigure $f -buffersize 10000000" ("uplevel" body line 4) invoked from within "uplevel 1 $script" ---- errorCode: NONE ==== io-39.12 FAILED ---------------------------------------------------------------------- You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=110894&aid=964268&group_id=10894 |