* Fix bug ID #31540 (again?)

git-svn-id: trunk@35621 -

packages/fcl-passrc/src/pscanner.pp

@@ -1330,7 +1330,8 @@ begin
         FCurToken:=tkIdentifier;
         Result:=FCurToken;
         end;
-      Break;
+      if not (FSkipComments or PPIsSkipping) then
+        Break;
       end;
     else
       if not PPIsSkipping then