let load_from_file fn =
  from_buffer (AlBuffer.load_from_file fn)