0012121: Optimization of existing selection classes
[occt.git] / src / OpenGl / OpenGl_togl_transformstructure.cxx
CommitLineData
7fd59977 1
2#include <OpenGl_tgl_all.hxx>
3
4#include <InterfaceGraphic_Labels.hxx>
5#include <InterfaceGraphic_Graphic3d.hxx>
6
7#include <OpenGl_tgl_funcs.hxx>
8#include <OpenGl_tgl.hxx>
9
10void EXPORT
11call_togl_transformstructure
12(
13 CALL_DEF_STRUCTURE * astructure
14 )
15{
16 call_func_set_edit_mode (CALL_PHIGS_EDIT_REPLACE);
17 call_func_open_struct (astructure->Id);
18 call_func_set_elem_ptr (0);
19 call_func_set_elem_ptr_label (Structure_LABTransformation);
20 call_func_offset_elem_ptr (1);
21 call_func_set_local_tran3 (astructure->Transformation, CALL_PHIGS_TYPE_REPLACE);
22 call_func_close_struct ();
23
24 return;
25}