Prechádzať zdrojové kódy

* skip newline after comment. Patch by Lacak2, #22031

git-svn-id: trunk@21682 -
marco 13 rokov pred
rodič
commit
40d26638a7
1 zmenil súbory, kde vykonal 2 pridanie a 1 odobranie
  1. 2 1
      packages/fcl-db/src/base/dsparams.inc

+ 2 - 1
packages/fcl-db/src/base/dsparams.inc

@@ -213,7 +213,8 @@ begin
           repeat // skip until at end of line
           repeat // skip until at end of line
             Inc(p);
             Inc(p);
           until p^ in [#10, #0];
           until p^ in [#10, #0];
-        end
+        end;
+        if p^<>#0 then Inc(p); // newline is part of comment
       end;
       end;
     '/': // possible start of /* */ comment
     '/': // possible start of /* */ comment
       begin
       begin