    class
    	POLL_MASK

    General
    	cluster: polling
    	description: "A mask for use with a medium poller."
    	create: make

    Ancestors
    	ANY

    Queries
    	count: INTEGER_32
    	is_bit_set (b: INTEGER_32): BOOLEAN
    	is_equal (other: [like Current] POLL_MASK): BOOLEAN
    	is_medium_ready (s: IO_MEDIUM): BOOLEAN
    	mask: MANAGED_POINTER

    Commands
    	clear
    	clear_bit (b: INTEGER_32)
    	clear_medium (s: IO_MEDIUM)
    	copy (other: [like Current] POLL_MASK)
    	make
    	set_bit (b: INTEGER_32)
    	set_medium (s: IO_MEDIUM)