mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-08 07:55:14 +00:00
Fixes $VERSIONINFO. Closes #110.
Also: proper indenting after IgnoreWarnings was added.
This commit is contained in:
parent
9b3753b40c
commit
eb7adb7503
|
@ -20,4 +20,9 @@ BEGIN
|
||||||
VALUE "Comments","QB64 is a modern extended BASIC programming language that retains QB4.5/Qbasic compatibility and compiles native binaries for Windows, Linux and macOS.\0"
|
VALUE "Comments","QB64 is a modern extended BASIC programming language that retains QB4.5/Qbasic compatibility and compiles native binaries for Windows, Linux and macOS.\0"
|
||||||
END
|
END
|
||||||
END
|
END
|
||||||
|
|
||||||
|
BLOCK "VarFileInfo"
|
||||||
|
BEGIN
|
||||||
|
VALUE "Translation", 0x409, 0x04E4
|
||||||
|
END
|
||||||
END
|
END
|
||||||
|
|
|
@ -11978,6 +11978,10 @@ IF os$ = "WIN" THEN
|
||||||
PRINT #iconfilehandle, " VALUE " + QuotedFilename$("Web") + "," + QuotedFilename$(viWeb$ + "\0")
|
PRINT #iconfilehandle, " VALUE " + QuotedFilename$("Web") + "," + QuotedFilename$(viWeb$ + "\0")
|
||||||
PRINT #iconfilehandle, " END"
|
PRINT #iconfilehandle, " END"
|
||||||
PRINT #iconfilehandle, " END"
|
PRINT #iconfilehandle, " END"
|
||||||
|
PRINT #iconfilehandle, " BLOCK " + QuotedFilename$("VarFileInfo")
|
||||||
|
PRINT #iconfilehandle, " BEGIN"
|
||||||
|
PRINT #iconfilehandle, " VALUE " + QuotedFilename$("Translation") + ", 0x409, 0x04E4"
|
||||||
|
PRINT #iconfilehandle, " END"
|
||||||
PRINT #iconfilehandle, "END"
|
PRINT #iconfilehandle, "END"
|
||||||
CLOSE #iconfilehandle
|
CLOSE #iconfilehandle
|
||||||
END IF
|
END IF
|
||||||
|
@ -25201,7 +25205,7 @@ SUB addWarning (lineNumber AS LONG, text$)
|
||||||
warningListItems = warningListItems + 1
|
warningListItems = warningListItems + 1
|
||||||
IF warningListItems > UBOUND(warning$) THEN REDIM _PRESERVE warning$(warningListItems + 999)
|
IF warningListItems > UBOUND(warning$) THEN REDIM _PRESERVE warning$(warningListItems + 999)
|
||||||
warning$(warningListItems) = MKL$(lineNumber) + text$
|
warning$(warningListItems) = MKL$(lineNumber) + text$
|
||||||
end if
|
END IF
|
||||||
END SUB
|
END SUB
|
||||||
|
|
||||||
'$INCLUDE:'utilities\strings.bas'
|
'$INCLUDE:'utilities\strings.bas'
|
||||||
|
|
Loading…
Reference in a new issue