From: cascade <cascade@opencascade.com>
Date: Fri, 9 Feb 2007 20:13:24 +0000 (+0000)
Subject: OCC13817, OCC13143, OCC13648 WOK improvements
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=1c9f69d9290ed0f3c4cbbc1ad450595091df3043;p=occt-wok.git

OCC13817, OCC13143, OCC13648 WOK improvements
---

diff --git a/src/EDL/EDL_Interpretor.cxx b/src/EDL/EDL_Interpretor.cxx
index 14c63af..ccc2cd5 100755
--- a/src/EDL/EDL_Interpretor.cxx
+++ b/src/EDL/EDL_Interpretor.cxx
@@ -147,9 +147,15 @@ EDL_Error EDL_Interpretor::Parse(const Standard_CString aFile)
   if (aFile != NULL) {
     FILE *fic = 0L;
     DirCount  = 1;
-
-    if (   (  fic = fopen ( aFile, "r" )  ) != NULL   ) {
-      IsFound = Standard_True;
+#ifndef WNT
+    if( !access(aFile, F_OK) ) 
+#else
+    if ( GetFileAttributes(aFile) != 0xFFFFFFFF ) 
+#endif
+    {
+      if (   (  fic = fopen ( aFile, "r" )  ) != NULL   ) {
+        IsFound = Standard_True;
+      }
     }
 
     while (!IsFound && DirCount <= IncludeDirectory->Length()) {