0023022: This is desirable to access OpenGl extensions and core API (1.2+) in one...
[occt.git] / src / OpenGl / OpenGl_Workspace_1.cxx
1 // File:      OpenGl_Workspace_1.cxx
2 // Created:   20 September 2011
3 // Author:    Sergey ZERCHANINOV
4 // Copyright: OPEN CASCADE 2011
5
6 #include <OpenGl_Workspace.hxx>
7
8 //call_togl_begin_animation
9 void OpenGl_Workspace::BeginAnimation (const Standard_Boolean UseDegeneration, const Standard_Boolean UpdateAM)
10 {
11   NamedStatus   |= OPENGL_NS_ANIMATION;
12   if (UseDegeneration)
13     NamedStatus |= OPENGL_NS_DEGENERATION;
14   else
15     NamedStatus &= ~OPENGL_NS_DEGENERATION;
16   if (UpdateAM)
17     NamedStatus |= OPENGL_NS_UPDATEAM;
18   else
19     NamedStatus &= ~OPENGL_NS_UPDATEAM;
20   NamedStatus &= ~OPENGL_NS_FLIST;
21 }
22
23 /*----------------------------------------------------------------------*/
24
25 //call_togl_end_animation
26 void OpenGl_Workspace::EndAnimation ()
27 {
28   if( (NamedStatus & OPENGL_NS_ANIMATION) == 0 ) return;
29
30   NamedStatus &= ~(OPENGL_NS_ANIMATION | OPENGL_NS_DEGENERATION | OPENGL_NS_UPDATEAM);
31   myIsUpdated = Standard_False;
32 }
33
34 /*----------------------------------------------------------------------*/
35 /*
36 * Permet de terminer effectivement le mode Animation.
37 * Ceci est realise des qu'une structure a ete modifiee.
38 */
39
40 //call_togl_erase_animation_mode
41 void OpenGl_Workspace::EraseAnimation ()
42 {
43   NamedStatus &= ~(OPENGL_NS_ANIMATION | OPENGL_NS_DEGENERATION | OPENGL_NS_UPDATEAM | OPENGL_NS_FLIST);
44 }
45
46 /*----------------------------------------------------------------------*/