Skip to content

Commit

Permalink
try to update FAnon/FDynamic access in the end (closes #6263)
Browse files Browse the repository at this point in the history
  • Loading branch information
Simn committed May 29, 2017
1 parent 171618a commit a03477e
Showing 1 changed file with 4 additions and 0 deletions.
4 changes: 4 additions & 0 deletions src/optimization/analyzerTexpr.ml
Expand Up @@ -1006,6 +1006,10 @@ module Cleanup = struct
| _ ->
{e with eexpr = TWhile(e1,e2,NormalWhile)}
end
| TField(e1,(FAnon {cf_name = s} | FDynamic s)) ->
let e1 = loop e1 in
let fa = quick_field_dynamic e1.etype s in
{e with eexpr = TField(e1,fa)}
| TField({eexpr = TTypeExpr _},_) ->
e
| TTypeExpr (TClassDecl c) ->
Expand Down

1 comment on commit a03477e

@RealyUniqueName
Copy link
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Somehow this commit fixes #6502

Please sign in to comment.