sig
external new_from_input : input:SWF.input -> SWF.bitmap
= "ml_newswfbitmap_frominput"
external destroy : bitmap:SWF.bitmap -> unit = "ml_destroyswfbitmap"
external get_width : bitmap:SWF.bitmap -> int = "ml_swfbitmap_getwidth"
external get_height : bitmap:SWF.bitmap -> int = "ml_swfbitmap_getheight"
end