浏览代码

* improved fix for #39912

florian 3 年之前
父节点
当前提交
dbbb91705f
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/scanner.pas

+ 1 - 1
compiler/scanner.pas

@@ -3717,7 +3717,7 @@ type
               { status }
                 Message1(scan_t_back_in,inputfile.name);
               { end of include file is like a line break which ends e.g. also // style comments }
-                if not(wasmacro) then
+                if not(wasmacro) and (current_commentstyle=comment_delphi) then
                   begin
                     c:=#10;
                   { ... but we have to decrease the line number first because it is increased due to this