inherit の文法

class_fields INHERIT class_expr parent_binder

というパースルールなので、

class c0 x = object val x = x end

class c = object
  inherit let x = 1 in c0 x
end

と書けることに気が付いた。わからんではないがキモイ。