0022819: Redesign of OpenGl driver
[occt.git] / src / OpenGl / OpenGl_togl_setplane.cxx
diff --git a/src/OpenGl/OpenGl_togl_setplane.cxx b/src/OpenGl/OpenGl_togl_setplane.cxx
deleted file mode 100755 (executable)
index 437e844..0000000
+++ /dev/null
@@ -1,60 +0,0 @@
-#define GER61454        //GG 14-09-99 Activates the model clipping planes
-
-#include <OpenGl_tgl_all.hxx>
-#include <OpenGl_tgl.hxx>
-#include <OpenGl_tgl_funcs.hxx>
-#include <OpenGl_telem_view.hxx>
-#include <OpenGl_tsm_ws.hxx>
-#include <GL/gl.h>
-
-
-struct TEL_VIEW_DATA
-{
-  TEL_VIEW_REP    vrep;
-#ifdef CAL_100498
-  Tmatrix3        inverse_matrix;/* accelerates UVN2XYZ conversion */
-#endif
-  IMPLEMENT_MEMORY_OPERATORS
-};
-typedef TEL_VIEW_DATA *tel_view_data;   /* Internal data stored for every view rep */
-
-
-void EXPORT
-/* unimplemented */
-call_togl_setplane
-(
- CALL_DEF_VIEW * aview
- )
-{
-#ifdef GER61454
-
-  CMN_KEY_DATA    key;
-  tel_view_data   vptr;
-  TEL_VIEW_REP   *call_viewrep;
-  CALL_DEF_PLANE *plane;
-  int j;
-  
-  // return view representation 
-  
-  if( aview->ViewId == 0 )
-    return;                 // no modifications on default view
-
-  if( TsmGetWSAttri( aview->WsId, WSViews, &key ) != TSuccess )
-    return;
-
-  vptr = (tel_view_data)key.pdata;
-  if( !vptr )
-    return;
-
-  call_viewrep = &vptr->vrep;
-  
-  // clear clipping planes information
-  call_viewrep->clipping_planes.Clear();
-  // update information 
-  if( aview->Context.NbActivePlane > 0 )
-    for( j=0 ; j<aview->Context.NbActivePlane ; j++ )
-      call_viewrep->clipping_planes.Append( aview->Context.ActivePlane[j] );
-#endif
-return;
-}