Commit 2f361410 by Danny Willems

KitRename: lookup must return the same atom if the atom is not in the environment.

parent 589e20ca
......@@ -21,7 +21,7 @@ let lookup env x =
try
Atom.Map.find x env
with Not_found ->
assert false
x
class ['self] map = object (_ : 'self)
method private extend = extend
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment