syntax error in reference implementation

[AndrevanTonder <andre@xxxxxxxxxxxxx>]

The reference implementation has the following syntax error:

  (define-syntax (stream-match-pattern x) ------)

It should be

  (define-syntax stream-match
    (lambda (x) ------)

After fixing that, I succeeded in running a small example in Larceny.

Andre