http://www.ousob.com --- Legacy Redefined #include <dos.h> #include <extend50.h> CLIPPER b_fsize() { unsigned notfound; char *p_ptr = _parc(1); struct find_t file_info; if( !PCOUNT || !ISCHAR(1) ) { _retnl((long)0); } notfound = _dos_findfirst(p_ptr, _A_NORMAL, &file_info); if( notfound ) { printf("\x7"); _retnl((long)0); } _retnl((long)file_info.size); }