Remove out-of-date comment

This comment was made unnecessary by GPR#1610.
master
Leo White 2019-04-16 16:29:56 +01:00
parent a8fd17f8ce
commit 26389cb4ef
1 changed files with 0 additions and 2 deletions

View File

@ -82,8 +82,6 @@ let rec eval_address = function
end
| Env.Adot(addr, pos) -> Obj.field (eval_address addr) pos
(* PR#7258: get rid of module aliases before evaluating paths *)
let eval_value_path env path =
match Env.find_value_address path env with
| addr -> eval_address addr