FileSystem = CompoundFile EOF. File : SimpleFile | CompoundFile common < f > FileName. SimpleFile = "simple". CompoundFile = "compound" < contents > PList(File). FileName = Ident. DirectoryName = Ident. PList(S) ~ "(" {S} ")". Main = .