--- parser3/src/include/pa_dir.h	2001/08/31 15:35:34	1.4
+++ parser3/src/include/pa_dir.h	2002/08/01 11:41:15	1.12
@@ -1,16 +1,15 @@
 /** @file
 	Parser: directory scanning for different OS-es decls.
 
-	Copyright (c) 2000,2001 ArtLebedev Group (http://www.artlebedev.com)
-
-	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
-
-	$Id: pa_dir.h,v 1.4 2001/08/31 15:35:34 parser Exp $
+	Copyright (c) 2000,2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
+	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
 #ifndef PA_DIR_H
 #define PA_DIR_H
 
+static const char* IDENT_DIR_H="$Date: 2002/08/01 11:41:15 $";
+
 #include "pa_config_includes.h"
 
 /** @struct ffblk 
@@ -77,14 +76,14 @@ void findclose(struct ffblk *_ffblk);
 /// main dir workhorse: calles win32/unix unified functions findfirst/next/close
 #define LOAD_DIR(dir,action) {\
     ffblk ffblk; \
-    bool done=findfirst(dir, &ffblk, 0); \
-	while(!done) { \
-		if(*ffblk.ff_name && ffblk.ff_name[0]!='.') {\
-			action; \
-		} \
-		done=findnext(&ffblk); \
-    } \
-	findclose(&ffblk); \
+    if(!findfirst(dir, &ffblk, 0)) { \
+		do \
+			if(*ffblk.ff_name && ffblk.ff_name[0]!='.') {\
+				action; \
+			} \
+		while(!findnext(&ffblk)); \
+		findclose(&ffblk); \
+	} \
 } 
 
 #endif