Index: library/xotcl/apps/comm/get-regression-nb.xotcl =================================================================== diff -u -N -rf934951db464db1a6f39ac98290ecde17a466cd7 -r2a955681817e4db4776d7ae904babe8053c5ad74 --- library/xotcl/apps/comm/get-regression-nb.xotcl (.../get-regression-nb.xotcl) (revision f934951db464db1a6f39ac98290ecde17a466cd7) +++ library/xotcl/apps/comm/get-regression-nb.xotcl (.../get-regression-nb.xotcl) (revision 2a955681817e4db4776d7ae904babe8053c5ad74) @@ -246,13 +246,13 @@ # assert "$r getContentLength" 163840 # } set total 0 -proc parallelRequests-1.0 {urls} { - ParallelSink psink -httpVersion 1.0 -init -requests $urls +proc parallelRequests-1.0 {URLs} { + ParallelSink psink -httpVersion 1.0 -init -requests $URLs incr ::total [psink set totalbytes] psink destroy } -proc parallelRequests-1.1 {urls} { - ParallelSink psink -init -requests $urls +proc parallelRequests-1.1 {URLs} { + ParallelSink psink -init -requests $URLs incr ::total [psink set totalbytes] psink destroy }