Преглед на файлове

* prepare support of opengl for OS/2 (not finished yet)

git-svn-id: trunk@20318 -
Tomas Hajny преди 13 години
родител
ревизия
cba68ee384
променени са 3 файла, в които са добавени 14 реда и са изтрити 0 реда
  1. 6 0
      packages/opengl/src/gl.pp
  2. 4 0
      packages/opengl/src/glu.pp
  3. 4 0
      packages/opengl/src/glut.pp

+ 6 - 0
packages/opengl/src/gl.pp

@@ -44,7 +44,9 @@
     {$INLINE ON}
     {$DEFINE GL_UNIT}
   {$ELSE}
+   {$IFNDEF OS2}
     {$LINKLIB c}
+   {$ENDIF OS2}
   {$ENDIF}
 {$ENDIF}
 
@@ -2256,6 +2258,9 @@ initialization
   {$IFDEF Windows}
   LoadOpenGL('opengl32.dll');
   {$ELSE}
+  {$IFDEF OS2}
+  LoadOpenGL('opengl.dll');
+  {$ELSE OS2}
   {$ifdef darwin}
   LoadOpenGL('/System/Library/Frameworks/OpenGL.framework/Libraries/libGL.dylib');
   {$ELSE}
@@ -2269,6 +2274,7 @@ initialization
   {$endif}
   {$ENDIF}
   {$endif}
+  {$ENDIF OS2}
   {$ENDIF}
 
 finalization

+ 4 - 0
packages/opengl/src/glu.pp

@@ -70,6 +70,9 @@ Const
 {$IFDEF Windows}
   GLU_Lib = 'glu32.dll';
 {$ELSE}
+{$IFDEF OS2}
+  GLU_Lib = 'opengl.dll';
+{$ELSE OS2}
 {$ifdef darwin}
   GLU_LIB =  '/System/Library/Frameworks/OpenGL.framework/Libraries/libGLU.dylib';
 {$else}
@@ -81,6 +84,7 @@ Const
 {$endif}
 {$ENDIF}
 {$ENDIF}
+{$ENDIF OS2}
 {$endif}
                               
 

+ 4 - 0
packages/opengl/src/glut.pp

@@ -762,6 +762,9 @@ initialization
   {$IFDEF Windows}
   LoadGlut('glut32.dll');
   {$ELSE}
+  {$IFDEF OS2}
+  LoadGlut('glut.dll');
+  {$ELSE OS2}
   {$ifdef darwin}
   LoadGlut('/System/Library/Frameworks/GLUT.framework/GLUT');
   {$else}
@@ -773,6 +776,7 @@ initialization
   {$ENDIF}
   {$ENDIF}
   {$endif}
+  {$ENDIF OS2}
   {$ENDIF}
 
 finalization