diff options
| author | Dan Gudmundsson <[email protected]> | 2011-12-10 09:50:23 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2011-12-10 09:50:23 +0100 |
| commit | 8d03b919f06db216a271bc90cf90d9c697a5a5c8 (patch) | |
| tree | 49dc8f7773e4ee0db65c84b8a79fdb19bad6663d /lib/wx/api_gen/gl_gen_c.erl | |
| parent | f20b520b0d2d990ab70b56345b63a8b508edde1a (diff) | |
| parent | 44d21ab66987c4dc4df461901600618efd2907c3 (diff) | |
| download | otp-8d03b919f06db216a271bc90cf90d9c697a5a5c8.tar.gz otp-8d03b919f06db216a271bc90cf90d9c697a5a5c8.tar.bz2 otp-8d03b919f06db216a271bc90cf90d9c697a5a5c8.zip | |
Merge branch 'dgud/wx/behaviour-spec'
* dgud/wx/behaviour-spec:
[wx] Add handle_cast to avoid behaviour warning
[wx] Avoid missing wx_object behaviour warning
[wx] Remove warnings Add an additional cast when casting buffer offsets, to remove warnings "cast to pointer from integer of different size"
[wx] Add callback specs to wx_object
Diffstat (limited to 'lib/wx/api_gen/gl_gen_c.erl')
| -rw-r--r-- | lib/wx/api_gen/gl_gen_c.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/wx/api_gen/gl_gen_c.erl b/lib/wx/api_gen/gl_gen_c.erl index 0f5cb0e1f4..be2c5cf2bf 100644 --- a/lib/wx/api_gen/gl_gen_c.erl +++ b/lib/wx/api_gen/gl_gen_c.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2010. All Rights Reserved. +%% Copyright Ericsson AB 2008-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -238,7 +238,7 @@ decode_arg(P=#arg{name=Name,type=#type{size=BSz,name=Type,single={list,TSz}}},A0 {P, A}; decode_arg(P=#arg{name=Name,type=#type{name=Type,base=guard_int}},A0) -> A = align(4,A0), - w(" ~s *~s = (~s *) * (int *) bp; bp += 4;~n", [Type,Name,Type]), + w(" ~s *~s = (~s *) (ErlDrvSInt) * (int *) bp; bp += 4;~n", [Type,Name,Type]), {P, A}; decode_arg(P=#arg{name=Name,type=#type{name=Type,base=string,single=true}},A0) -> w(" ~s *~s = (~s *) bp;~n", [Type,Name,Type]), |