sig
external new_movie_clip : unit -> SWF.movie_clip = "ml_newswfmovieclip"
external add :
movie_clip:SWF.movie_clip -> block:SWF.block -> SWF.display_item
= "ml_swfmovieclip_add"
external next_frame : movie_clip:SWF.movie_clip -> unit
= "ml_swfmovieclip_nextframe"
end