浏览代码

* workaround for unsupported construct in fpdoc. (enum declared nested in class)

git-svn-id: trunk@21999 -
marco 13 年之前
父节点
当前提交
666fecb6df
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      rtl/objpas/classes/classesh.inc

+ 2 - 0
rtl/objpas/classes/classesh.inc

@@ -206,8 +206,10 @@ type
     Procedure RaiseIndexError(Index: Integer);
     Procedure RaiseIndexError(Index: Integer);
   public
   public
 {$IFNDEF VER2_4}
 {$IFNDEF VER2_4}
+{$ifndef fpdocsystem}
     Type
     Type
       TDirection = (FromBeginning, FromEnd);
       TDirection = (FromBeginning, FromEnd);
+{$endif}
 {$ENDIF}
 {$ENDIF}
     destructor Destroy; override;
     destructor Destroy; override;
     Procedure AddList(AList : TFPList);
     Procedure AddList(AList : TFPList);