* Fix hex number evaluation in conditional expressions

git-svn-id: trunk@47498 -

packages/fcl-passrc/src/pscanner.pp

@@ -1643,6 +1643,7 @@ begin
   '$':
     begin
     FToken:=tkNumber;
+    inc(FTokenEnd);
     {$ifdef UsePChar}
     while FTokenEnd^ in HexDigits do inc(FTokenEnd);
     {$else}