summaryrefslogtreecommitdiff
path: root/src/OpenGl/OpenGl_togl_cleargroup.cxx
blob: dd556cdf07fa4c7f49e8c9846de688d60cb411c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
/***********************************************************************

FONCTION :
----------
File OpenGl_togl_cleargroup.c :


REMARQUES:
---------- 

HISTORIQUE DES MODIFICATIONS   :
--------------------------------
xx-xx-xx : xxx ; Creation.
03-03-98 : CAL ; Modification des structures CALL_DEF_GROUP et STRUCTURE

************************************************************************/

/*----------------------------------------------------------------------*/
/*
* Includes
*/ 

#include <OpenGl_tgl_all.hxx>
#include <InterfaceGraphic_Graphic3d.hxx>
#include <OpenGl_tgl_funcs.hxx>

/*----------------------------------------------------------------------*/

void EXPORT
call_togl_cleargroup
(
 CALL_DEF_GROUP * agroup
 )
{
  call_func_set_edit_mode (CALL_PHIGS_EDIT_REPLACE);
  call_func_open_struct (agroup->Struct->Id);
  call_func_set_elem_ptr (0);
  call_func_del_elems_labels (agroup->LabelBegin, agroup->LabelEnd);
  call_func_close_struct ();
  return;
}