projects / occt.git / blame
| Commit | Line | Data |
|---|---|---|
| 7fd59977 | 1 | |
| 2 | #include <OpenGl_tgl_all.hxx> | |
| 3 | #include <OpenGl_tgl.hxx> | |
| 4 | #include <OpenGl_tgl_funcs.hxx> | |
| 5 | #include <OpenGl_tgl_subrs.hxx> | |
| 6 | ||
| 7 | void EXPORT | |
| 8 | call_togl_erasestructure | |
| 9 | ( | |
| 10 | int ViewId, | |
| 11 | int StructId | |
| 12 | ) | |
| 13 | { | |
| 14 | Tint i; | |
| 15 | ||
| 16 | if (call_subr_get_exec_struct (ViewId, StructId, &i) == TSuccess) { | |
| 17 | call_func_open_struct (ViewId); | |
| 18 | call_func_set_elem_ptr (i); | |
| 19 | call_func_del_elem (); | |
| 20 | call_func_close_struct (); | |
| 21 | } | |
| 22 | return; | |
| 23 | } |