fix some symbol names for case-sensitivity
This commit is contained in:
parent
dd4aee249c
commit
f66c031bb7
1 changed files with 8 additions and 8 deletions
|
|
@ -47,7 +47,7 @@ else:
|
||||||
# quite complex ... thanks to extension support for various platforms:
|
# quite complex ... thanks to extension support for various platforms:
|
||||||
import dynlib
|
import dynlib
|
||||||
|
|
||||||
let oglHandle = LoadLib(ogldll)
|
let oglHandle = loadLib(ogldll)
|
||||||
if isNil(oglHandle): quit("could not load: " & ogldll)
|
if isNil(oglHandle): quit("could not load: " & ogldll)
|
||||||
|
|
||||||
when defined(windows):
|
when defined(windows):
|
||||||
|
|
@ -63,12 +63,12 @@ else:
|
||||||
when defined(windows):
|
when defined(windows):
|
||||||
result = symAddr(h, procname)
|
result = symAddr(h, procname)
|
||||||
if result != nil: return
|
if result != nil: return
|
||||||
if not isNil(wglGetProcAddress): result = wglGetProcAddress(ProcName)
|
if not isNil(wglGetProcAddress): result = wglGetProcAddress(procName)
|
||||||
elif defined(linux):
|
elif defined(linux):
|
||||||
if not isNil(glXGetProcAddress): result = glXGetProcAddress(ProcName)
|
if not isNil(glXGetProcAddress): result = glXGetProcAddress(procName)
|
||||||
if result != nil: return
|
if result != nil: return
|
||||||
if not isNil(glXGetProcAddressARB):
|
if not isNil(glXGetProcAddressARB):
|
||||||
result = glXGetProcAddressARB(ProcName)
|
result = glXGetProcAddressARB(procName)
|
||||||
if result != nil: return
|
if result != nil: return
|
||||||
result = symAddr(h, procname)
|
result = symAddr(h, procname)
|
||||||
else:
|
else:
|
||||||
|
|
@ -79,7 +79,7 @@ else:
|
||||||
|
|
||||||
proc gluGetProc(procname: cstring): pointer =
|
proc gluGetProc(procname: cstring): pointer =
|
||||||
if gluHandle == nil:
|
if gluHandle == nil:
|
||||||
gluHandle = LoadLib(gludll)
|
gluHandle = loadLib(gludll)
|
||||||
if gluHandle == nil: quit("could not load: " & gludll)
|
if gluHandle == nil: quit("could not load: " & gludll)
|
||||||
result = glGetProc(gluHandle, procname)
|
result = glGetProc(gluHandle, procname)
|
||||||
|
|
||||||
|
|
@ -209,14 +209,14 @@ type
|
||||||
TGLVectori2* = array[0..1, GLint]
|
TGLVectori2* = array[0..1, GLint]
|
||||||
TGLVectorf2* = array[0..1, GLfloat]
|
TGLVectorf2* = array[0..1, GLfloat]
|
||||||
TGLVectord2* = array[0..1, GLdouble]
|
TGLVectord2* = array[0..1, GLdouble]
|
||||||
TGLVectorp2* = array[0..1, Pointer]
|
TGLVectorp2* = array[0..1, pointer]
|
||||||
TGLVectorb3* = array[0..2, GLbyte]
|
TGLVectorb3* = array[0..2, GLbyte]
|
||||||
TGLVectorub3* = array[0..2, GLubyte]
|
TGLVectorub3* = array[0..2, GLubyte]
|
||||||
TGLVectori3* = array[0..2, GLint]
|
TGLVectori3* = array[0..2, GLint]
|
||||||
TGLVectorui3* = array[0..2, GLuint]
|
TGLVectorui3* = array[0..2, GLuint]
|
||||||
TGLVectorf3* = array[0..2, GLfloat]
|
TGLVectorf3* = array[0..2, GLfloat]
|
||||||
TGLVectord3* = array[0..2, GLdouble]
|
TGLVectord3* = array[0..2, GLdouble]
|
||||||
TGLVectorp3* = array[0..2, Pointer]
|
TGLVectorp3* = array[0..2, pointer]
|
||||||
TGLVectors3* = array[0..2, GLshort]
|
TGLVectors3* = array[0..2, GLshort]
|
||||||
TGLVectorus3* = array[0..2, GLushort]
|
TGLVectorus3* = array[0..2, GLushort]
|
||||||
TGLVectorb4* = array[0..3, GLbyte]
|
TGLVectorb4* = array[0..3, GLbyte]
|
||||||
|
|
@ -225,7 +225,7 @@ type
|
||||||
TGLVectorui4* = array[0..3, GLuint]
|
TGLVectorui4* = array[0..3, GLuint]
|
||||||
TGLVectorf4* = array[0..3, GLfloat]
|
TGLVectorf4* = array[0..3, GLfloat]
|
||||||
TGLVectord4* = array[0..3, GLdouble]
|
TGLVectord4* = array[0..3, GLdouble]
|
||||||
TGLVectorp4* = array[0..3, Pointer]
|
TGLVectorp4* = array[0..3, pointer]
|
||||||
TGLVectors4* = array[0..3, GLshort]
|
TGLVectors4* = array[0..3, GLshort]
|
||||||
TGLVectorus4* = array[0..3, GLshort]
|
TGLVectorus4* = array[0..3, GLshort]
|
||||||
TGLArrayf4* = TGLVectorf4
|
TGLArrayf4* = TGLVectorf4
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue