]> OCCT Git - occt-wok.git/commitdiff
Removing earlier removed file
authormnt <mnt@opencascade.com>
Fri, 11 Dec 2009 12:47:14 +0000 (12:47 +0000)
committermnt <mnt@opencascade.com>
Fri, 11 Dec 2009 12:47:14 +0000 (12:47 +0000)
src/WOKTclTools/WOKTclTools_Interpretor_proto.hxx [deleted file]
src/WOKTclTools/WOKTclTools_Replace.tcl [deleted file]
src/WOKTclTools/WOKTclTools_WOKSteps.edl [deleted file]

diff --git a/src/WOKTclTools/WOKTclTools_Interpretor_proto.hxx b/src/WOKTclTools/WOKTclTools_Interpretor_proto.hxx
deleted file mode 100755 (executable)
index d8de65b..0000000
+++ /dev/null
@@ -1,81 +0,0 @@
-// File modified by jga for Visul C++ 5.0
-//
-#ifndef _WOKTclTools_Interpretor_HeaderFile
-#define _WOKTclTools_Interpretor_HeaderFile
-
-#include <Handle_WOKTclTools_Interpretor.hxx>
-
-#include <Standard_Boolean.hxx>
-#include <WOKTclTools_PInterp.hxx>
-#include <MMgt_TShared.hxx>
-#include <Standard_CString.hxx>
-#include <WOKTclTools_CommandFunction.hxx>
-#include <WOKTclTools_WokCommand.hxx>
-#include <WOKTclTools_ExitHandler.hxx>
-#include <Standard_Integer.hxx>
-#include <Standard_Real.hxx>
-#include <Standard_Character.hxx>
-class WOKTools_Return;
-
-
-class WOKTclTools_Interpretor : public MMgt_TShared {
-
-public:
-
-  // Methods PUBLIC
-  // 
-  Standard_EXPORT WOKTclTools_Interpretor();
-  Standard_EXPORT WOKTclTools_Interpretor(const WOKTclTools_PInterp& anInterp);
-  Standard_EXPORT   void Add(const Standard_CString Command,const Standard_CString Help,const WOKTclTools_CommandFunction Function,const Standard_CString Group = "User Commands") ;
-  Standard_EXPORT   void Add(const Standard_CString Command,const Standard_CString Help,const WOKTclTools_WokCommand Function,const Standard_CString Group = "User Commands") ;
-  Standard_EXPORT   void AddExitHandler(const WOKTclTools_ExitHandler Function) ;
-  Standard_EXPORT   void DeleteExitHandler(const WOKTclTools_ExitHandler Function) ;
-  Standard_EXPORT   Standard_Boolean IsCmdName(const Standard_CString Command) ;
-  Standard_EXPORT   Standard_Boolean Remove(const Standard_CString Command) ;
-  Standard_EXPORT   Standard_Integer PkgProvide(const Standard_CString aname,const Standard_CString aversion) ;
-  Standard_EXPORT   Standard_Integer TreatReturn(const WOKTools_Return& values) ;
-  Standard_EXPORT   Standard_CString Result() const;
-  Standard_EXPORT   Standard_Boolean GetReturnValues(WOKTools_Return& retval) const;
-  Standard_EXPORT   void Reset() ;
-  Standard_EXPORT   void Append(const Standard_CString Result) ;
-  Standard_EXPORT   void Append(const Standard_Integer Result) ;
-  Standard_EXPORT   void Append(const Standard_Real Result) ;
-  Standard_EXPORT   void AppendElement(Standard_CString Result) ;
-  Standard_EXPORT   Standard_Integer Eval(const Standard_CString Script) ;
-  Standard_EXPORT   Standard_Integer RecordAndEval(const Standard_CString Script,const Standard_Integer Flags = 0) ;
-  Standard_EXPORT   Standard_Integer EvalFile(const Standard_CString FileName) ;
-  Standard_EXPORT static  Standard_Boolean Complete(const Standard_CString Script) ;
-  Standard_EXPORT   void Destroy() ;
-  ~WOKTclTools_Interpretor()
-    {
-      Destroy();
-    }
-
-  Standard_EXPORT   void Set(const WOKTclTools_PInterp& anInterp) ;
-  Standard_EXPORT   WOKTclTools_PInterp Interp() const;
-  Standard_EXPORT static  Handle_WOKTclTools_Interpretor& Current() ;
-  Standard_EXPORT static  void SetEndMessageProc(const Standard_CString aproc) ;
-  Standard_EXPORT static  void UnSetEndMessageProc() ;
-  Standard_EXPORT static  Standard_CString& EndMessageProc() ;
-  Standard_EXPORT static  void SetEndMessageArgs(const Standard_CString aArgs) ;
-  Standard_EXPORT static  void UnSetEndMessageArgs() ;
-  Standard_EXPORT static  Standard_CString& EndMessageArgs() ;
-  Standard_EXPORT   void TreatMessage(const Standard_Boolean newline,const Standard_Character atype,const Standard_CString amsg) const;
-
-  // Type management
-  //
-  friend Standard_EXPORT Handle_Standard_Type& WOKTclTools_Interpretor_Type_();
-  Standard_EXPORT const Handle(Standard_Type)& DynamicType() const;
-  Standard_EXPORT Standard_Boolean            IsKind(const Handle(Standard_Type)&) const;
-
-private: 
-
-  // Fields PRIVATE
-  //
-  Standard_Boolean isAllocated;
-  WOKTclTools_PInterp myInterp;
-
-
-};
-
-#endif
diff --git a/src/WOKTclTools/WOKTclTools_Replace.tcl b/src/WOKTclTools/WOKTclTools_Replace.tcl
deleted file mode 100755 (executable)
index 17b23f0..0000000
+++ /dev/null
@@ -1,60 +0,0 @@
-
-
-proc WOKTclTools_Replace:AdmFileType {} {
-    return "dbadmfile";
-}
-
-proc WOKTclTools_Replace:OutputDirTypeName {} {
-    return "dbtmpfile";
-}
-
-
-proc WOKTclTools_Replace:HandleInputFile { ID } { 
-
-    scan $ID "%\[^:\]:%\[^:\]:%\[^:\]"  unit type name
-
-    switch $name {
-       WOKTclTools_Interpretor.hxx {return 1;}
-       default {
-           return 0;
-       }
-    }
-}
-
-proc WOKTclTools_Replace:Execute { unit args } {
-    
-    global tcl_interactive
-
-    set tcl_interactive 1
-    package require Wokutils
-
-    msgprint -i -c "WOKTclTools_Replace::Execute" "Copying of WOKTclTools includes"
-
-    if { [wokparam -e %Station $unit] != "wnt" } {
-       set copycmd "cp -p "
-       set replstr "/"
-    } {
-       set copycmd "cmd /c copy"
-       set replstr "\\\\\\\\"
-    }
-    
-    foreach file  $args {
-       scan $file "%\[^:\]:%\[^:\]:%\[^:\]"  Unit type name
-       
-       regsub ".hxx" $name "_proto.hxx" sourcename
-
-       set source    [woklocate -p WOKTclTools:source:$sourcename     [wokinfo -N $unit]]
-       set vistarget [woklocate -p WOKTclTools:pubinclude:$name [wokinfo -N $unit]]
-       set target    [wokinfo   -p pubinclude:$name          $unit]
-
-       regsub -all "/" " $source $target" $replstr  TheArgs
-
-        msgprint -i -c "WOKTclTools_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"
-
-    }
-    return 0;
-}
diff --git a/src/WOKTclTools/WOKTclTools_WOKSteps.edl b/src/WOKTclTools/WOKTclTools_WOKSteps.edl
deleted file mode 100755 (executable)
index 4436211..0000000
+++ /dev/null
@@ -1,6 +0,0 @@
-@ifnotdefined ( %MS_WOKSteps_EDL ) then
- @set %MS_WOKSteps_EDL        = "";
- @string %WOKSteps_XcppGroup += " xcpp.repl ";
- @set %WOKSteps_xcpp_repl     = "*WOKTclTools_Replace(xcpp.header)";
-@endif;
-