From 2e605129613ba88427de27520a19456903d40cca Mon Sep 17 00:00:00 2001 From: Dan Gudmundsson Date: Fri, 22 Oct 2010 15:45:28 +0200 Subject: Update to OpenGL 4.1 --- lib/wx/src/gen/glu.erl | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'lib/wx/src/gen/glu.erl') diff --git a/lib/wx/src/gen/glu.erl b/lib/wx/src/gen/glu.erl index 300b411fd2..c16f0cf125 100644 --- a/lib/wx/src/gen/glu.erl +++ b/lib/wx/src/gen/glu.erl @@ -50,6 +50,9 @@ -define(GLintptr,64/native-unsigned). -define(GLUquadric,64/native-unsigned). -define(GLhandleARB,64/native-unsigned). +-define(GLsync,64/native-unsigned). +-define(GLuint64,64/native-unsigned). +-define(GLint64,64/native-signed). -type enum() :: non_neg_integer(). -type mem() :: binary() | tuple(). @@ -121,13 +124,11 @@ build3DMipmaps(Target,InternalFormat,Width,Height,Depth,Format,Type,Data) -> send_bin(Data), call(5015, <>). -%% @spec (ExtName::[integer()],ExtString::[integer()]) -> 0|1 +%% @spec (ExtName::string(),ExtString::string()) -> 0|1 %% @doc See external documentation. --spec checkExtension([integer()],[integer()]) -> 0|1. +-spec checkExtension(string(),string()) -> 0|1. checkExtension(ExtName,ExtString) -> - call(5016, <<(length(ExtName)):?GLuint, - (<< <> || C <- ExtName>>)/binary,0:((8-((length(ExtName)+ 4) rem 8)) rem 8),(length(ExtString)):?GLuint, - (<< <> || C <- ExtString>>)/binary,0:((8-((length(ExtString)+ 4) rem 8)) rem 8)>>). + call(5016, <<(list_to_binary([ExtName|[0]]))/binary,0:((8-((length(ExtName)+ 1) rem 8)) rem 8),(list_to_binary([ExtString|[0]]))/binary,0:((8-((length(ExtString)+ 1) rem 8)) rem 8)>>). %% @spec (Quad::integer(),Base::float(),Top::float(),Height::float(),Slices::integer(),Stacks::integer()) -> ok %% @doc See external documentation. -- cgit v1.2.3