Haskell custom ident regex