sig
  class virtual unqueued :
    kind:Frame.content_kind ->
    name:string ->
    object
      val mutable ns_kind : string
      method abort_track : unit
      method advance : unit
      method after_output : unit
      method clock : Source.clock_variable
      method copy_queue : Request.t list
      method private create_request :
        ?metadata:(string * string) list ->
        ?persistent:bool ->
        ?indicators:Request.indicator list -> string -> Request.t
      method get : Frame.t -> unit
      method private get_frame : Frame.t -> unit
      method virtual get_next_file : Request.t option
      method get_ready : ?dynamic:bool -> Source.source list -> unit
      method id : string
      method is_output : bool
      method is_ready : bool
      method kind : Frame.content_kind
      method leave : ?dynamic:bool -> Source.source -> unit
      method private log : Dtools.Log.t
      method on_shutdown : (unit -> unit) -> unit
      method register_command :
        descr:string -> ?usage:string -> string -> (string -> string) -> unit
      method remaining : int
      method seek : int -> int
      method private set_clock : unit
      method set_id : ?definitive:bool -> string -> unit
      method private sleep : unit
      method virtual stype : Source.source_t
      method private wake_up : Source.source list -> unit
    end
  class virtual queued :
    kind:Frame.content_kind ->
    name:string ->
    ?length:float ->
    ?default_duration:float ->
    ?conservative:bool ->
    ?timeout:float ->
    unit ->
    object
      val mutable ns_kind : string
      method abort_track : unit
      method advance : unit
      method after_output : unit
      method clock : Source.clock_variable
      method copy_queue : Request.t list
      method private create_request :
        ?metadata:(string * string) list ->
        ?persistent:bool ->
        ?indicators:Request.indicator list -> string -> Request.t
      method private expire : (Request.t -> bool) -> unit
      method get : Frame.t -> unit
      method private get_frame : Frame.t -> unit
      method get_next_file : Request.t option
      method virtual get_next_request : Request.t option
      method get_ready : ?dynamic:bool -> Source.source list -> unit
      method id : string
      method is_output : bool
      method is_ready : bool
      method kind : Frame.content_kind
      method leave : ?dynamic:bool -> Source.source -> unit
      method private log : Dtools.Log.t
      method private notify_new_request : unit
      method on_shutdown : (unit -> unit) -> unit
      method register_command :
        descr:string -> ?usage:string -> string -> (string -> string) -> unit
      method remaining : int
      method seek : int -> int
      method private set_clock : unit
      method set_id : ?definitive:bool -> string -> unit
      method private sleep : unit
      method stype : Source.source_t
      method private wake_up : Source.source list -> unit
    end
  val queued_proto : Lang.proto
  val extract_queued_params : Lang.env -> float * float * float * bool
end