Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
W
wine-cw
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Registry
Registry
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
wine
wine-cw
Commits
0e999e3c
Commit
0e999e3c
authored
Mar 02, 2004
by
Lionel Ulmer
Committed by
Alexandre Julliard
Mar 02, 2004
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
- sync up with latest OpenGL specifications
- some fixes in make_opengl to support the new types
parent
f7ed056a
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
51 additions
and
7 deletions
+51
-7
make_opengl
dlls/opengl32/make_opengl
+48
-4
opengl_ext.c
dlls/opengl32/opengl_ext.c
+0
-0
opengl_norm.c
dlls/opengl32/opengl_norm.c
+3
-3
No files found.
dlls/opengl32/make_opengl
View file @
0e999e3c
...
...
@@ -83,6 +83,12 @@ $gen_traces = 1;
"1_1"
=>
1
);
%
cat_1_2
=
(
%
cat_1_1
,
"VERSION_1_2"
=>
1
);
%
cat_1_3
=
(
%
cat_1_2
,
"VERSION_1_3"
=>
1
);
%
cat_1_4
=
(
%
cat_1_3
,
"VERSION_1_4"
=>
1
);
%
cat_1_5
=
(
%
cat_1_4
,
"VERSION_1_5"
=>
1
);
%
norm_categories
=
();
...
...
@@ -109,6 +115,10 @@ $gen_traces = 1;
"GLhalfNV"
=>
"%d"
,
"GLintptrARB"
=>
"%d"
,
"GLsizeiptrARB"
=>
"%d"
,
"GLintptr"
=>
"%d"
,
"GLsizeiptr"
=>
"%d"
,
"GLhandleARB"
=>
"%d"
,
"GLcharARB"
=>
"%c"
,
"GLvoid"
=>
"(void)"
,
"_GLfuncptr"
=>
"%p"
);
...
...
@@ -135,6 +145,10 @@ $gen_traces = 1;
"GLhalfNV"
=>
[
"long"
,
4
],
"GLintptrARB"
=>
[
"long"
,
4
],
"GLsizeiptrARB"
=>
[
"long"
,
4
],
"GLhandleARB"
=>
[
"long"
,
4
],
"GLcharARB"
=>
[
"long"
,
4
],
"GLintptr"
=>
[
"long"
,
4
],
"GLsizeiptr"
=>
[
"long"
,
4
],
"GLvoid"
=>
[
"void"
,
4
],
"_GLfuncptr"
=>
[
"ptr"
,
4
]);
...
...
@@ -147,6 +161,10 @@ sub ConvertType {
%
hash
=
(
"GLstring"
=>
"const GLubyte *"
,
"GLintptrARB"
=>
"ptrdiff_t"
,
"GLsizeiptrARB"
=>
"ptrdiff_t"
,
"GLintptr"
=>
"ptrdiff_t"
,
"GLsizeiptr"
=>
"ptrdiff_t"
,
"GLhandleARB"
=>
"unsigned int"
,
"GLcharARB"
=>
"char"
,
"GLhalfNV"
=>
"unsigned short"
);
foreach
$org
(
keys
%
hash
)
{
...
...
@@ -159,6 +177,24 @@ sub ConvertType {
}
#
# Used to convert some variable names
#
sub
ConvertVarName
{
my
(
$type
)
=
@_
;
%
hash
=
(
"near"
=>
"nearParam"
,
"far"
=>
"farParam"
);
foreach
$org
(
keys
%
hash
)
{
if
(
$type
=~
/$org/
)
{
(
$before
,
$after
)
=
(
$type
=~
/^(.*)$org(.*)$/
);
return
"$before$hash{$org}$after"
;
}
}
return
$type
;
}
#
# This functions generates the thunk for a given function.
#
sub
GenerateThunk
{
...
...
@@ -176,8 +212,10 @@ sub GenerateThunk {
}
$ret
=
$ret
.
ConvertType
(
$func_ref
->
[
1
])
.
" WINAPI wine_"
.
$func_ref
->
[
0
]
.
"( "
;
for
(
$i
=
0
;
$i
<=
$#
{
@
{
$func_ref
->
[
2
]}};
$i
++
)
{
## Quick debug code :-)
## print $func_ref->[2]->[$i]->[1] . "\n";
$type
=
$func_ref
->
[
2
]
->
[
$i
]
->
[
0
];
$name
=
$func_ref
->
[
2
]
->
[
$i
]
->
[
1
]
;
$name
=
ConvertVarName
(
$func_ref
->
[
2
]
->
[
$i
]
->
[
1
])
;
$ret
=
$ret
.
ConvertType
(
$type
)
.
" $name"
;
$call_arg
=
$call_arg
.
"$name"
;
if
(
$type
=~
/\*/
)
{
...
...
@@ -239,8 +277,14 @@ if ($version eq "1.0") {
%
norm_categories
=
%
cat_1_1
;
}
elsif
(
$version
eq
"1.2"
)
{
%
norm_categories
=
%
cat_1_2
;
}
elsif
(
$version
eq
"1.3"
)
{
%
norm_categories
=
%
cat_1_3
;
}
elsif
(
$version
eq
"1.4"
)
{
%
norm_categories
=
%
cat_1_4
;
}
elsif
(
$version
eq
"1.5"
)
{
%
norm_categories
=
%
cat_1_5
;
}
else
{
die
"
OpenGL version incorrect. Should be one of '1.0', '1.1' or '1.2'
.\n"
;
die
"
Incorrect OpenGL version
.\n"
;
}
#
...
...
@@ -620,7 +664,7 @@ WINE_DEFAULT_DEBUG_CHANNEL(opengl);
# First, generate the function pointers
foreach
(
sort
keys
%
ext_functions
)
{
$func_ref
=
$ext_functions
{
$_
};
print
EXT
$func_ref
->
[
1
]
.
" (*"
.
$ext_prefix
.
$func_ref
->
[
0
]
.
")( "
;
print
EXT
ConvertType
(
$func_ref
->
[
1
])
.
" (*"
.
$ext_prefix
.
$func_ref
->
[
0
]
.
")( "
;
for
(
$i
=
0
;
$i
<=
$#
{
@
{
$func_ref
->
[
2
]}};
$i
++
)
{
$type
=
ConvertType
(
$func_ref
->
[
2
]
->
[
$i
]
->
[
0
]);
print
EXT
"$type"
;
...
...
@@ -637,7 +681,7 @@ foreach (sort keys %ext_functions) {
print
EXT
"\n\n/* The function prototypes */\n"
;
foreach
(
sort
keys
%
ext_functions
)
{
$func_ref
=
$ext_functions
{
$_
};
print
EXT
$func_ref
->
[
1
]
.
" WINAPI "
.
"wine_"
.
$func_ref
->
[
0
]
.
"( "
;
print
EXT
ConvertType
(
$func_ref
->
[
1
])
.
" WINAPI "
.
"wine_"
.
$func_ref
->
[
0
]
.
"( "
;
for
(
$i
=
0
;
$i
<=
$#
{
@
{
$func_ref
->
[
2
]}};
$i
++
)
{
$type
=
ConvertType
(
$func_ref
->
[
2
]
->
[
$i
]
->
[
0
]);
print
EXT
"$type"
;
...
...
dlls/opengl32/opengl_ext.c
View file @
0e999e3c
This diff is collapsed.
Click to expand it.
dlls/opengl32/opengl_norm.c
View file @
0e999e3c
...
...
@@ -802,10 +802,10 @@ void WINAPI wine_glDepthMask( GLboolean flag ) {
/***********************************************************************
* glDepthRange (OPENGL32.@)
*/
void
WINAPI
wine_glDepthRange
(
GLclampd
nearPar
m
,
GLclampd
farPar
m
)
{
TRACE
(
"(%f, %f)
\n
"
,
nearPar
m
,
farPar
m
);
void
WINAPI
wine_glDepthRange
(
GLclampd
nearPar
am
,
GLclampd
farPara
m
)
{
TRACE
(
"(%f, %f)
\n
"
,
nearPar
am
,
farPara
m
);
ENTER_GL
();
glDepthRange
(
nearPar
m
,
farPar
m
);
glDepthRange
(
nearPar
am
,
farPara
m
);
LEAVE_GL
();
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment