@verb #602:"glXCreateContext" this none this rxdo #55
@program #602:"glXCreateContext" this none this
{s, visual, screen, share_with} = args
context_id = this:XAllocID(s)
dec_context_id = {context_id / 2 ^ 24 % 256, context_id / 2 ^ 16 % 256, context_id / 256 % 256, context_id % 256}
visual = {visual / 2 ^ 24 % 256, visual / 2 ^ 16 % 256, visual / 256 % 256, visual % 256}
screen = {screen / 2 ^ 24 % 256, screen / 2 ^ 16 % 256, screen / 256 % 256, screen % 256}
share_with = {share_with / 2 ^ 24 % 256, share_with / 2 ^ 16 % 256, share_with / 256 % 256, share_with % 256}
is_direct = 0
this:send_glx_request(s, 3, {@dec_context_id, @visual, @screen, @share_with, !!is_direct, 0, 0, 0})
return context_id
"Last modified by manta (#7165) on Fri Apr 14 10:25:13 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."
.