mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-05 00:40:26 +00:00
Console mode compilation (-c, -x) also save EXE to source folder, if set.
This commit is contained in:
parent
8f67d40330
commit
b7b6c760e1
|
@ -1148,6 +1148,13 @@ sourcefile$ = f$
|
|||
'derive name from sourcefile
|
||||
f$ = RemoveFileExtension$(f$)
|
||||
|
||||
path.exe$ = ""
|
||||
IF SaveExeWithSource THEN
|
||||
path.exe$ = getfilepath$(sourcefile$)
|
||||
IF RIGHT$(path.exe$, 1) <> pathsep$ then path.exe$ = path.exe$ + pathsep$
|
||||
END IF
|
||||
IF path.exe$ = "" THEN path.exe$ = "..\..\"
|
||||
|
||||
FOR x = LEN(f$) TO 1 STEP -1
|
||||
a$ = MID$(f$, x, 1)
|
||||
IF a$ = "/" OR a$ = "\" THEN
|
||||
|
|
Loading…
Reference in a new issue