method content =
      List.sort Pervasives.compare
        (M.elements (M.storable_get_multiclip st_clip))