Browse Source

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

git-svn-id: trunk@21999 -
marco 13 years ago
parent
commit
666fecb6df
1 changed files with 2 additions and 0 deletions
  1. 2 0
      rtl/objpas/classes/classesh.inc

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

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