http://www.ousob.com --- Legacy Redefined #include <io.h> #include <stdio.h> #include <extend50.h> CLIPPER b_rename() { if( !ISCHAR(1) || !ISCHAR(2) ){ _retl(0); return; } _retl( rename(_parc(1),_parc(2)) == 0 ? 1 : 0 ); }