Skip to content
Snippets Groups Projects
Commit 4538f6e1 authored by Marcus Comstedt's avatar Marcus Comstedt
Browse files

More funcs.

Rev: src/post_modules/GL/features.pike:1.2
Rev: src/post_modules/GL/gen.pike:1.4
parent 8d3c1b26
Branches
Tags
No related merge requests found
...@@ -23,12 +23,17 @@ array func_misc = ({ ...@@ -23,12 +23,17 @@ array func_misc = ({
({"glRotate", "V!RRRR"}), ({"glRotate", "V!RRRR"}),
({"glLight","VEE@Q"}), ({"glLight","VEE@Q"}),
({"glMaterial","VEE@Q"}), ({"glMaterial","VEE@Q"}),
({"glFog","VE@Q"}),
({"glLightModel","VE@Q"}),
({"glGenLists","II"}), ({"glGenLists","II"}),
({"glNewList","VIE"}), ({"glNewList","VIE"}),
({"glCallList","VI"}), ({"glCallList","VI"}),
({"glNormal","V#ZZZ"}), ({"glNormal","V#ZZZ"}),
({"glVertex","V+ZZZ"}), ({"glVertex","V+ZZZ"}),
({"glColor","V+ZZZZ"}),
({"glClear","VB"}), ({"glClear","VB"}),
({"glIsEnabled","OE"}),
({"glBlendFunc","VEE"}),
}); });
mapping func_cat = ([ mapping func_cat = ([
"VE":funcEV, "VE":funcEV,
......
...@@ -6,6 +6,7 @@ ...@@ -6,6 +6,7 @@
F=float F=float
E=enum E=enum
B=bitfield B=bitfield
O=bool
R=double/float R=double/float
Q=int/float Q=int/float
Z=(byte/)double/float/int/short Z=(byte/)double/float/int/short
...@@ -43,6 +44,7 @@ array(string|array(string)) special_234(int mi, int mx, string ty) ...@@ -43,6 +44,7 @@ array(string|array(string)) special_234(int mi, int mx, string ty)
case 'E': case 'E':
case 'B': case 'B':
case 'I': case 'I':
case 'O':
baset="int"; baset="int";
tm="BIT_INT"; tm="BIT_INT";
rt="i"; rt="i";
...@@ -90,6 +92,7 @@ array(string) gen_func(string name, string ty) ...@@ -90,6 +92,7 @@ array(string) gen_func(string name, string ty)
prot=":void"; prot=":void";
break; break;
case 'I': case 'I':
case 'O':
prot=":int"; prot=":int";
vdec="INT32"; vdec="INT32";
vret="push_int"; vret="push_int";
...@@ -105,6 +108,7 @@ array(string) gen_func(string name, string ty) ...@@ -105,6 +108,7 @@ array(string) gen_func(string name, string ty)
switch(ty[i]) { switch(ty[i]) {
case 'B': case 'B':
case 'E': case 'E':
case 'O':
case 'I': case 'I':
argt += ({"int"}); argt += ({"int"});
args += ({ "arg"+i }); args += ({ "arg"+i });
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment