fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-06-03 12:30 UTC+0300 Alexander Kresin <alex at belacy.belgorod.su>

Browse Source 
* utils/hbformat/hbformat.prg
    ! Warning fixed.
This commit is contained in:
Alexander S.Kresin
2009-06-03 08:31:57 +00:00
parent 387c6f50aa
commit c6e41bf2ba
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -17,6 +17,10 @@
past entries belonging to these authors: Viktor Szakats.
*/
2009-06-03 12:30 UTC+0300 Alexander Kresin <alex at belacy.belgorod.su>
* utils/hbformat/hbformat.prg
! Warning fixed.
2009-06-03 11:25 UTC+0300 Alexander Kresin <alex at belacy.belgorod.su>
* utils/hbformat/hbformat.prg
! Bug fixed.

2
harbour/utils/hbformat/hbformat.prg
View File

@@ -352,7 +352,7 @@ METHOD Reformat( aFile ) CLASS CODEFORMAT
LOCAL i, iDelta := 0, nLen := Len( aFile ), cToken1, cToken2, nLenToken, nPos
LOCAL nPosSep, cLine, cLineAll, nLineSegment
LOCAL nContrState, nIndent, nDeep := 0, aDeep := {}
LOCAL lPragmaDump := .F. , lClass := .F. , lComment := .F. , nPosComment := 0, lContinue := .F.
LOCAL lPragmaDump := .F. , lClass := .F. , lComment := .F. , nPosComment, lContinue := .F.
LOCAL nStatePrev, nState := 0
PRIVATE cFunctions := Upper( ::cFunctions )