Сегодня обнаружил эту интересную вещь, когда не сработала корректно процедура сравнения каталогов:
## Код:
```
PROCEDURE (d: Directory) LocList* (loc: Files.Locator): Files.LocInfo;
...
   BEGIN
...
            REPEAT
               IF (KERNEL32.FileAttrDirectory IN fd.attributes) & (fd.name[0] # ".") & (LEN(fd.name$) < LEN(info.name))
               THEN ...
```
Странное поведение для виндового HostFiles, не находите?