anchor.diff:  Function wglGetProcAddress(proc:PAnsiChar):Pointer; stdcall; external 'OpenGL32.dll';
   {$ENDIF}
   
  +{$IFDEF LINUX}
  +Var
  +  glXGetProcAddress: function(procname: PChar): Pointer; cdecl;
  +  glXGetProcAddressARB: function(procname: PChar): Pointer; cdecl;
  +{$ENDIF}
  +
   Function SearchOpenGLProc(Const ProcName:TERRAString):Pointer;
   Begin
     Result := Nil;
  
positive.code:   {$ENDIF}
  
    {$IFDEF LINUX}
    If (Application.Instance.GetOption('glx')='1') Then
      Result := glxGetProcAddress(PAnsiChar(ProcName));
    {$ENDIF}
  
  
  
negative.code: Procedure glLoadExtensions;
  Begin
    Engine.Log.Write(logDebug, 'OpenGL', 'Loading extensions');
  
    {$IFDEF LINUX}
    If (Application.Instance.GetOption('glx')='1') Then
    Begin
      glXGetProcAddress := GetProcAddress(OpenGLHandle, 'glXGetProcAddress'); // GLX 1.4 and later
      glXGetProcAddressARB := GetProcAddress(OpenGLHandle, 'glXGetProcAddressARB'); // Extensions
    End Else
    Begin
      glXGetProcAddress := Nil;
      glXGetProcAddressARB := Nil;
    End;
    {$ENDIF}
  
    // base OpenGL
  	glAccum := glGetProcAddress('glAccum');
  