* Fix hex number evaluation in conditional expressions · a0db717adf - Gogs

* Fix hex number evaluation in conditional expressions

git-svn-id: trunk@47498 -
(cherry picked from commit 37b827c6a099244ab066eea9d2824e5f68fc43cd)

michael 4 years ago

parent

3b85a6f555

commit

a0db717adf

1 changed files with 1 additions and 0 deletions

Split View Show Diff Stats

						
							+ 1
							
							- 0
						
packages/fcl-passrc/src/pscanner.pp
							 
								View File
							
				@@ -1643,6 +1643,7 @@ begin
			
				   '$':
			
				     begin
			
				     FToken:=tkNumber;
			
				+    inc(FTokenEnd);
			
				     {$ifdef UsePChar}
			
				     while FTokenEnd^ in HexDigits do inc(FTokenEnd);
			
				     {$else}