Pastey big file write test

include std/io.e
 
sequence r=repeat('X',5000) 
 
integer f=open("wtest.tmp","wb") 
?seek(f,4294967000) 
for i=1 to 1000000 do 
        puts(f,r) 
end for 
 
 
--size should be 9294967000