Skip to content

Commit

Permalink
Format public BAS sources
Browse files Browse the repository at this point in the history
Formatted:
- qb64pe/internal/support/**
- qb64pe/source/**
Not formatted:
- qb64pe/tests/** (not published)
  • Loading branch information
RhoSigma-QB64 committed Oct 12, 2024
1 parent 6d07140 commit c8379ec
Show file tree
Hide file tree
Showing 17 changed files with 5,707 additions and 5,696 deletions.
1,129 changes: 565 additions & 564 deletions internal/support/addprefix/addprefix.bas

Large diffs are not rendered by default.

1 change: 1 addition & 0 deletions internal/support/converter/QB45BIN.bas
Original file line number Diff line number Diff line change
Expand Up @@ -3228,3 +3228,4 @@ FUNCTION ValidateStackTag (RuleID AS INTEGER, TagTxt AS STRING, OffsetSP AS INTE


END FUNCTION

1 change: 1 addition & 0 deletions internal/support/vwatch/vwatch.bm
Original file line number Diff line number Diff line change
Expand Up @@ -879,3 +879,4 @@ SUB vwatch (globalVariables AS _OFFSET, localVariables AS _OFFSET)
END SELECT
RETURN
END SUB

1 change: 1 addition & 0 deletions internal/support/vwatch/vwatch_stub.bm
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
SUB vwatch ()
END SUB

2 changes: 1 addition & 1 deletion source/ide/config/cfg_methods.bas
Original file line number Diff line number Diff line change
Expand Up @@ -53,7 +53,7 @@ SUB CopyFromOther
END IF
'copying autosave & undo file(s) makes not much sense
ELSE
IF _MESSAGEBOX("QB64-PE IDE", "No qb64pe executable found, so that seems not to be a QB64-PE installation, select another folder?", "yesno", "warning" ) = 1 GOTO cfoAgain
IF _MESSAGEBOX("QB64-PE IDE", "No qb64pe executable found, so that seems not to be a QB64-PE installation, select another folder?", "yesno", "warning") = 1 GOTO cfoAgain
END IF
END IF
QB64_uptime# = TIMER(0.001) 'reinit to avoid startup resize events going wild
Expand Down
4 changes: 2 additions & 2 deletions source/ide/file_converters.bas
Original file line number Diff line number Diff line change
Expand Up @@ -104,7 +104,7 @@ FUNCTION BinaryFormatCheck% (pathToCheck$, pathSepToCheck$, fileToCheck$)
END SELECT
END FUNCTION

FUNCTION OfferNoprefixConversion(file$)
FUNCTION OfferNoprefixConversion% (file$)
what$ = ideyesnobox("$NOPREFIX", "This program uses the $NOPREFIX directive which is unsupported.\n\nQB64PE can automatically convert this file and any included files to\nremove $NOPREFIX. Backups of all files will be made.\n\nConvert this program?")
IF what$ <> "Y" THEN EXIT FUNCTION

Expand All @@ -130,7 +130,7 @@ FUNCTION OfferNoprefixConversion(file$)

convertLine$ = convertUtility$ + " " + QuotedFilename$(file$)
IF _SHELLHIDE(convertLine$) = 0 _ANDALSO OpenFile$(file$) <> "C" THEN
OfferNoprefixConversion = -1
OfferNoprefixConversion% = -1
ELSE
clearStatusWindow 0
dummy = DarkenFGBG(0)
Expand Down
208 changes: 104 additions & 104 deletions source/ide/ide_methods.bas

Large diffs are not rendered by default.

4 changes: 2 additions & 2 deletions source/ide/wiki/wiki_methods.bas
Original file line number Diff line number Diff line change
Expand Up @@ -1158,8 +1158,8 @@ FUNCTION wikiDLPage$ (url$, timeout#)
IF ch& = 0 AND LCASE$(LEFT$(wik$, 8)) = "https://" THEN
IF _SHELLHIDE("curl --version >NUL") <> 0 THEN
'no external curl available (see notes below)
IF _MESSAGEBOX("QB64-PE Help", "Can't make secure connection (https:) to Wiki, shall the IDE use unsecure (http:) instead?", "yesno", "warning" ) = 1 THEN
IF _MESSAGEBOX("QB64-PE Help", "Do you wanna save your choice permanently for the future?", "yesno", "question" ) = 1 THEN
IF _MESSAGEBOX("QB64-PE Help", "Can't make secure connection (https:) to Wiki, shall the IDE use unsecure (http:) instead?", "yesno", "warning") = 1 THEN
IF _MESSAGEBOX("QB64-PE Help", "Do you wanna save your choice permanently for the future?", "yesno", "question") = 1 THEN
wikiBaseAddress$ = "http://" + MID$(wikiBaseAddress$, 9)
WriteConfigSetting generalSettingsSection$, "WikiBaseAddress", wikiBaseAddress$
END IF
Expand Down
Loading

0 comments on commit c8379ec

Please sign in to comment.