In DEFINE-STANDARD-KEYWORD, pass a list of fragments to

In DEFINE-STANDARD-KEYWORD, pass a list of fragments to
DEFINE-KEYPARSER-PATTERN as one argument, not the fragments as
separate arguments.  This is supposed to be a `pattern' structure,
although it might be better to have an abstract MAKE-PATTERN
constructor or something instead of exposing the representation of
patterns as lists.