{	name = 'support.function.boolean-test.scheme';
					comment = '
						These functions run a test, and return a boolean
						answer.
					';
					match = '(?x)
						(?<=(\s|\()) # preceded by space or (
						( char-alphabetic|char-lower-case|char-numeric|
						  char-ready|char-upper-case|char-whitespace|
						  (?:char|string)(?:-ci)?(?:=|<=?|>=?)|
						  atom|boolean|bound-identifier=|char|complex|
						  identifier|integer|symbol|free-identifier=|inexact|
						  eof-object|exact|list|(?:input|output)-port|pair|
						  real|rational|zero|vector|negative|odd|null|string|
						  eq|equal|eqv|even|number|positive|procedure
						)
						(\?)		# name ends with ? sign
						(?=(\s|\()) # followed by space or (
					';
				},
				{	name = 'support.function.convert-type.scheme';
					comment = '
						These functions change one type into another.
					';
					match = '(?x)
						(?<=(\s|\()) # preceded by space or (
						( char->integer|exact->inexact|inexact->exact|
						  integer->char|symbol->string|list->vector|
						  list->string|identifier->symbol|vector->list|
						  string->list|string->number|string->symbol|
						  number->string
						)
						(?=(\s|\()) # followed by space or (
					';
				},
				{	name = 'support.function.with-side-effects.scheme';
					comment = '
						These functions are potentially dangerous because
						they have side-effects which could affect other
						parts of the program.
					';
					match = '(?x)
						(?<=(\s|\()) # preceded by space or (
						( set-(?:car|cdr)|				 # set car/cdr
						  (?:vector|string)-(?:fill|set) # fill/set string/vector
						)
						(!)			# name ends with ! sign
						(?=(\s|\()) # followed by space or (
					';
				},
				{	name = 'support.function.arithmetic-operators.scheme';
					comment = '
						+, -, *, /, =, >, etc.
					';
					match = '(?x)
						(?<=(\s|\()) # preceded by space or (
						( >=?|<=?|=|[*/+-])
						(?=(\s|\()) # followed by space or (
						';
				},
				{	name = 'support.function.general.scheme';
					match = '(?x)
						(?<=(\s|\()) # preceded by space or (
						( append|apply|approximate|
						  call-with-current-continuation|call/cc|catch|
						  construct-identifier|define-syntax|display|foo|
						  for-each|force|cd|gen-counter|gen-loser|
						  generate-identifier|last-pair|length|let-syntax|
						  letrec-syntax|list|list-ref|list-tail|load|log|
						  macro|magnitude|map|map-streams|max|member|memq|
						  memv|min|newline|nil|not|peek-char|rationalize|
						  read|read-char|return|reverse|sequence|substring|
						  syntax|syntax-rules|transcript-off|transcript-on|
						  truncate|unwrap-syntax|values-list|write|write-char|

						  # cons, car, cdr, etc
						  cons|c(a|d){1,4}r|

						  # unary math operators
						  abs|acos|angle|asin|assoc|assq|assv|atan|ceiling|
						  cos|floor|round|sin|sqrt|tan|
						  (?:real|imag)-part|numerator|denominator

						  # other math operators
						  modulo|exp|expt|remainder|quotient|lcm|

						  # ports / files
						  call-with-(?:input|output)-file|
						  (?:close|current)-(?:input|output)-port|
						  with-(?:input|output)-from-file|
						  open-(?:input|output)-file|

						  # char-«foo»
						  char-(?:downcase|upcase|ready)|

						  # make-«foo»
						  make-(?:polar|promise|rectangular|string|vector)

						  # string-«foo», vector-«foo»
						  string(?:-(?:append|copy|length|ref))?|
						  vector(?:-length|-ref)
						)
						(?=(\s|\()) # followed by space or (
					';
				},