World: r3wp

Gonna check Rambo.

Ahhhh, I see.  I just discovered something.

Looks like an empty string is about 16 bytes

Better becareful to size your buffer when using read-io.

It doesn't expand beyond a default of 15 characters unless you define 
it as such.

So in other words if you set your bufrer as just:

buffer: "" then you going to only get 15 chars back.

So instead you need to define it as large as needed:

Well, at least it doesn't overflow :)

buffer: make string! 1024

Yeah true Brian, and maybe that is why.

i give you a script i used to profile the ideal size of the buffer 
used with read-io to have the best perfs.
On my computer the best size for the buffer is 8ko or 16ko.

REBOL []
f: open/seek/binary %large.dta

foreach len [64 128 256 1024 2048 4096 8192 10240 16384 32768 65536 
131072] [

	f/state/index: 0		;*** Problème quand on emploie read-io :
					;*** apparement c'est un bug, par défaut l'index est à 1
					;*** du coup, le premier octet n'est jamais lu
	

 buff: make binary! len + 1	;*** Encore un bizarerie, si le buffer 
 a exactement
					;*** la taille voulue, read-io lit un octet de moins
	n: 0
	recycle
	t: now/time/precise

 while [0 < read-io f buff len] [n: n + 1 clear buff f/state/index: 
 f/state/index + len]
	print [len tab v: now/time/precise - t tab v / n tab n]
]

close f
halt

See your declaring the size of your buffer so wouldn't have seen 
the other problem.

you don't need the /binary switch with seek in 2.7.6

it is /binary by default.

i know

in fact it's depending of the type of the buffer

yeah that is true - which is very cool about REBOL.

i noticed too, that your buffer must be size of the requested size 
+ 1 byte, if not you get some errors

I copy data from a port using /seek and simply do-    to-block port-data 
and need no other conversion.

That is probably why it stopped at 15.

I think index was at 1

the index is zero based, don't forget

Nope - still reads just 15

Requested size + 1 or more bytes.

yeah I was checking empty buffer

did you try the profiler script ?

No, I'm in the middle of something else

I'll open another console  real quick

64   0:00    351909:41:29.709551615      0
128      0:00    351909:41:29.709551615      0
256      0:00:00.016     351909:41:29.709551615      0
1024     0:00    351909:41:29.709551615      0
2048     0:00    351909:41:29.709551615      0
4096     0:00    351909:41:29.709551615      0
8192     0:00    351909:41:29.709551615      0
10240    0:00    351909:41:29.709551615      0
16384    0:00    351909:41:29.709551615      0
32768    0:00    351909:41:29.709551615      0
65536    0:00    351909:41:29.709551615      0
131072   0:00    351909:41:29.709551615      0

pretty consistent

something is wrong

You need to print out the time to more precision.

you need to use a big file as data

Yeah I just pasted it

hold on

64   0:00:10.639     0:00:00.000020633   515625
128      0:00:05.444     0:00:00.000021116   257813
256      0:00:02.761     0:00:00.000021418   128907
1024     0:00:00.733     0:00:00.000022744   32227
2048     0:00:00.374     0:00:00.000023209   16114
4096     0:00:00.218     0:00:00.000027057   8057
8192     0:00:00.124     0:00:00.000030776   4029
10240    0:00:00.109     0:00:00.000033819   3223
16384    0:00:00.078     0:00:00.000038709   2015
32768    0:00:00.078     0:00:00.00007738    1008
65536    0:00:00.047     0:00:00.000093253   504
131072   0:00:00.063     0:00:00.00025   252
>>

Looks like 64k is a good value for you.

yeah it seems

but in fact, you should execute it several times, results can be 
different

Particularly on Windows.

in fact you can see that 16ko buffer would be a better choice (regarding 
to the first column)

(the third column)

you must do more tests

brb, i have to request some cigarettes and food

Steeve, I'm finding that copy/part using 'at on /seek is working 
at more speed for me.

you must have a special computer, it's not quiet logical and i have 
opposite results on my computer

s: now/precise
a: open/direct/binary %blah
idx: 0
a/state/index: 0
buff: make binary! 16

loop 100000 [read-io a buff 16 a/state/index: a/state/index + 16 
clear buff]
close a
t: now/precise
difference t s

my datafile is %blah

oh really ? ;-)