0022819: Redesign of OpenGl driver

[occt.git] / src / OpenGl / OpenGl_togl_setlight.cxx

diff --git a/src/OpenGl/OpenGl_togl_setlight.cxx b/src/OpenGl/OpenGl_togl_setlight.cxx
deleted file mode 100755 (executable)
index edbb7b9..0000000
--- a/src/OpenGl/OpenGl_togl_setlight.cxx
+++ /dev/null
@@ -1,71 +0,0 @@
-/***********************************************************************
-
-FONCTION :
-----------
-Gestion des light sous OpenGL
-
-
-REMARQUES:
----------- 
-
-HISTORIQUE DES MODIFICATIONS   :
---------------------------------
-25-06-97 : PCT ; Appel de la toolkit OpenGl_LightBox
-et correction de bug passage
-plusieurs lights -> aucune lights
-
-************************************************************************/
-
-#include <OpenGl_tgl_all.hxx>
-
-#include <InterfaceGraphic_Labels.hxx>
-#include <InterfaceGraphic_Graphic3d.hxx>
-#include <InterfaceGraphic_Visual3d.hxx>
-
-#include <OpenGl_tgl_funcs.hxx>
-#include <OpenGl_tgl_subrvis.hxx>
-#include <OpenGl_inquire.hxx>
-
-#include <OpenGl_LightBox.hxx>
-#include <OpenGl_Memory.hxx>
-
-void EXPORT
-call_togl_setlight
-(
- CALL_DEF_VIEW * aview
- )
-{
-  Tint *actl=0;
-  Tint i;
-  CALL_DEF_LIGHT alight;
-  CMN_KEY  k;
-
-  actl = new Tint[call_facilities_list.MaxLights];
-  if( !actl )
-    return;
-
-  /* PCT ; 25-06-97 */
-  ResetWksLight(aview->WsId);
-
-  for( i =0; i < aview->Context.NbActiveLight &&
-    i < call_facilities_list.MaxLights; i++ )
-  {
-    alight = aview->Context.ActiveLight[i];
-    actl[i] = alight.LightId;
-    call_subr_set_light_src_rep( &alight );
-  }
-
-  call_func_set_edit_mode(CALL_PHIGS_EDIT_REPLACE);
-  call_func_open_struct(aview->ViewId);
-  call_func_set_elem_ptr(0);
-  call_func_set_elem_ptr_label(View_LABLight);
-  call_func_offset_elem_ptr(1);
-  k.id = aview->Context.NbActiveLight;
-  k.data.pdata = actl;
-  TsmAddToStructure( TelLightSrcState, 1, &k );
-  call_func_close_struct();
-
-  delete[] actl;
-
-  return;
-}