From 7cd8c31626559a30da472b7aed5a7c2898be5f4d Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Wed, 27 Oct 2021 14:38:35 +0000 Subject: [PATCH] extrasyn: Less hints and warnings git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8124 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/extrasyn/SyneditHighlighters/synhighlighterawk.pas | 2 +- .../extrasyn/SyneditHighlighters/synhighlighterhp48.pas | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/components/extrasyn/SyneditHighlighters/synhighlighterawk.pas b/components/extrasyn/SyneditHighlighters/synhighlighterawk.pas index 5a4bac63e..384bd9beb 100644 --- a/components/extrasyn/SyneditHighlighters/synhighlighterawk.pas +++ b/components/extrasyn/SyneditHighlighters/synhighlighterawk.pas @@ -287,7 +287,7 @@ procedure TSynAWKSyn.IdentProc; var i: Integer; idx: Integer; - s: string; + s: string = ''; begin i := Run; while (fLine[i] in ['a'..'z', 'A'..'Z']) do begin diff --git a/components/extrasyn/SyneditHighlighters/synhighlighterhp48.pas b/components/extrasyn/SyneditHighlighters/synhighlighterhp48.pas index 10cce56f0..9e9247df5 100644 --- a/components/extrasyn/SyneditHighlighters/synhighlighterhp48.pas +++ b/components/extrasyn/SyneditHighlighters/synhighlighterhp48.pas @@ -249,9 +249,9 @@ const 'A=PC'#13#10'C=PC'#13#10'APCEX'#13#10'CPCEX'#13#10'XM=0'#13#10'SB=0'#13#10'SR=0'#13#10'MP=0'#13#10'CLRHST'#13#10'?XM=0'#13#10'?SR=0'#13#10'?MP=0'#13#10'?SB=0'#13#10'RTNYES'#13#10'SKIPYES{'#13#10'{'#13#10'}'#13#10'UP'#13#10'EXIT'#13#10'EXITNC'#13#10'EXITC'#13#10'UPC'#13#10'UPNC' + '}SKELSE{'#13#10'SKC{'#13#10'SKNC{'#13#10'SKUB{'#13#10'SKUBL{'#13#10'SKIPC{'#13#10'SKIPNC{'#13#10'EXIT2'#13#10'EXIT3'#13#10'UP2'#13#10'UP3'#13#10'}SKLSE{'#13#10'}SKEC{'#13#10'}SKENC{'#13#10; -function StringCrc(S: string): integer; +function StringCrc(S: string): Cardinal; var - i: integer; + i: Cardinal; begin result := 0; for i := 1 to length(s) do begin