Re: simple pattern matcher

[Keisuke Nishida]

At Sat, 24 Feb 2001 17:33:43 -0500,
Keisuke Nishida wrote:
> 
> But probably you are right; I'll try to port one of them some time
> if nobody else wants to do that.

Actually, I don't need to port it, if I can depend on slib.
With Anrew K. Wright's matcher, the following module is sufficient:

---- ice-9/match.scm -------------------
(define-module  (ice-9 match)
  :use-module (ice-9 slib)
  :export (match))

(load "match-slib.scm")
----------------------------------------

guile> (use-modules (ice-9 match))
guile> (match '(+ 1 2) (('+ x y) `(add ,x ,y)))
(add 1 2)
guile> 

May I add these files?  Or maybe I can include the module definition
in "match-slib.scm" and rename it "match.scm".

Kei