|
@@ -200,6 +200,8 @@ let promote_complex_rhs ctx e =
|
|
{ e with eexpr = TMeta(m,loop f e1)}
|
|
{ e with eexpr = TMeta(m,loop f e1)}
|
|
| TReturn _ | TThrow _ ->
|
|
| TReturn _ | TThrow _ ->
|
|
find e
|
|
find e
|
|
|
|
+ | TContinue | TBreak ->
|
|
|
|
+ e
|
|
| TCast(e1,None) when ctx.config.pf_ignore_unsafe_cast ->
|
|
| TCast(e1,None) when ctx.config.pf_ignore_unsafe_cast ->
|
|
loop f e1
|
|
loop f e1
|
|
| _ ->
|
|
| _ ->
|