[REBOL] Re: Size?
From: rotenca:telvia:it at: 11-Dec-2004 16:49
Hi, list,
This is a solution which can work until 4GB file, to find the size of a
file. The file size, now, is a decimal value. Use it at your own risk:
is an hack which makes some assumptions on Rebol file size which no one
can assure.
info4G?: func [file][
file: info? file
if file/size < 0 [file/size: 2 ** 32 + to decimal! file/size]
file
]
>> probe info4g? %golost.txt
make object! [
size: 2149300000.0
date: 1-Nov-2002/16:37:12+1:00
type: 'file
]
