|
@@ -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
|