QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-06 21:00:25 +00:00
Code Issues Releases Wiki Activity

Merge branch 'QB64-Phoenix-Edition:main' into main

Browse source
This commit is contained in:
Samuel Gomes 2023-09-04 03:10:25 +05:30 committed by GitHub
parent 2a92e2197f 64f2384619
commit 36fa63c60a
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
source/utilities/file.bas
View file

@ -15,6 +15,7 @@ FUNCTION CopyFile& (sourceFile$, destFile$)
fileLength = LOF(sourceFileNo)
destFileNo = FREEFILE
OPEN destFile$ FOR OUTPUT AS #destFileNo: CLOSE #destFileNo 'create and blank any existing file with the dest name.
OPEN destFile$ FOR BINARY AS #destFileNo
IF E = 1 THEN GOTO errorCleanup