* Merging revisions r45425 from trunk:

    ------------------------------------------------------------------------
    r45425 | michael | 2020-05-18 19:29:48 +0200 (Mon, 18 May 2020) | 1 line
    
    * clarify dubious case statements
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@46585 -

rtl/objpas/classes/parser.inc

@@ -445,7 +445,7 @@ begin
       '$'                   : HandleHexNumber;
       '-'                   : HandleMinus;
       '0'..'9'              : HandleNumber;
-      '''','#'              : HandleString
+      '''','#'              : HandleString;
       else
         HandleUnknown;
     end;
@@ -494,7 +494,7 @@ begin
     toWString : Result:=string(fLastTokenWStr);
     toFloat : if fFloatType<>#0 then
                 Result:=fLastTokenStr+fFloatType
-              else Result:=fLastTokenStr
+              else Result:=fLastTokenStr;
     else
       Result:=fLastTokenStr;
   end;