Files
harbour-core/harbour/tests/working/copyfile.prg

14 lines
206 B
Plaintext

//
// $Id$
//
FUNCTION Main()
// ? "1", __copyfile("COPYFROM.TXT")
? "2", __copyfile("COPYFROM.TXT", "COPYTO.TXT")
? "3", __copyfile("C.PRG", "B.PRG")
? "4", __copyfile("COPYFROM.TXT", "..")
RETURN NIL