external unlock : accel_group -> unit
      = "ml_gtk_accel_group_unlock"