@verb #602:"glXGetVisualConfigs" this none this rxdo #55 @program #602:"glXGetVisualConfigs" this none this {s, screen} = args this:unmonitor_connection(s) try this:send_glx_request(s, 14, {screen / 2 ^ 24 % 256, screen / 2 ^ 16 % 256, screen / 2 ^ 8 % 256, screen % 256}) r = this:wait_for_response(s) finally this:monitor_connection(s) endtry nvisuals = r[2] * 2 ^ 24 + r[3] * 2 ^ 16 + r[4] * 256 + r[5] nproperties = r[6] * 2 ^ 24 + r[7] * 2 ^ 16 + r[8] * 256 + r[9] i = 26 v = {} for x in [1..nvisuals] p = {} for y in [1..nproperties] p = {@p, r[i] * 2 ^ 24 + r[i + 1] * 2 ^ 16 + r[i + 2] * 256 + r[i + 3]} i = i + 4 endfor v = {@v, p} endfor return v "Last modified by manta (#7165) on Mon Apr 17 14:45:06 2000 EDT." "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:06 2002 MDT)." "Last modified by Dax (#789) on Sat Aug 17 14:50:06 2002 MDT." .