Commit 16ee6642 authored by POTTIER Francois's avatar POTTIER Francois

Spacing.

parent 2dd82c6b
......@@ -11,7 +11,7 @@ let table =
let h (e : hexpr oexpr) : hexpr =
H (hashcons table e)
class ['self] hmap = object(self : 'self)
class ['self] hmap = object (self : 'self)
inherit [_] omap
method visit_'expr env (H { node = e; _ }) =
h (self#visit_oexpr env e)
......
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