Sfoglia il codice sorgente

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

git-svn-id: trunk@21999 -
marco 13 anni fa
parent
commit
666fecb6df
1 ha cambiato i file con 2 aggiunte e 0 eliminazioni
  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);