class type supports = object .. end
object
end
method _QueryInterface : 'a. 'a interface -> 'a
'a. 'a interface -> 'a