Files
harbour-core/harbour/tests/working/copyfile.prg
1999-06-27 23:10:39 +00:00

10 lines
191 B
Plaintext

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