Просмотр исходного кода

use proper position for safe-navigation generated if

Dan Korostelev 3 лет назад
Родитель
Сommit
4e5e766d55
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      src/typing/fields.ml

+ 1 - 1
src/typing/fields.ml

@@ -586,7 +586,7 @@ let type_field cfg ctx e i p mode (with_type : WithType.t) =
 			ethen
 			ethen
 		in
 		in
 		let eelse = Builder.make_null tnull ethen.epos in
 		let eelse = Builder.make_null tnull ethen.epos in
-		let eif = mk (TIf(eneq,ethen,Some eelse)) tnull e.epos in
+		let eif = mk (TIf(eneq,ethen,Some eelse)) tnull p in
 		AKExpr (vr#to_texpr eif)
 		AKExpr (vr#to_texpr eif)
 	end
 	end