..

original commit: 91dfd733b67a2b3a2a025d1c4c77a6a04da47912
2003-11-03 19:54:51 +00:00 · 2003-11-03 19:54:51 +00:00 · 88034d298b
commit 88034d298b
parent 067e8a0951
1 changed files with 1 additions and 1 deletions
--- a/collects/framework/private/main.ss
+++ b/collects/framework/private/main.ss
@ -104,6 +104,7 @@
 	(for-each (lambda (x) 
 		    (hash-table-put! hash-table x 'define))
 		  '(define defmacro define-macro
+                     match-lambda match-lambda*
                     define-syntax-set
 		     define-values
                     define/public define/override define/private define/field
@ -129,7 +130,6 @@

                     
                     lambda let let* letrec recur
-                     match-lambda match-lambda*
                     letrec-values
                     with-syntax
 		     with-continuation-mark