let long_class_ident = long_lident "invalid class name"