[fpc-pascal] List of chars for case

[Ryan Joseph]

Is there a way to make a constant for a list of chars which I can use in a case statement? I’ve got a bunch of code duplication happening I’d like to clean up.

const
  TChars = ('[', ']', '(', ')', '{', '}', '=', ‘:’);


case c of
  TChars:
    ...


Regards,
	Ryan Joseph