浏览代码

Autodoc: Fix unintended removal of a line of code

Arthur Yefimov 2 年之前
父节点
当前提交
dc129a5363
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/Autodoc/AutodocParser.Mod

+ 1 - 1
src/Autodoc/AutodocParser.Mod

@@ -1197,7 +1197,7 @@ BEGIN L := NewList(); stop := FALSE;
       WHILE x # NIL DO x(Var).type := T; x := x.next END
       WHILE x # NIL DO x(Var).type := T; x := x.next END
     END;
     END;
     IF (sym = semicol) OR ~isVarDecl THEN line2 := line;
     IF (sym = semicol) OR ~isVarDecl THEN line2 := line;
-      IF sym = semicol THEN GetSym
+      IF sym = semicol THEN GetSym; SaveComment(first, line2)
       ELSE stop := TRUE; SaveAllComments(first)
       ELSE stop := TRUE; SaveAllComments(first)
       END;
       END;
       IF (first # NIL) & (first.comment[0] # 0X) THEN x := first.next;
       IF (first # NIL) & (first.comment[0] # 0X) THEN x := first.next;