From d6f8cd920fd6d4fbea79d4c86b14cd93267d5d82 Mon Sep 17 00:00:00 2001
From: cas <cas@opencascade.com>
Date: Fri, 10 Aug 2001 17:46:01 +0000
Subject: [PATCH] No comments

---
 src/CDLFront/CDLFront_Replace.tcl | 40 ++++++++++++++++++++++---------
 src/CDLFront/FILES                |  1 +
 2 files changed, 30 insertions(+), 11 deletions(-)

diff --git a/src/CDLFront/CDLFront_Replace.tcl b/src/CDLFront/CDLFront_Replace.tcl
index e86644c..210c7bb 100755
--- a/src/CDLFront/CDLFront_Replace.tcl
+++ b/src/CDLFront/CDLFront_Replace.tcl
@@ -13,6 +13,7 @@ proc CDLFront_Replace:HandleInputFile { ID } {
     
     switch $name {
          CDL.tab.c  {return 1;} 
+         CDL.tab.h  {return 1;} 
 	default {
 	    return 0;
 	}
@@ -37,21 +38,38 @@ proc CDLFront_Replace:Execute { unit args } {
 	set replstr "\\\\\\\\"
     }
     
+    ## traiting CDL.tab.c
 
-	set sourcename CDL.tab.c
-	set name       CDL.tab.c
+    set sourcename CDL.tab.c
+    set name       CDL.tab.c
 
-	set source    [woklocate -p CDLFront:source:$sourcename     [wokinfo -N $unit]]
-	set vistarget [woklocate -p CDLFront:privinclude:$name [wokinfo -N $unit]]
+    set source    [woklocate -p CDLFront:source:$sourcename     [wokinfo -N $unit]]
+    set vistarget [woklocate -p CDLFront:privinclude:$name [wokinfo -N $unit]]
 #	set target    [wokinfo   -p CDLFront:privinclude:$name [wokinfo -N $unit]]
-msgprint -i -c "$source "
-	regsub -all "/" " $source $vistarget" $replstr  TheArgs
+    msgprint -i -c "$source "
+    regsub -all "/" " $source $vistarget" $replstr  TheArgs
+
+    msgprint -i -c "CDLFront_Replace::Execute" "Copy $source to $vistarget"
+    if { [file exist $vistarget] && [wokparam -e %Station ] != "wnt" } {
+	eval exec "chmod u+w $vistarget"
+    }
+    eval exec "$copycmd $TheArgs"
+
+    ## traiting CDL.tab.h
+
+    set name       CDL.tab.h
+    set source    [woklocate -p CDLFront:source:$name     [wokinfo -N $unit]]
+    set vistarget [woklocate -p CDLFront:pubinclude:$name [wokinfo -N $unit]]
+    msgprint -i -c "$source "
+    regsub -all "/" " $source $vistarget" $replstr  TheArgs
+
+    msgprint -i -c "CDLFront_Replace::Execute" "Copy $source to $vistarget"
+    if { [file exist $vistarget] && [wokparam -e %Station ] != "wnt" } {
+	eval exec "chmod u+w $vistarget"
+    }
+    eval exec "$copycmd $TheArgs"
+
 
-	msgprint -i -c "CDLFront_Replace::Execute" "Copy $source to $vistarget"
-	if { [file exist $vistarget] && [wokparam -e %Station ] != "wnt" } {
-		eval exec "chmod u+w $vistarget"
-	}
-	eval exec "$copycmd $TheArgs"
 
     return 0;
 }
diff --git a/src/CDLFront/FILES b/src/CDLFront/FILES
index 3421668..0629d1b 100755
--- a/src/CDLFront/FILES
+++ b/src/CDLFront/FILES
@@ -9,3 +9,4 @@ CDLFront_LDSHR.edl
 CDLFront_Replace.tcl
 CDLFront_WOKSteps.edl
 CDL.tab.c
+CDL.tab.h
-- 
2.39.5