qb64/source/global/version.bas

DIM SHARED Version AS STRING
DIM SHARED DevChannel AS STRING
DIM SHARED AutoBuildMsg AS STRING

Version$ = "1.5"
DevChannel$ = "Stable Release"
IF _FILEEXISTS("internal/version.txt") THEN
    versionfile = FREEFILE
    OPEN "internal/version.txt" FOR INPUT AS #versionfile
    LINE INPUT #versionfile, AutoBuildMsg
    AutoBuildMsg = LEFT$(_TRIM$(AutoBuildMsg), 16) 'From git 1234567
    IF LEFT$(AutoBuildMsg, 9) <> "From git " THEN AutoBuildMsg = ""
    CLOSE #versionfile
END IF
(Automated push) Update internal/source/* from qb64.bas 2015-08-02 12:12:44 +00:00			`DIM SHARED Version AS STRING`
Adds commit number, if available, to error reports. 2021-02-06 18:04:07 +00:00			`DIM SHARED DevChannel AS STRING`
Remove SUB sorting in the SUBs dialog. 2017-01-21 00:56:50 +00:00			`DIM SHARED AutoBuildMsg AS STRING`
Move commid id outside qb64 source 2018-11-02 09:17:33 +00:00
Begins v1.5 development. 2020-02-13 15:55:01 +00:00			`Version$ = "1.5"`
Updates help files and version info for release. 2021-02-28 14:47:33 +00:00			`DevChannel$ = "Stable Release"`
Move commid id outside qb64 source 2018-11-02 09:17:33 +00:00			`IF _FILEEXISTS("internal/version.txt") THEN`
			`versionfile = FREEFILE`
			`OPEN "internal/version.txt" FOR INPUT AS #versionfile`
			`LINE INPUT #versionfile, AutoBuildMsg`
Adds commit number, if available, to error reports. 2021-02-06 18:04:07 +00:00			`AutoBuildMsg = LEFT$(_TRIM$(AutoBuildMsg), 16) 'From git 1234567`
Adds version number to status bar. Also: Allows clicking the status bar Version and Line number to open the About and the "Go to line" dialogs. 2021-01-18 21:22:00 +00:00			`IF LEFT$(AutoBuildMsg, 9) <> "From git " THEN AutoBuildMsg = ""`
Move commid id outside qb64 source 2018-11-02 09:17:33 +00:00			`CLOSE #versionfile`
			`END IF`