summaryrefslogtreecommitdiff
path: root/src/OpenGl/OpenGl_togl_transformstructure.cxx
blob: cdddc2f028ee4bb0feaabc8cdbccb121abdf99ca (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

#include <OpenGl_tgl_all.hxx>

#include <InterfaceGraphic_Labels.hxx>
#include <InterfaceGraphic_Graphic3d.hxx>

#include <OpenGl_tgl_funcs.hxx>
#include <OpenGl_tgl.hxx>

void EXPORT
call_togl_transformstructure
(
 CALL_DEF_STRUCTURE * astructure
 )
{
  call_func_set_edit_mode (CALL_PHIGS_EDIT_REPLACE);
  call_func_open_struct (astructure->Id);
  call_func_set_elem_ptr (0);
  call_func_set_elem_ptr_label (Structure_LABTransformation);
  call_func_offset_elem_ptr (1);
  call_func_set_local_tran3 (astructure->Transformation, CALL_PHIGS_TYPE_REPLACE);
  call_func_close_struct ();

  return;
}