Nicolas Cannasse 18 年之前
父節點
當前提交
ceda5bf481
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      typer.ml

+ 1 - 1
typer.ml

@@ -1477,7 +1477,7 @@ and type_switch ctx e cases def need_val p =
 			List.map (fun c ->
 				match c with
 				| CExpr (({ eexpr = TConst c }) as e) ->
-					if Hashtbl.mem consts c then error "Duplicate constant in swtich" e.epos;
+					if Hashtbl.mem consts c then error "Duplicate constant in switch" e.epos;
 					Hashtbl.add consts c true;
 					e
 				| CExpr c -> c