external geti : t -> [< `frequency
                     |  `bits
                     |  `channels
                     |  `size] -> int = "al_buffer_geti"