diff --git a/DataScraping/XML/GL/ScrapXML.pas b/DataScraping/XML/GL/ScrapXML.pas index 44362991..20016c05 100644 --- a/DataScraping/XML/GL/ScrapXML.pas +++ b/DataScraping/XML/GL/ScrapXML.pas @@ -161,6 +161,7 @@ ParData = sealed class private name, t: string; + private readonly: boolean; private ptr: integer; private gr: Group := nil; @@ -172,13 +173,12 @@ self.name := n.Nodes['name'].Single.Text; if func_name=nil then func_name := self.name; + var text := n.Text; self.t := n.Nodes['ptype'].SingleOrDefault?.Text; if self.t=nil then - begin - var s := n.Text; - s := s.Remove(s.LastIndexOf(' ')); - self.t := s.Remove('const').Trim; - end; + self.t := text.Remove(text.LastIndexOf(' ')).Remove('const').Trim; + + self.readonly := text.Contains('const'); self.ptr := n.Text.Count(ch->ch='*'); @@ -214,7 +214,7 @@ // Otp(func_name); // log.WriteLine($'Command [{func_name}] has enum parameter without group'); - var ToDo := 0; // расскоментировать когда группы приведут в кое-какой порядк + var ToDo := 0; //ToDo расскоментировать когда группы приведут в кое-какой порядк end; @@ -222,6 +222,7 @@ begin bw.Write(name); bw.Write(t); + bw.Write(readonly); bw.Write(ptr); var ind := gr=nil ? -1 : grs.IndexOf(gr); diff --git a/DataScraping/XML/GL/funcs.bin b/DataScraping/XML/GL/funcs.bin index edc39ca6..db556d70 100644 Binary files a/DataScraping/XML/GL/funcs.bin and b/DataScraping/XML/GL/funcs.bin differ diff --git a/Packing/Template/GL/Fixers/Funcs/0Core.dat b/Packing/Template/GL/Fixers/Funcs/0Core.dat index a83893f1..9557f4ca 100644 --- a/Packing/Template/GL/Fixers/Funcs/0Core.dat +++ b/Packing/Template/GL/Fixers/Funcs/0Core.dat @@ -3,11 +3,11 @@ # glGetShaderInfoLog !possible_par_types - * | * | -array of Int32 | -string | + * | * | -array of Int32 | * | # glGetProgramInfoLog !possible_par_types - * | * | -array of Int32 | -string | + * | * | -array of Int32 | * | # glNamedBufferData !possible_par_types diff --git a/Packing/Template/GL/FuncData.pas b/Packing/Template/GL/FuncData.pas index deea5a6d..beed1021 100644 --- a/Packing/Template/GL/FuncData.pas +++ b/Packing/Template/GL/FuncData.pas @@ -140,6 +140,7 @@ sb += $' {name} = record' + #10; FuncOrgParam = sealed class public name, t: string; + public readonly: boolean; public ptr: integer; public gr: Group; @@ -172,6 +173,7 @@ sb += $' {name} = record' + #10; if LogCache.invalid_ntv_types.Add(ntv_t) then Otp($'ERROR: Nativ type [{ntv_t}] isn''t defined'); + self.readonly := br.ReadBoolean; self.ptr := br.ReadInt32 + self.t.Count(ch->ch='*') - self.t.Count(ch->ch='-'); self.t := self.t.Remove('*','-').Trim; if self.ptr<0 then @@ -240,11 +242,12 @@ sb += $' {name} = record' + #10; Result := Lst((par.ptr-1, 'string')); exit; end; - var res := new List>(par.ptr+1); + var res := new List>(par.ptr+integer(par.readonly)); for var ptr := 0 to par.ptr-1 do res += ( ptr , 'IntPtr'); - res += (par.ptr-1, 'string'); + if par.readonly then + res += (par.ptr-1, 'string'); res.Reverse; Result := res; diff --git a/Packing/Template/GL/Funcs.template b/Packing/Template/GL/Funcs.template index 88b378ce..91577cae 100644 --- a/Packing/Template/GL/Funcs.template +++ b/Packing/Template/GL/Funcs.template @@ -2070,317 +2070,137 @@ // added in gl2.0 public z_GetActiveAttrib_adr := GetFuncAdr('glGetActiveAttrib'); public z_GetActiveAttrib_ovr_0 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size[0], &type, name); end; - public z_GetActiveAttrib_ovr_4 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetActiveAttrib_ovr_2 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_2(&program, index, bufSize, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveAttrib_ovr_12 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_2(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveAttrib_ovr_6 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_6(&program, index, bufSize, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveAttrib_ovr_16 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_16(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_6(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveAttrib_ovr_8 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_16(&program, index, bufSize, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_8(&program, index, bufSize, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_2(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttrib_ovr_0(&program, index, bufSize, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_4(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_2(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_6(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_12(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_16(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_6(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_16(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveAttrib_ovr_36 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_8(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveAttrib_ovr_18 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_18(&program, index, bufSize, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size[0], &type, name); - end; - public z_GetActiveAttrib_ovr_40 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_40(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_18(&program, index, bufSize, length, size[0], &type, name); end; + public z_GetActiveAttrib_ovr_20 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_40(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_20(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_18(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_36(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_40(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_18(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_40(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveAttrib_ovr_48 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_48(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_20(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveAttrib_ovr_24 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_48(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_48(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_24(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttrib_ovr_48(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveAttrib_ovr_52 := GetFuncOrNil&(z_GetActiveAttrib_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttrib_ovr_52(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttrib_ovr_24(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveAttrib_ovr_26 := GetFuncOrNil&(z_GetActiveAttrib_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttrib(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttrib_ovr_52(&program, index, bufSize, length, size, &type, name); + z_GetActiveAttrib_ovr_26(&program, index, bufSize, length, size, &type, name); end; // added in gl4.0 public z_GetActiveSubroutineName_adr := GetFuncAdr('glGetActiveSubroutineName'); public z_GetActiveSubroutineName_ovr_0 := GetFuncOrNil&(z_GetActiveSubroutineName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: array of Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineName_ovr_0(&program, _shadertype, index, bufSize, length[0], par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: array of Int32; name: IntPtr); begin z_GetActiveSubroutineName_ovr_0(&program, _shadertype, index, bufSize, length[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; var length: Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineName_ovr_0(&program, _shadertype, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; var length: Int32; name: IntPtr); begin z_GetActiveSubroutineName_ovr_0(&program, _shadertype, index, bufSize, length, name); end; - public z_GetActiveSubroutineName_ovr_4 := GetFuncOrNil&(z_GetActiveSubroutineName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: IntPtr; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineName_ovr_4(&program, _shadertype, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; + public z_GetActiveSubroutineName_ovr_2 := GetFuncOrNil&(z_GetActiveSubroutineName_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: IntPtr; name: IntPtr); begin - z_GetActiveSubroutineName_ovr_4(&program, _shadertype, index, bufSize, length, name); + z_GetActiveSubroutineName_ovr_2(&program, _shadertype, index, bufSize, length, name); end; // added in gl4.0 @@ -2403,317 +2223,137 @@ // added in gl4.0 public z_GetActiveSubroutineUniformName_adr := GetFuncAdr('glGetActiveSubroutineUniformName'); public z_GetActiveSubroutineUniformName_ovr_0 := GetFuncOrNil&(z_GetActiveSubroutineUniformName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: array of Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineUniformName_ovr_0(&program, _shadertype, index, bufSize, length[0], par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: array of Int32; name: IntPtr); begin z_GetActiveSubroutineUniformName_ovr_0(&program, _shadertype, index, bufSize, length[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; var length: Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineUniformName_ovr_0(&program, _shadertype, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; var length: Int32; name: IntPtr); begin z_GetActiveSubroutineUniformName_ovr_0(&program, _shadertype, index, bufSize, length, name); end; - public z_GetActiveSubroutineUniformName_ovr_4 := GetFuncOrNil&(z_GetActiveSubroutineUniformName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: IntPtr; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveSubroutineUniformName_ovr_4(&program, _shadertype, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; + public z_GetActiveSubroutineUniformName_ovr_2 := GetFuncOrNil&(z_GetActiveSubroutineUniformName_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveSubroutineUniformName(&program: UInt32; _shadertype: ShaderType; index: UInt32; bufSize: Int32; length: IntPtr; name: IntPtr); begin - z_GetActiveSubroutineUniformName_ovr_4(&program, _shadertype, index, bufSize, length, name); + z_GetActiveSubroutineUniformName_ovr_2(&program, _shadertype, index, bufSize, length, name); end; // added in gl2.0 public z_GetActiveUniform_adr := GetFuncAdr('glGetActiveUniform'); public z_GetActiveUniform_ovr_0 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size[0], &type, name); end; - public z_GetActiveUniform_ovr_4 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_4(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetActiveUniform_ovr_2 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_4(&program, index, bufSize, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_2(&program, index, bufSize, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_4(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_4(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveUniform_ovr_12 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_12(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_2(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveUniform_ovr_6 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_12(&program, index, bufSize, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_12(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_6(&program, index, bufSize, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_12(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveUniform_ovr_16 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_16(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_6(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveUniform_ovr_8 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_16(&program, index, bufSize, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_8(&program, index, bufSize, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_4(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_4(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_2(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniform_ovr_0(&program, index, bufSize, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_4(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_4(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_12(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_2(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_12(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_12(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_6(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_12(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_16(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_6(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_16(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveUniform_ovr_36 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_8(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveUniform_ovr_18 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_18(&program, index, bufSize, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size[0], &type, name); - end; - public z_GetActiveUniform_ovr_40 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_40(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_18(&program, index, bufSize, length, size[0], &type, name); end; + public z_GetActiveUniform_ovr_20 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_40(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_20(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_18(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_36(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_40(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_18(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_40(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveUniform_ovr_48 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_48(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_20(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveUniform_ovr_24 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_48(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_48(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_24(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniform_ovr_48(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveUniform_ovr_52 := GetFuncOrNil&(z_GetActiveUniform_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniform_ovr_52(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniform_ovr_24(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveUniform_ovr_26 := GetFuncOrNil&(z_GetActiveUniform_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniform(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniform_ovr_52(&program, index, bufSize, length, size, &type, name); + z_GetActiveUniform_ovr_26(&program, index, bufSize, length, size, &type, name); end; // added in gl3.1 @@ -2736,71 +2376,35 @@ // added in gl3.1 public z_GetActiveUniformBlockName_adr := GetFuncAdr('glGetActiveUniformBlockName'); public z_GetActiveUniformBlockName_ovr_0 := GetFuncOrNil&(z_GetActiveUniformBlockName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; length: array of Int32; uniformBlockName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformBlockName); - z_GetActiveUniformBlockName_ovr_0(&program, uniformBlockIndex, bufSize, length[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; length: array of Int32; uniformBlockName: IntPtr); begin z_GetActiveUniformBlockName_ovr_0(&program, uniformBlockIndex, bufSize, length[0], uniformBlockName); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; var length: Int32; uniformBlockName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformBlockName); - z_GetActiveUniformBlockName_ovr_0(&program, uniformBlockIndex, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; var length: Int32; uniformBlockName: IntPtr); begin z_GetActiveUniformBlockName_ovr_0(&program, uniformBlockIndex, bufSize, length, uniformBlockName); end; - public z_GetActiveUniformBlockName_ovr_4 := GetFuncOrNil&(z_GetActiveUniformBlockName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; length: IntPtr; uniformBlockName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformBlockName); - z_GetActiveUniformBlockName_ovr_4(&program, uniformBlockIndex, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; + public z_GetActiveUniformBlockName_ovr_2 := GetFuncOrNil&(z_GetActiveUniformBlockName_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformBlockName(&program: UInt32; uniformBlockIndex: UInt32; bufSize: Int32; length: IntPtr; uniformBlockName: IntPtr); begin - z_GetActiveUniformBlockName_ovr_4(&program, uniformBlockIndex, bufSize, length, uniformBlockName); + z_GetActiveUniformBlockName_ovr_2(&program, uniformBlockIndex, bufSize, length, uniformBlockName); end; // added in gl3.1 public z_GetActiveUniformName_adr := GetFuncAdr('glGetActiveUniformName'); public z_GetActiveUniformName_ovr_0 := GetFuncOrNil&(z_GetActiveUniformName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; length: array of Int32; uniformName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformName); - z_GetActiveUniformName_ovr_0(&program, uniformIndex, bufSize, length[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; length: array of Int32; uniformName: IntPtr); begin z_GetActiveUniformName_ovr_0(&program, uniformIndex, bufSize, length[0], uniformName); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; var length: Int32; uniformName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformName); - z_GetActiveUniformName_ovr_0(&program, uniformIndex, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; var length: Int32; uniformName: IntPtr); begin z_GetActiveUniformName_ovr_0(&program, uniformIndex, bufSize, length, uniformName); end; - public z_GetActiveUniformName_ovr_4 := GetFuncOrNil&(z_GetActiveUniformName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; length: IntPtr; uniformName: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(uniformName); - z_GetActiveUniformName_ovr_4(&program, uniformIndex, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; + public z_GetActiveUniformName_ovr_2 := GetFuncOrNil&(z_GetActiveUniformName_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformName(&program: UInt32; uniformIndex: UInt32; bufSize: Int32; length: IntPtr; uniformName: IntPtr); begin - z_GetActiveUniformName_ovr_4(&program, uniformIndex, bufSize, length, uniformName); + z_GetActiveUniformName_ovr_2(&program, uniformIndex, bufSize, length, uniformName); end; // added in gl3.1 @@ -3627,71 +3231,35 @@ // added in gl4.3 public z_GetObjectLabel_adr := GetFuncAdr('glGetObjectLabel'); public z_GetObjectLabel_ovr_0 := GetFuncOrNil&(z_GetObjectLabel_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; length: array of Int32; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabel_ovr_0(identifier, name, bufSize, length[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; length: array of Int32; &label: IntPtr); begin z_GetObjectLabel_ovr_0(identifier, name, bufSize, length[0], &label); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; var length: Int32; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabel_ovr_0(identifier, name, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; var length: Int32; &label: IntPtr); begin z_GetObjectLabel_ovr_0(identifier, name, bufSize, length, &label); end; - public z_GetObjectLabel_ovr_4 := GetFuncOrNil&(z_GetObjectLabel_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; length: IntPtr; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabel_ovr_4(identifier, name, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; + public z_GetObjectLabel_ovr_2 := GetFuncOrNil&(z_GetObjectLabel_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabel(identifier: ObjectIdentifier; name: UInt32; bufSize: Int32; length: IntPtr; &label: IntPtr); begin - z_GetObjectLabel_ovr_4(identifier, name, bufSize, length, &label); + z_GetObjectLabel_ovr_2(identifier, name, bufSize, length, &label); end; // added in gl4.3 public z_GetObjectPtrLabel_adr := GetFuncAdr('glGetObjectPtrLabel'); public z_GetObjectPtrLabel_ovr_0 := GetFuncOrNil&(z_GetObjectPtrLabel_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; length: array of Int32; &label: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectPtrLabel_ovr_0(ptr, bufSize, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; length: array of Int32; &label: IntPtr); begin z_GetObjectPtrLabel_ovr_0(ptr, bufSize, length[0], &label); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; var length: Int32; &label: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectPtrLabel_ovr_0(ptr, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; var length: Int32; &label: IntPtr); begin z_GetObjectPtrLabel_ovr_0(ptr, bufSize, length, &label); end; - public z_GetObjectPtrLabel_ovr_4 := GetFuncOrNil&(z_GetObjectPtrLabel_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; length: IntPtr; &label: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectPtrLabel_ovr_4(ptr, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetObjectPtrLabel_ovr_2 := GetFuncOrNil&(z_GetObjectPtrLabel_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectPtrLabel(ptr: IntPtr; bufSize: Int32; length: IntPtr; &label: IntPtr); begin - z_GetObjectPtrLabel_ovr_4(ptr, bufSize, length, &label); + z_GetObjectPtrLabel_ovr_2(ptr, bufSize, length, &label); end; // added in gl1.1 @@ -3798,36 +3366,18 @@ // added in gl4.1 public z_GetProgramPipelineInfoLog_adr := GetFuncAdr('glGetProgramPipelineInfoLog'); public z_GetProgramPipelineInfoLog_ovr_0 := GetFuncOrNil&(z_GetProgramPipelineInfoLog_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; length: array of Int32; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetProgramPipelineInfoLog_ovr_0(pipeline, bufSize, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; length: array of Int32; infoLog: IntPtr); begin z_GetProgramPipelineInfoLog_ovr_0(pipeline, bufSize, length[0], infoLog); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; var length: Int32; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetProgramPipelineInfoLog_ovr_0(pipeline, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; var length: Int32; infoLog: IntPtr); begin z_GetProgramPipelineInfoLog_ovr_0(pipeline, bufSize, length, infoLog); end; - public z_GetProgramPipelineInfoLog_ovr_4 := GetFuncOrNil&(z_GetProgramPipelineInfoLog_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; length: IntPtr; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetProgramPipelineInfoLog_ovr_4(pipeline, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetProgramPipelineInfoLog_ovr_2 := GetFuncOrNil&(z_GetProgramPipelineInfoLog_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramPipelineInfoLog(pipeline: UInt32; bufSize: Int32; length: IntPtr; infoLog: IntPtr); begin - z_GetProgramPipelineInfoLog_ovr_4(pipeline, bufSize, length, infoLog); + z_GetProgramPipelineInfoLog_ovr_2(pipeline, bufSize, length, infoLog); end; // added in gl4.1 @@ -4011,36 +3561,18 @@ // added in gl4.3 public z_GetProgramResourceName_adr := GetFuncAdr('glGetProgramResourceName'); public z_GetProgramResourceName_ovr_0 := GetFuncOrNil&(z_GetProgramResourceName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; length: array of Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetProgramResourceName_ovr_0(&program, _programInterface, index, bufSize, length[0], par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; length: array of Int32; name: IntPtr); begin z_GetProgramResourceName_ovr_0(&program, _programInterface, index, bufSize, length[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; var length: Int32; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetProgramResourceName_ovr_0(&program, _programInterface, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; var length: Int32; name: IntPtr); begin z_GetProgramResourceName_ovr_0(&program, _programInterface, index, bufSize, length, name); end; - public z_GetProgramResourceName_ovr_4 := GetFuncOrNil&(z_GetProgramResourceName_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; length: IntPtr; name: string); - begin - var par_6_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetProgramResourceName_ovr_4(&program, _programInterface, index, bufSize, length, par_6_str_ptr); - Marshal.FreeHGlobal(par_6_str_ptr); - end; + public z_GetProgramResourceName_ovr_2 := GetFuncOrNil&(z_GetProgramResourceName_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetProgramResourceName(&program: UInt32; _programInterface: ProgramInterface; index: UInt32; bufSize: Int32; length: IntPtr; name: IntPtr); begin - z_GetProgramResourceName_ovr_4(&program, _programInterface, index, bufSize, length, name); + z_GetProgramResourceName_ovr_2(&program, _programInterface, index, bufSize, length, name); end; // added in gl4.0 @@ -4355,36 +3887,18 @@ // added in gl2.0 public z_GetShaderSource_adr := GetFuncAdr('glGetShaderSource'); public z_GetShaderSource_ovr_0 := GetFuncOrNil&(z_GetShaderSource_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; length: array of Int32; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSource_ovr_0(shader, bufSize, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; length: array of Int32; source: IntPtr); begin z_GetShaderSource_ovr_0(shader, bufSize, length[0], source); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; var length: Int32; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSource_ovr_0(shader, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; var length: Int32; source: IntPtr); begin z_GetShaderSource_ovr_0(shader, bufSize, length, source); end; - public z_GetShaderSource_ovr_4 := GetFuncOrNil&(z_GetShaderSource_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; length: IntPtr; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSource_ovr_4(shader, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetShaderSource_ovr_2 := GetFuncOrNil&(z_GetShaderSource_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSource(shader: UInt32; bufSize: Int32; length: IntPtr; source: IntPtr); begin - z_GetShaderSource_ovr_4(shader, bufSize, length, source); + z_GetShaderSource_ovr_2(shader, bufSize, length, source); end; // added in gl1.0 @@ -4727,282 +4241,120 @@ // added in gl3.0 public z_GetTransformFeedbackVarying_adr := GetFuncAdr('glGetTransformFeedbackVarying'); public z_GetTransformFeedbackVarying_ovr_0 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size[0], &type, name); end; - public z_GetTransformFeedbackVarying_ovr_4 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetTransformFeedbackVarying_ovr_2 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_2(&program, index, bufSize, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_12 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_2(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetTransformFeedbackVarying_ovr_6 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_6(&program, index, bufSize, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_16 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_16(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_6(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetTransformFeedbackVarying_ovr_8 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_16(&program, index, bufSize, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_8(&program, index, bufSize, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_2(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVarying_ovr_0(&program, index, bufSize, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_4(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_2(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_6(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_12(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_16(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_6(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_16(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_36 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_8(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVarying_ovr_18 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_18(&program, index, bufSize, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size[0], &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_40 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_40(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_18(&program, index, bufSize, length, size[0], &type, name); end; + public z_GetTransformFeedbackVarying_ovr_20 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_40(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_20(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_18(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_36(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_40(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_18(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_40(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_48 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_48(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_20(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVarying_ovr_24 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_48(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_48(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_24(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_48(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVarying_ovr_52 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVarying_ovr_52(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVarying_ovr_24(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVarying_ovr_26 := GetFuncOrNil&(z_GetTransformFeedbackVarying_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVarying(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVarying_ovr_52(&program, index, bufSize, length, size, &type, name); + z_GetTransformFeedbackVarying_ovr_26(&program, index, bufSize, length, size, &type, name); end; // added in gl3.1 @@ -13276,9 +12628,6 @@ public [MethodImpl(MethodImplOptions.AggressiveInlining)] function GetLayerPaletteEntries(hdc: GDI_DC; iLayerPlane: Int32; iStart: Int32; cEntries: Int32; pcr: IntPtr): Int32 := z_GetLayerPaletteEntries(hdc, iLayerPlane, iStart, cEntries, pcr); // added in wgl1.0 - public static function z_GetProcAddress([MarshalAs(UnmanagedType.LPStr)] lpszProc: string): IntPtr; - external 'opengl32.dll' name 'wglGetProcAddress'; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] function GetProcAddress(lpszProc: string): IntPtr := z_GetProcAddress(lpszProc); public static function z_GetProcAddress(lpszProc: IntPtr): IntPtr; external 'opengl32.dll' name 'wglGetProcAddress'; public [MethodImpl(MethodImplOptions.AggressiveInlining)] function GetProcAddress(lpszProc: IntPtr): IntPtr := z_GetProcAddress(lpszProc); @@ -13897,70 +13246,34 @@ public z_GetPerfMonitorGroupStringAMD_adr := GetFuncAdr('glGetPerfMonitorGroupStringAMD'); public z_GetPerfMonitorGroupStringAMD_ovr_0 := GetFuncOrNil&(z_GetPerfMonitorGroupStringAMD_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; length: array of Int32; groupString: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(groupString); - z_GetPerfMonitorGroupStringAMD_ovr_0(group, bufSize, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; length: array of Int32; groupString: IntPtr); begin z_GetPerfMonitorGroupStringAMD_ovr_0(group, bufSize, length[0], groupString); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; var length: Int32; groupString: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(groupString); - z_GetPerfMonitorGroupStringAMD_ovr_0(group, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; var length: Int32; groupString: IntPtr); begin z_GetPerfMonitorGroupStringAMD_ovr_0(group, bufSize, length, groupString); end; - public z_GetPerfMonitorGroupStringAMD_ovr_4 := GetFuncOrNil&(z_GetPerfMonitorGroupStringAMD_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; length: IntPtr; groupString: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(groupString); - z_GetPerfMonitorGroupStringAMD_ovr_4(group, bufSize, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetPerfMonitorGroupStringAMD_ovr_2 := GetFuncOrNil&(z_GetPerfMonitorGroupStringAMD_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorGroupStringAMD(group: UInt32; bufSize: Int32; length: IntPtr; groupString: IntPtr); begin - z_GetPerfMonitorGroupStringAMD_ovr_4(group, bufSize, length, groupString); + z_GetPerfMonitorGroupStringAMD_ovr_2(group, bufSize, length, groupString); end; public z_GetPerfMonitorCounterStringAMD_adr := GetFuncAdr('glGetPerfMonitorCounterStringAMD'); public z_GetPerfMonitorCounterStringAMD_ovr_0 := GetFuncOrNil&(z_GetPerfMonitorCounterStringAMD_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; length: array of Int32; counterString: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(counterString); - z_GetPerfMonitorCounterStringAMD_ovr_0(group, counter, bufSize, length[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; length: array of Int32; counterString: IntPtr); begin z_GetPerfMonitorCounterStringAMD_ovr_0(group, counter, bufSize, length[0], counterString); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; var length: Int32; counterString: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(counterString); - z_GetPerfMonitorCounterStringAMD_ovr_0(group, counter, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; var length: Int32; counterString: IntPtr); begin z_GetPerfMonitorCounterStringAMD_ovr_0(group, counter, bufSize, length, counterString); end; - public z_GetPerfMonitorCounterStringAMD_ovr_4 := GetFuncOrNil&(z_GetPerfMonitorCounterStringAMD_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; length: IntPtr; counterString: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(counterString); - z_GetPerfMonitorCounterStringAMD_ovr_4(group, counter, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; + public z_GetPerfMonitorCounterStringAMD_ovr_2 := GetFuncOrNil&(z_GetPerfMonitorCounterStringAMD_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetPerfMonitorCounterStringAMD(group: UInt32; counter: UInt32; bufSize: Int32; length: IntPtr; counterString: IntPtr); begin - z_GetPerfMonitorCounterStringAMD_ovr_4(group, counter, bufSize, length, counterString); + z_GetPerfMonitorCounterStringAMD_ovr_2(group, counter, bufSize, length, counterString); end; public z_GetPerfMonitorCounterInfoAMD_adr := GetFuncAdr('glGetPerfMonitorCounterInfoAMD'); @@ -17530,36 +16843,18 @@ public z_GetInfoLogARB_adr := GetFuncAdr('glGetInfoLogARB'); public z_GetInfoLogARB_ovr_0 := GetFuncOrNil&(z_GetInfoLogARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; length: array of Int32; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetInfoLogARB_ovr_0(obj, maxLength, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; length: array of Int32; infoLog: IntPtr); begin z_GetInfoLogARB_ovr_0(obj, maxLength, length[0], infoLog); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; var length: Int32; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetInfoLogARB_ovr_0(obj, maxLength, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; var length: Int32; infoLog: IntPtr); begin z_GetInfoLogARB_ovr_0(obj, maxLength, length, infoLog); end; - public z_GetInfoLogARB_ovr_4 := GetFuncOrNil&(z_GetInfoLogARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; length: IntPtr; infoLog: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(infoLog); - z_GetInfoLogARB_ovr_4(obj, maxLength, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetInfoLogARB_ovr_2 := GetFuncOrNil&(z_GetInfoLogARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetInfoLogARB(obj: GLhandleARB; maxLength: Int32; length: IntPtr; infoLog: IntPtr); begin - z_GetInfoLogARB_ovr_4(obj, maxLength, length, infoLog); + z_GetInfoLogARB_ovr_2(obj, maxLength, length, infoLog); end; public z_GetAttachedObjectsARB_adr := GetFuncAdr('glGetAttachedObjectsARB'); @@ -17619,282 +16914,120 @@ public z_GetActiveUniformARB_adr := GetFuncAdr('glGetActiveUniformARB'); public z_GetActiveUniformARB_ovr_0 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type, name); end; - public z_GetActiveUniformARB_ovr_4 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetActiveUniformARB_ovr_2 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_2(programObj, index, maxLength, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length[0], size, &type, name); - end; - public z_GetActiveUniformARB_ovr_12 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_2(programObj, index, maxLength, length[0], size, &type, name); end; + public z_GetActiveUniformARB_ovr_6 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_6(programObj, index, maxLength, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length[0], size, &type, name); - end; - public z_GetActiveUniformARB_ovr_16 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_16(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_6(programObj, index, maxLength, length[0], size, &type, name); end; + public z_GetActiveUniformARB_ovr_8 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_16(programObj, index, maxLength, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_8(programObj, index, maxLength, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_2(programObj, index, maxLength, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: array of UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; var &type: UniformType; name: IntPtr); begin z_GetActiveUniformARB_ovr_0(programObj, index, maxLength, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_4(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_2(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_6(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_12(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_16(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_6(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_16(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveUniformARB_ovr_36 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_8(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveUniformARB_ovr_18 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_18(programObj, index, maxLength, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size[0], &type, name); - end; - public z_GetActiveUniformARB_ovr_40 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_40(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_18(programObj, index, maxLength, length, size[0], &type, name); end; + public z_GetActiveUniformARB_ovr_20 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_40(programObj, index, maxLength, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_20(programObj, index, maxLength, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_18(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_36(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_40(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_18(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_40(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveUniformARB_ovr_48 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: array of UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_48(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_20(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveUniformARB_ovr_24 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: array of UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_48(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; var &type: UniformType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_48(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_24(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; var &type: UniformType; name: IntPtr); begin - z_GetActiveUniformARB_ovr_48(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveUniformARB_ovr_52 := GetFuncOrNil&(z_GetActiveUniformARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveUniformARB_ovr_52(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveUniformARB_ovr_24(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveUniformARB_ovr_26 := GetFuncOrNil&(z_GetActiveUniformARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveUniformARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveUniformARB_ovr_52(programObj, index, maxLength, length, size, &type, name); + z_GetActiveUniformARB_ovr_26(programObj, index, maxLength, length, size, &type, name); end; public z_GetUniformfvARB_adr := GetFuncAdr('glGetUniformfvARB'); @@ -17931,36 +17064,18 @@ public z_GetShaderSourceARB_adr := GetFuncAdr('glGetShaderSourceARB'); public z_GetShaderSourceARB_ovr_0 := GetFuncOrNil&(z_GetShaderSourceARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; length: array of Int32; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSourceARB_ovr_0(obj, maxLength, length[0], par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; length: array of Int32; source: IntPtr); begin z_GetShaderSourceARB_ovr_0(obj, maxLength, length[0], source); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; var length: Int32; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSourceARB_ovr_0(obj, maxLength, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; var length: Int32; source: IntPtr); begin z_GetShaderSourceARB_ovr_0(obj, maxLength, length, source); end; - public z_GetShaderSourceARB_ovr_4 := GetFuncOrNil&(z_GetShaderSourceARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; length: IntPtr; source: string); - begin - var par_4_str_ptr := Marshal.StringToHGlobalAnsi(source); - z_GetShaderSourceARB_ovr_4(obj, maxLength, length, par_4_str_ptr); - Marshal.FreeHGlobal(par_4_str_ptr); - end; + public z_GetShaderSourceARB_ovr_2 := GetFuncOrNil&(z_GetShaderSourceARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetShaderSourceARB(obj: GLhandleARB; maxLength: Int32; length: IntPtr; source: IntPtr); begin - z_GetShaderSourceARB_ovr_4(obj, maxLength, length, source); + z_GetShaderSourceARB_ovr_2(obj, maxLength, length, source); end; end; @@ -18092,79 +17207,37 @@ end; public z_GetNamedStringARB_adr := GetFuncAdr('glGetNamedStringARB'); - public z_GetNamedStringARB_ovr_0 := GetFuncOrNil&(z_GetNamedStringARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: array of Int32; _string: string); - begin - var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_2_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: array of Int32; _string: IntPtr); + public z_GetNamedStringARB_ovr_0 := GetFuncOrNil&(z_GetNamedStringARB_adr); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: array of Int32; string: IntPtr); begin var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen[0], _string); + z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen[0], string); Marshal.FreeHGlobal(par_2_str_ptr); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; var stringlen: Int32; _string: string); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; var stringlen: Int32; string: IntPtr); begin var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen, par_5_str_ptr); + z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen, string); Marshal.FreeHGlobal(par_2_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; var stringlen: Int32; _string: IntPtr); + public z_GetNamedStringARB_ovr_2 := GetFuncOrNil&(z_GetNamedStringARB_adr); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: IntPtr; string: IntPtr); begin var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetNamedStringARB_ovr_0(namelen, par_2_str_ptr, bufSize, stringlen, _string); + z_GetNamedStringARB_ovr_2(namelen, par_2_str_ptr, bufSize, stringlen, string); Marshal.FreeHGlobal(par_2_str_ptr); end; - public z_GetNamedStringARB_ovr_4 := GetFuncOrNil&(z_GetNamedStringARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: IntPtr; _string: string); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: array of Int32; string: IntPtr); begin - var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_4(namelen, par_2_str_ptr, bufSize, stringlen, par_5_str_ptr); - Marshal.FreeHGlobal(par_2_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); + z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen[0], string); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: string; bufSize: Int32; stringlen: IntPtr; _string: IntPtr); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; var stringlen: Int32; string: IntPtr); begin - var par_2_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetNamedStringARB_ovr_4(namelen, par_2_str_ptr, bufSize, stringlen, _string); - Marshal.FreeHGlobal(par_2_str_ptr); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: array of Int32; _string: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); + z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen, string); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: array of Int32; _string: IntPtr); + public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: IntPtr; string: IntPtr); begin - z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen[0], _string); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; var stringlen: Int32; _string: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; var stringlen: Int32; _string: IntPtr); - begin - z_GetNamedStringARB_ovr_0(namelen, name, bufSize, stringlen, _string); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: IntPtr; _string: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(_string); - z_GetNamedStringARB_ovr_4(namelen, name, bufSize, stringlen, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetNamedStringARB(namelen: Int32; name: IntPtr; bufSize: Int32; stringlen: IntPtr; _string: IntPtr); - begin - z_GetNamedStringARB_ovr_4(namelen, name, bufSize, stringlen, _string); + z_GetNamedStringARB_ovr_2(namelen, name, bufSize, stringlen, string); end; public z_GetNamedStringivARB_adr := GetFuncAdr('glGetNamedStringivARB'); @@ -20093,282 +19166,120 @@ public z_GetActiveAttribARB_adr := GetFuncAdr('glGetActiveAttribARB'); public z_GetActiveAttribARB_ovr_0 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size[0], &type, name); end; - public z_GetActiveAttribARB_ovr_4 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetActiveAttribARB_ovr_2 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_2(programObj, index, maxLength, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length[0], size, &type, name); - end; - public z_GetActiveAttribARB_ovr_12 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_2(programObj, index, maxLength, length[0], size, &type, name); end; + public z_GetActiveAttribARB_ovr_6 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_6(programObj, index, maxLength, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length[0], size, &type, name); - end; - public z_GetActiveAttribARB_ovr_16 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_16(programObj, index, maxLength, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_6(programObj, index, maxLength, length[0], size, &type, name); end; + public z_GetActiveAttribARB_ovr_8 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_16(programObj, index, maxLength, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_8(programObj, index, maxLength, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_2(programObj, index, maxLength, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: array of AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; var &type: AttributeType; name: IntPtr); begin z_GetActiveAttribARB_ovr_0(programObj, index, maxLength, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_4(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_2(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_6(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_12(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_16(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_6(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_16(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveAttribARB_ovr_36 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_8(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveAttribARB_ovr_18 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_18(programObj, index, maxLength, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size[0], &type, name); - end; - public z_GetActiveAttribARB_ovr_40 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_40(programObj, index, maxLength, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_18(programObj, index, maxLength, length, size[0], &type, name); end; + public z_GetActiveAttribARB_ovr_20 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_40(programObj, index, maxLength, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_20(programObj, index, maxLength, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_18(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_36(programObj, index, maxLength, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_40(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_18(programObj, index, maxLength, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_40(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveAttribARB_ovr_48 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: array of AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_48(programObj, index, maxLength, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_20(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveAttribARB_ovr_24 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: array of AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_48(programObj, index, maxLength, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; var &type: AttributeType; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_48(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_24(programObj, index, maxLength, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; var &type: AttributeType; name: IntPtr); begin - z_GetActiveAttribARB_ovr_48(programObj, index, maxLength, length, size, &type, name); - end; - public z_GetActiveAttribARB_ovr_52 := GetFuncOrNil&(z_GetActiveAttribARB_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveAttribARB_ovr_52(programObj, index, maxLength, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveAttribARB_ovr_24(programObj, index, maxLength, length, size, &type, name); end; + public z_GetActiveAttribARB_ovr_26 := GetFuncOrNil&(z_GetActiveAttribARB_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveAttribARB(programObj: GLhandleARB; index: UInt32; maxLength: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveAttribARB_ovr_52(programObj, index, maxLength, length, size, &type, name); + z_GetActiveAttribARB_ovr_26(programObj, index, maxLength, length, size, &type, name); end; public z_GetAttribLocationARB_adr := GetFuncAdr('glGetAttribLocationARB'); @@ -22359,36 +21270,18 @@ public z_GetObjectLabelEXT_adr := GetFuncAdr('glGetObjectLabelEXT'); public z_GetObjectLabelEXT_ovr_0 := GetFuncOrNil&(z_GetObjectLabelEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; length: array of Int32; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabelEXT_ovr_0(&type, object, bufSize, length[0], par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; length: array of Int32; &label: IntPtr); begin z_GetObjectLabelEXT_ovr_0(&type, object, bufSize, length[0], &label); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; var length: Int32; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabelEXT_ovr_0(&type, object, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; var length: Int32; &label: IntPtr); begin z_GetObjectLabelEXT_ovr_0(&type, object, bufSize, length, &label); end; - public z_GetObjectLabelEXT_ovr_4 := GetFuncOrNil&(z_GetObjectLabelEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; length: IntPtr; &label: string); - begin - var par_5_str_ptr := Marshal.StringToHGlobalAnsi(&label); - z_GetObjectLabelEXT_ovr_4(&type, object, bufSize, length, par_5_str_ptr); - Marshal.FreeHGlobal(par_5_str_ptr); - end; + public z_GetObjectLabelEXT_ovr_2 := GetFuncOrNil&(z_GetObjectLabelEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetObjectLabelEXT(&type: DummyEnum; object: UInt32; bufSize: Int32; length: IntPtr; &label: IntPtr); begin - z_GetObjectLabelEXT_ovr_4(&type, object, bufSize, length, &label); + z_GetObjectLabelEXT_ovr_2(&type, object, bufSize, length, &label); end; end; @@ -27662,282 +26555,120 @@ public z_GetTransformFeedbackVaryingEXT_adr := GetFuncAdr('glGetTransformFeedbackVaryingEXT'); public z_GetTransformFeedbackVaryingEXT_ovr_0 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size[0], &type, name); end; - public z_GetTransformFeedbackVaryingEXT_ovr_4 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetTransformFeedbackVaryingEXT_ovr_2 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_2(&program, index, bufSize, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_12 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_2(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_6 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_6(&program, index, bufSize, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_16 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_16(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_6(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_8 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_16(&program, index, bufSize, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_8(&program, index, bufSize, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_2(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin z_GetTransformFeedbackVaryingEXT_ovr_0(&program, index, bufSize, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_4(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_2(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_6(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_12(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_16(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_6(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_16(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_36 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_8(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_18 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_18(&program, index, bufSize, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size[0], &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_40 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_40(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_18(&program, index, bufSize, length, size[0], &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_20 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_40(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_20(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_18(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_36(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_40(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_18(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_40(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_48 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_48(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_20(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_24 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_48(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: GlslTypeToken; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_48(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_24(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: GlslTypeToken; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_48(&program, index, bufSize, length, size, &type, name); - end; - public z_GetTransformFeedbackVaryingEXT_ovr_52 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetTransformFeedbackVaryingEXT_ovr_52(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetTransformFeedbackVaryingEXT_ovr_24(&program, index, bufSize, length, size, &type, name); end; + public z_GetTransformFeedbackVaryingEXT_ovr_26 := GetFuncOrNil&(z_GetTransformFeedbackVaryingEXT_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetTransformFeedbackVaryingEXT(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetTransformFeedbackVaryingEXT_ovr_52(&program, index, bufSize, length, size, &type, name); + z_GetTransformFeedbackVaryingEXT_ovr_26(&program, index, bufSize, length, size, &type, name); end; end; @@ -36882,282 +35613,120 @@ public z_GetActiveVaryingNV_adr := GetFuncAdr('glGetActiveVaryingNV'); public z_GetActiveVaryingNV_ovr_0 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: array of DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; var &type: DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size[0], &type, name); end; - public z_GetActiveVaryingNV_ovr_4 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length[0], size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; + public z_GetActiveVaryingNV_ovr_2 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length[0], size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_2(&program, index, bufSize, length[0], size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: array of DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; var &type: DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length[0], size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveVaryingNV_ovr_12 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length[0], size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_2(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveVaryingNV_ovr_6 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: array of DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length[0], size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_6(&program, index, bufSize, length[0], size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; var &type: DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length[0], size, &type, name); - end; - public z_GetActiveVaryingNV_ovr_16 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_16(&program, index, bufSize, length[0], size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_6(&program, index, bufSize, length[0], size, &type, name); end; + public z_GetActiveVaryingNV_ovr_8 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: array of Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_16(&program, index, bufSize, length[0], size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_8(&program, index, bufSize, length[0], size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: array of DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size[0], &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; var &type: DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size[0], &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_2(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: array of DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size, &type[0], name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; var &type: DummyEnum; name: IntPtr); begin z_GetActiveVaryingNV_ovr_0(&program, index, bufSize, length, size, &type, name); end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); - end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_4(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_2(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: array of DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_6(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; var &type: DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_12(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_16(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_6(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; var length: Int32; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_16(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveVaryingNV_ovr_36 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size[0], &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_8(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveVaryingNV_ovr_18 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: array of DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size[0], &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_18(&program, index, bufSize, length, size[0], &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; var &type: DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size[0], &type, name); - end; - public z_GetActiveVaryingNV_ovr_40 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_40(&program, index, bufSize, length, size[0], &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_18(&program, index, bufSize, length, size[0], &type, name); end; + public z_GetActiveVaryingNV_ovr_20 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: array of Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_40(&program, index, bufSize, length, size[0], &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_20(&program, index, bufSize, length, size[0], &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: array of DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_18(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; var &type: DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_36(&program, index, bufSize, length, size, &type, name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_40(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_18(&program, index, bufSize, length, size, &type, name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; var size: Int32; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_40(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveVaryingNV_ovr_48 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_48(&program, index, bufSize, length, size, &type[0], par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_20(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveVaryingNV_ovr_24 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: array of DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_48(&program, index, bufSize, length, size, &type[0], name); - end; - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: DummyEnum; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_48(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_24(&program, index, bufSize, length, size, &type[0], name); end; public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; var &type: DummyEnum; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_48(&program, index, bufSize, length, size, &type, name); - end; - public z_GetActiveVaryingNV_ovr_52 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); - public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: string); - begin - var par_7_str_ptr := Marshal.StringToHGlobalAnsi(name); - z_GetActiveVaryingNV_ovr_52(&program, index, bufSize, length, size, &type, par_7_str_ptr); - Marshal.FreeHGlobal(par_7_str_ptr); + z_GetActiveVaryingNV_ovr_24(&program, index, bufSize, length, size, &type, name); end; + public z_GetActiveVaryingNV_ovr_26 := GetFuncOrNil&(z_GetActiveVaryingNV_adr); public [MethodImpl(MethodImplOptions.AggressiveInlining)] procedure GetActiveVaryingNV(&program: UInt32; index: UInt32; bufSize: Int32; length: IntPtr; size: IntPtr; &type: IntPtr; name: IntPtr); begin - z_GetActiveVaryingNV_ovr_52(&program, index, bufSize, length, size, &type, name); + z_GetActiveVaryingNV_ovr_26(&program, index, bufSize, length, size, &type, name); end; public z_GetTransformFeedbackVaryingNV_adr := GetFuncAdr('glGetTransformFeedbackVaryingNV'); diff --git a/Packing/Template/GL/Log/FinalFuncOverloads.log b/Packing/Template/GL/Log/FinalFuncOverloads.log index 74534ddc..9a80c9dc 100644 --- a/Packing/Template/GL/Log/FinalFuncOverloads.log +++ b/Packing/Template/GL/Log/FinalFuncOverloads.log @@ -695,67 +695,37 @@ UInt32 | UInt32 | AtomicCounterBufferPName | IntPtr | # glGetActiveAttrib - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!AttributeType | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!AttributeType | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!AttributeType | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!AttributeType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetActiveSubroutineName - UInt32 | ShaderType | UInt32 | Int32 | array of Int32 | string | UInt32 | ShaderType | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | ShaderType | UInt32 | Int32 | var!Int32 | string | UInt32 | ShaderType | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | ShaderType | UInt32 | Int32 | IntPtr | string | UInt32 | ShaderType | UInt32 | Int32 | IntPtr | IntPtr | # glGetActiveSubroutineUniformiv @@ -764,67 +734,37 @@ ProgramName | ShaderType | UInt32 | SubroutineParameterName | IntPtr | # glGetActiveSubroutineUniformName - UInt32 | ShaderType | UInt32 | Int32 | array of Int32 | string | UInt32 | ShaderType | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | ShaderType | UInt32 | Int32 | var!Int32 | string | UInt32 | ShaderType | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | ShaderType | UInt32 | Int32 | IntPtr | string | UInt32 | ShaderType | UInt32 | Int32 | IntPtr | IntPtr | # glGetActiveUniform - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!UniformType | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!UniformType | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!UniformType | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!UniformType | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetActiveUniformBlockiv @@ -833,19 +773,13 @@ UInt32 | UInt32 | UniformBlockPName | IntPtr | # glGetActiveUniformBlockName - UInt32 | UInt32 | Int32 | array of Int32 | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | # glGetActiveUniformName - UInt32 | UInt32 | Int32 | array of Int32 | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | # glGetActiveUniformsiv @@ -1104,19 +1038,13 @@ ProgramName | Int32 | Int32 | IntPtr | # glGetObjectLabel - ObjectIdentifier | UInt32 | Int32 | array of Int32 | string | ObjectIdentifier | UInt32 | Int32 | array of Int32 | IntPtr | - ObjectIdentifier | UInt32 | Int32 | var!Int32 | string | ObjectIdentifier | UInt32 | Int32 | var!Int32 | IntPtr | - ObjectIdentifier | UInt32 | Int32 | IntPtr | string | ObjectIdentifier | UInt32 | Int32 | IntPtr | IntPtr | # glGetObjectPtrLabel - IntPtr | Int32 | array of Int32 | string | IntPtr | Int32 | array of Int32 | IntPtr | - IntPtr | Int32 | var!Int32 | string | IntPtr | Int32 | var!Int32 | IntPtr | - IntPtr | Int32 | IntPtr | string | IntPtr | Int32 | IntPtr | IntPtr | # glGetPointerv @@ -1150,11 +1078,8 @@ ProgramName | ProgramPropertyARB | IntPtr | # glGetProgramPipelineInfoLog - UInt32 | Int32 | array of Int32 | string | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | Int32 | var!Int32 | string | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | Int32 | IntPtr | string | UInt32 | Int32 | IntPtr | IntPtr | # glGetProgramPipelineiv @@ -1204,11 +1129,8 @@ Int32 | ProgramName | ProgramInterface | IntPtr | # glGetProgramResourceName - UInt32 | ProgramInterface | UInt32 | Int32 | array of Int32 | string | UInt32 | ProgramInterface | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | ProgramInterface | UInt32 | Int32 | var!Int32 | string | UInt32 | ProgramInterface | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | ProgramInterface | UInt32 | Int32 | IntPtr | string | UInt32 | ProgramInterface | UInt32 | Int32 | IntPtr | IntPtr | # glGetProgramStageiv @@ -1304,11 +1226,8 @@ ShaderType | PrecisionType | IntPtr | IntPtr | # glGetShaderSource - UInt32 | Int32 | array of Int32 | string | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | Int32 | var!Int32 | string | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | Int32 | IntPtr | string | UInt32 | Int32 | IntPtr | IntPtr | # glGetString @@ -1421,59 +1340,32 @@ UInt32 | TransformFeedbackPName | IntPtr | # glGetTransformFeedbackVarying - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetUniformBlockIndex @@ -4481,7 +4373,6 @@ Int32 | GDI_DC | Int32 | Int32 | Int32 | IntPtr | # wglGetProcAddress - IntPtr | string | IntPtr | IntPtr | # wglMakeCurrent @@ -4674,19 +4565,13 @@ UInt32 | IntPtr | IntPtr | Int32 | IntPtr | # glGetPerfMonitorGroupStringAMD - UInt32 | Int32 | array of Int32 | string | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | Int32 | var!Int32 | string | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | Int32 | IntPtr | string | UInt32 | Int32 | IntPtr | IntPtr | # glGetPerfMonitorCounterStringAMD - UInt32 | UInt32 | Int32 | array of Int32 | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | # glGetPerfMonitorCounterInfoAMD @@ -5694,11 +5579,8 @@ GLhandleARB | DummyEnum | IntPtr | # glGetInfoLogARB - GLhandleARB | Int32 | array of Int32 | string | GLhandleARB | Int32 | array of Int32 | IntPtr | - GLhandleARB | Int32 | var!Int32 | string | GLhandleARB | Int32 | var!Int32 | IntPtr | - GLhandleARB | Int32 | IntPtr | string | GLhandleARB | Int32 | IntPtr | IntPtr | # glGetAttachedObjectsARB @@ -5717,59 +5599,32 @@ Int32 | GLhandleARB | IntPtr | # glGetActiveUniformARB - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | array of UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | var!UniformType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | array of UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | var!UniformType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | array of UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | var!UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | array of UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | array of UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | var!UniformType | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | var!UniformType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetUniformfvARB @@ -5783,11 +5638,8 @@ GLhandleARB | Int32 | IntPtr | # glGetShaderSourceARB - GLhandleARB | Int32 | array of Int32 | string | GLhandleARB | Int32 | array of Int32 | IntPtr | - GLhandleARB | Int32 | var!Int32 | string | GLhandleARB | Int32 | var!Int32 | IntPtr | - GLhandleARB | Int32 | IntPtr | string | GLhandleARB | Int32 | IntPtr | IntPtr | # glNamedStringARB @@ -5816,17 +5668,11 @@ boolean | Int32 | IntPtr | # glGetNamedStringARB - Int32 | string | Int32 | array of Int32 | string | Int32 | string | Int32 | array of Int32 | IntPtr | - Int32 | string | Int32 | var!Int32 | string | Int32 | string | Int32 | var!Int32 | IntPtr | - Int32 | string | Int32 | IntPtr | string | Int32 | string | Int32 | IntPtr | IntPtr | - Int32 | IntPtr | Int32 | array of Int32 | string | Int32 | IntPtr | Int32 | array of Int32 | IntPtr | - Int32 | IntPtr | Int32 | var!Int32 | string | Int32 | IntPtr | Int32 | var!Int32 | IntPtr | - Int32 | IntPtr | Int32 | IntPtr | string | Int32 | IntPtr | Int32 | IntPtr | IntPtr | # glGetNamedStringivARB @@ -6407,59 +6253,32 @@ GLhandleARB | UInt32 | IntPtr | # glGetActiveAttribARB - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | array of AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | array of AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | var!AttributeType | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | var!AttributeType | IntPtr | - GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | GLhandleARB | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetAttribLocationARB @@ -7081,11 +6900,8 @@ DummyEnum | UInt32 | Int32 | IntPtr | # glGetObjectLabelEXT - DummyEnum | UInt32 | Int32 | array of Int32 | string | DummyEnum | UInt32 | Int32 | array of Int32 | IntPtr | - DummyEnum | UInt32 | Int32 | var!Int32 | string | DummyEnum | UInt32 | Int32 | var!Int32 | IntPtr | - DummyEnum | UInt32 | Int32 | IntPtr | string | DummyEnum | UInt32 | Int32 | IntPtr | IntPtr | # glInsertEventMarkerEXT @@ -8776,59 +8592,32 @@ UInt32 | Int32 | IntPtr | DummyEnum | # glGetTransformFeedbackVaryingEXT - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!GlslTypeToken | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!GlslTypeToken | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glArrayElementEXT @@ -11374,59 +11163,32 @@ Int32 | UInt32 | IntPtr | # glGetActiveVaryingNV - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!DummyEnum | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | array of Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!DummyEnum | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | var!Int32 | IntPtr | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | array of Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | var!Int32 | IntPtr | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | array of DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!DummyEnum | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | var!DummyEnum | IntPtr | - UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | string | UInt32 | UInt32 | Int32 | IntPtr | IntPtr | IntPtr | IntPtr | # glGetTransformFeedbackVaryingNV diff --git a/README.md b/README.md index 66f2c6eb..8194172a 100644 --- a/README.md +++ b/README.md @@ -1,7 +1,7 @@ # POCGL -pascal wrappers of OpenCL and OpenGL +Pascal Wrappers of OpenCL and OpenGL ---