From: cas <cas@opencascade.com>
Date: Fri, 5 Nov 1999 18:28:10 +0000 (+0000)
Subject: No comments
X-Git-Tag: V6_7_1~146
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=c1b7ee2444554f8b74f82f7902a4ad034ac61509;p=occt-wok.git

No comments
---

diff --git a/src/WOKUtils/FILES b/src/WOKUtils/FILES
index 8ef2207..86d56fb 100755
--- a/src/WOKUtils/FILES
+++ b/src/WOKUtils/FILES
@@ -28,3 +28,4 @@ EDL.edl
 WOKUtils_Trigger_proto.hxx
 WOKUtils_Param_proto.hxx
 WOKUtils_WOKSteps.edl
+
diff --git a/src/WOKUtils/WOKUtils_Param.cxx b/src/WOKUtils/WOKUtils_Param.cxx
index d433a38..92776be 100755
--- a/src/WOKUtils/WOKUtils_Param.cxx
+++ b/src/WOKUtils/WOKUtils_Param.cxx
@@ -453,6 +453,10 @@ Standard_Boolean WOKUtils_Param::LoadFile(const Handle(TCollection_HAsciiString)
       ErrorMsg << "WOKUtils_Param::LoadParamClass"
 	       << "Too many include levels while loading file : " << afile << endm;
       break;
+    case EDL_FILENOTFOUND:
+      ErrorMsg << "WOKUtils_Param::LoadParamClass"
+	       << "File not found : " << afile << endm;
+      break;
     }
   return Standard_False;
 }
diff --git a/src/WOKUtils/WOKUtils_Replace.tcl b/src/WOKUtils/WOKUtils_Replace.tcl
index a1a7801..dba617b 100755
--- a/src/WOKUtils/WOKUtils_Replace.tcl
+++ b/src/WOKUtils/WOKUtils_Replace.tcl
@@ -1,15 +1,15 @@
 
 
-proc WOKUtils_Replace::AdmFileType {} {
+proc WOKUtils_Replace:AdmFileType {} {
     return "dbadmfile";
 }
 
-proc WOKUtils_Replace::OutputDirTypeName {} {
+proc WOKUtils_Replace:OutputDirTypeName {} {
     return "dbtmpfile";
 }
 
 
-proc WOKUtils_Replace::HandleInputFile { ID } { 
+proc WOKUtils_Replace:HandleInputFile { ID } { 
 
     scan $ID "%\[^:\]:%\[^:\]:%\[^:\]"  unit type name
 
@@ -34,14 +34,14 @@ proc WOKUtils_Replace::HandleInputFile { ID } {
     }
 }
 
-proc WOKUtils_Replace::Execute { unit args } {
+proc WOKUtils_Replace:Execute { unit args } {
     
     global tcl_interactive
 
     set tcl_interactive 1
     package require Wokutils
 
-    msgprint -i -c "WOKUtils_Replace::Execute" "Copying of WOKUtils includes"
+    msgprint -i -c "WOKUtils_Replace:Execute" "Copying of WOKUtils includes"
 
     if { [wokparam -e %Station $unit] != "wnt" } {
 	set copycmd "cp -p "
@@ -69,13 +69,13 @@ proc WOKUtils_Replace::Execute { unit args } {
 	}
 	
 	if { ! $result } {
-	    msgprint -i -c "WOKUtils_Replace::Execute" "Copy $source to $target"
+	    msgprint -i -c "WOKUtils_Replace:Execute" "Copy $source to $target"
 	    if { [file exist $target] && [wokparam -e %Station $unit] != "wnt" } {
 		eval exec "chmod u+w $target"
 	    }
 	    eval exec "$copycmd $TheArgs"
 	} else {
-	    msgprint -i -c "WOKUtils_Replace::Execute" "No change in $source"
+	    msgprint -i -c "WOKUtils_Replace:Execute" "No change in $source"
 	}
     }
     return 0;
diff --git a/src/WOKUtils/WOKUtils_Trigger.cxx b/src/WOKUtils/WOKUtils_Trigger.cxx
index fdfe5fa..36b81bb 100755
--- a/src/WOKUtils/WOKUtils_Trigger.cxx
+++ b/src/WOKUtils/WOKUtils_Trigger.cxx
@@ -21,7 +21,7 @@
 //purpose  : 
 //=======================================================================
 WOKUtils_Trigger::WOKUtils_Trigger()
-  : mystat(WOKUtils_Unknown), myidx(1)
+  : myidx(1), mystat(WOKUtils_Unknown)
 {
 }
 
@@ -58,6 +58,7 @@ WOKUtils_TriggerStatus DefaultHandler(WOKUtils_Trigger& atrigger)
 	    InfoMsg << "DefaultHandler" << "Arg " << i << " is : " << astrval->Value() << endm;
 	  }
 	  break;
+        default: break;
 	}
     }
   return WOKUtils_Unknown;
diff --git a/src/WOKUtils/WOKUtils_WOKSteps.edl b/src/WOKUtils/WOKUtils_WOKSteps.edl
index 49bff75..7b7493d 100755
--- a/src/WOKUtils/WOKUtils_WOKSteps.edl
+++ b/src/WOKUtils/WOKUtils_WOKSteps.edl
@@ -1,13 +1,6 @@
--- File:	WOKUtils_WOKSteps.edl
--- Author:	Jean GAUTIER
--- History:	Tue Aug 12 17:12:59 1997	Jean GAUTIER	Creation
--- Copyright:	 Matra Datavision 1997
-
-@ifnotdefined ( %WOKUtils_WOKSteps_EDL) then
-@set %WOKUtils_WOKSteps_EDL = "";
-
-
-@string %WOKSteps_XcppGroup += "xcpp.repl";
-@set %WOKSteps_xcpp_repl = "*WOKUtils_Replace(xcpp.header)";
-
+@ifnotdefined ( %WOKUtils_WOKSteps_EDL ) then
+ @set %WOKUtils_WOKSteps_EDL  = "";
+ @string %WOKSteps_XcppGroup += "xcpp.repl";
+ @set %WOKSteps_xcpp_repl     = "*WOKUtils_Replace(xcpp.header)";
 @endif;
+