Source position: xinput.pp line 307
type TXKeyStatus = record
c_class: cuchar;
length: cuchar;
num_keys: cshort;
keys: array [0..31] of cchar;
end;