sig
external new_movie : unit -> SWF.movie = "ml_newswfmovie"
external destroy : movie:SWF.movie -> unit = "ml_destroyswfmovie"
external add : movie:SWF.movie -> block:SWF.block -> SWF.display_item
= "ml_swfmovie_add"
external remove : movie:SWF.movie -> display_item:SWF.display_item -> unit
= "ml_swfmovie_remove"
external set_background :
movie:SWF.movie -> r:int -> g:int -> b:int -> unit
= "ml_swfmovie_setbackground"
external set_dimension : movie:SWF.movie -> x:float -> y:float -> unit
= "ml_swfmovie_setdimension"
external save : movie:SWF.movie -> filename:string -> int
= "ml_swfmovie_save"
external set_rate : movie:SWF.movie -> rate:float -> unit
= "ml_swfmovie_setrate"
external next_frame : movie:SWF.movie -> unit = "ml_swfmovie_nextframe"
end