Nicolas Cannasse 12 年之前
父节点
当前提交
21fa5a68ea
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      genswf.ml

+ 1 - 1
genswf.ml

@@ -530,7 +530,7 @@ let swf_ver = function
 	| 11.3 -> 16
 	| 11.4 -> 17
 	| 11.5 -> 18
-	| _ -> assert false
+	| v -> failwith ("Invalid SWF version " ^ string_of_float v)
 
 let convert_header com (w,h,fps,bg) =
 	let high = (max w h) * 20 in