I get the error "This expression has no method expr" and it points to  
super#expr below.

Is there no expr in map anymore or am I doing something wrong?

class map = Camlp4Filters.GenerateMap.generated;;

let strip_token_loc = object
   inherit map as super
   method expr e =
     match super#expr e with
       | `TokenPos (a, _) -> a
       | e                -> e
end

	Thanks, Joel

--
http://wagerlabs.com