frabbit 11 ani în urmă
părinte
comite
40870dfcd8
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      genpy.ml

+ 1 - 1
genpy.ml

@@ -640,7 +640,7 @@ module Transformer = struct
 					in
 					match b with
 					| [{ eexpr = TVar(_, Some({ eexpr = TFunction(f)}))} as b] ->
-						Some(eif1.a_expr), List.append blocks [b]
+						Some(eelse1.a_expr), List.append blocks [b]
 					| _ -> regular
 			in
 			let blocks = List.append econd1.a_blocks blocks in