[cl-unification-cvs] CVS update: cl-unification/match-block.lisp

[Marco Antoniotti]

Update of /project/cl-unification/cvsroot/cl-unification
In directory common-lisp.net:/tmp/cvs-serv25202

Modified Files:
	match-block.lisp 
Log Message:
Added acknowledgement to Peter Scott.

Date: Wed Apr 27 22:54:05 2005
Author: mantoniotti

Index: cl-unification/match-block.lisp
diff -u cl-unification/match-block.lisp:1.3 cl-unification/match-block.lisp:1.4
--- cl-unification/match-block.lisp:1.3	Wed Apr 27 22:52:09 2005
+++ cl-unification/match-block.lisp	Wed Apr 27 22:54:05 2005
@@ -127,6 +127,9 @@
 
 
 
+;;; match-case --
+;;; Implementation provided by Peter Scott.
+
 (defmacro match-case ((object &key errorp default-substitution) &rest clauses)
   "MATCH-CASE sets up a CASE-like environment for multiple template matching clauses.
 The syntax of MATCH-CASE comprises a number of clauses of the form