Split opengl functionality into separate dynamic library

The idea is to build a separate opengl library which can be reused
by other erlang applications.

1 files changed, 17 insertions, 0 deletions

diff --git a/lib/wx/api_gen/wx_gen_erl.erl b/lib/wx/api_gen/wx_gen_erl.erl
index 7962dd9fbf..8648174b5b 100644
--- a/lib/wx/api_gen/wx_gen_erl.erl
+++ b/lib/wx/api_gen/wx_gen_erl.erl
@@ -270,6 +270,16 @@ gen_method2(M=#method{name=N,alias=A,params=Ps,type=T,method_type=MT,id=MethodId
     MId = arg_type_tests(Args, "?" ++ get_unique_name(MethodId)),
     {MArgs,Align} = marshal_args(Args),
     MOpts = marshal_opts(Optional, Align, Args),
+    case M#method.pre_hook of
+	{erl,Pre} -> w("  ~s~n", [Pre]);
+	_ -> skip
+    end,
+
+    case M#method.post_hook of
+	{erl,_} -> w("  _Result = ~n", []);
+	_ -> skip
+    end,
+    
     case have_return_vals(T, Ps) of
 	_ when MT =:= constructor ->
 	    w("  wxe_util:construct(~s,~n  <<~s~s>>)", [MId, MArgs,MOpts]);
@@ -278,6 +288,13 @@ gen_method2(M=#method{name=N,alias=A,params=Ps,type=T,method_type=MT,id=MethodId
 	false -> 
 	    w("  wxe_util:cast(~s,~n  <<~s~s>>)", [MId, MArgs,MOpts])
     end,
+    case M#method.post_hook of
+	{erl,Post} -> 
+	    w("  ~s~n", [Post]),
+	    w("  _Result~n", []);
+	_ -> skip
+    end,
+   
     erase(current_func),
     M.