Print the contents of arrays and references

[gldbg.git] / source / glwrap.funcs.t

diff --git a/source/glwrap.funcs.t b/source/glwrap.funcs.t
index decf22e9bb320196fbcc1ee9bce31dc431137b2d..fbba906909d5e803a3037a43a8d1c85c953d232e 100644 (file)
--- a/source/glwrap.funcs.t
+++ b/source/glwrap.funcs.t
@@ -1,4 +1,7 @@
 # $Id$
+!handcode glGetError
+!handcode glXGetProcAddress
+!handcode glXGetProcAddressARB
 wl('%s APIENTRY %s(%s)', ret.ctype, func.name, ", ".join([p.ctype+" "+p.name for p in params]))
 wl('{')
 wl('   static %s (*orig)(%s);', ret.ctype, ", ".join([p.ctype for p in params]))
@@ -16,11 +19,15 @@ if ret.ctype!='void':
 for p in params:
        if p.kind=="value":
                wl('    write_%s(%s);', p.io[0], p.name)
+       elif p.kind=="array" and p.io and p.io[0]=="string":
+               wl('  write_string_array(%s, %s);', p.name, p.csize)
        elif p.csize:
                wl('    write_data(%s, %s);', p.name, p.csize)
        else:
                wl('    write_pointer(%s);', p.name)
 wl('   send_packet();')
+if not func.name.startswith("glX"):
+       wl('    check_error();')
 if ret.ctype!='void':
        wl('    return ret;')
 wl('}')