From 97e1e537811b4825453bfbe5ed7a8aebb8a6cb47 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Wed, 9 Jan 2008 19:13:50 -0500
Subject: [PATCH] Update extra/match for define-compound => define renaming

---
 extra/match/match.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/match/match.factor b/extra/match/match.factor
index 527d7f2465..117fc7ce05 100755
--- a/extra/match/match.factor
+++ b/extra/match/match.factor
@@ -11,7 +11,7 @@ SYMBOL: _
 : define-match-var ( name -- )
     create-in
     dup t "match-var" set-word-prop
-    dup [ get ] curry define-compound ;
+    dup [ get ] curry define ;
 
 : define-match-vars ( seq -- )
     [ define-match-var ] each ;