anchor.diff:          stream.SetDrawBuffers(s.drawBufferCount, s.drawBuffers)
           stream.UseProgram(0)
           stream.BindBuffer(int OpenTK.Graphics.OpenGL4.BufferTarget.DrawIndirectBuffer, 0)
  -        
  +        for i in 0 .. 7 do
  +            stream.Disable(int OpenTK.Graphics.OpenGL4.EnableCap.ClipDistance0 + i)
  +
       override x.EntryState = None
       override x.ExitState = None
   
  
positive.code:                 x.Enable(int OpenTK.Graphics.OpenGL4.EnableCap.ProgramPointSize)
              else
                  x.Disable(int OpenTK.Graphics.OpenGL4.EnableCap.ProgramPointSize)
              
  
              // bind all uniform-buffers (if needed)
  
negative.code:                     else
                          x.Disable(int OpenTK.Graphics.OpenGL4.EnableCap.ProgramPointSize)
              
  
              let prevUsed = usedClipPlanes prev.pProgramInterface
              let meUsed = usedClipPlanes me.pProgramInterface
  
              if prevUsed <> meUsed then
                  for i in meUsed do
                      x.Enable(int OpenTK.Graphics.OpenGL4.EnableCap.ClipDistance0 + i)
  
  
              // bind all uniform-buffers (if needed)
              for (id,ub) in Map.toSeq me.pUniformBuffers do
  