1 /***********************************************************************
5 File OpenGl_togl_opengroup.c :
11 HISTORIQUE DES MODIFICATIONS :
12 --------------------------------
13 xx-xx-xx : xxx ; Creation.
14 03-03-98 : CAL ; Modification des structures CALL_DEF_GROUP et STRUCTURE
16 ************************************************************************/
18 /*----------------------------------------------------------------------*/
23 #include <OpenGl_tgl_all.hxx>
25 #include <InterfaceGraphic_Graphic3d.hxx>
26 #include <OpenGl_tgl.hxx>
27 #include <OpenGl_tgl_funcs.hxx>
28 #include <OpenGl_tgl_utilgr.hxx>
30 /*----------------------------------------------------------------------*/
33 call_togl_opengroup (agroup)
34 CALL_DEF_GROUP * agroup
36 Opens the associated structure and sets the pointer
37 at the end of the primitives.
41 - go to the end of the group in the specified structure.
42 - skip the structure element which set all attributes of the structure.
49 CALL_DEF_GROUP * agroup
52 call_func_set_edit_mode (CALL_PHIGS_EDIT_INSERT);
53 call_func_open_struct (agroup->Struct->Id);
54 call_func_set_elem_ptr (0);
55 call_func_set_elem_ptr_label (agroup->LabelEnd);
56 call_func_offset_elem_ptr (- call_util_context_group_place (agroup) - 1);