Object subclass: #DirectoryEntry instanceVariableNames: 'directory name creationTime modificationTime fileSize attributes' classVariableNames: '' poolDictionaries: '' category: 'Files-Directories'
DirectoryEntry subclasses {DirectoryEntryDirectory . DirectoryEntryFile}
FileDirectory directoryEntryForName: aName