`BOOLEAN as a pattern in s-exp-match?

[ProfessorO]

It would be nice to have `BOOLEAN match Boolean values in the s-exp-match? patterns. That would complete the collection of built-in-types that can easily be matched.

> (s-exp-match? `BOOLEAN `#t)
- Boolean
#f

Should return #t instead.

Possibly related to #8.