core: rename in-word-definition to in-definition

diff --git a/basis/locals/parser/parser.factor b/basis/locals/parser/parser.factor
index 4b212f098ea9c5e8a61faab9e8bc3e66fe8b2cbc..0d2e74545e677d3841380a58e6b73356bfe3f247 100644 (file)
--- a/basis/locals/parser/parser.factor
+++ b/basis/locals/parser/parser.factor
@@ -90,7 +90,7 @@ M: lambda-parser parse-quotation ( -- quotation )
         scan-new-word
         [ parse-definition ]
         parse-locals-definition
-    ] in-word-definition ;
+    ] in-definition ;
 
 : (M::) ( -- word def )
     [
@@ -99,4 +99,4 @@ M: lambda-parser parse-quotation ( -- quotation )
             [ parse-definition ]
             parse-locals-method-definition drop
         ] with-method-definition
-    ] in-word-definition ;
+    ] in-definition ;

diff --git a/core/effects/parser/parser.factor b/core/effects/parser/parser.factor
index f14877a5650ae7f32d00726b46813b8b60ad0abb..5501515199e60ae927d790f38b4d0b236ebbb27c 100644 (file)
--- a/core/effects/parser/parser.factor
+++ b/core/effects/parser/parser.factor
@@ -59,7 +59,7 @@ ERROR: can't-nest-definitions word ;
 : check-in-definition ( -- )
     in-definition get [ word can't-nest-definitions ] when ;
 
-: in-word-definition ( quot -- )
+: in-definition ( quot -- )
     [ check-in-definition t in-definition ] dip with-variable ; inline
 
 : (:) ( -- word def effect )
@@ -67,4 +67,4 @@ ERROR: can't-nest-definitions word ;
         scan-new-word
         scan-effect
         parse-definition swap
-    ] in-word-definition ;
+    ] in-definition ;

diff --git a/core/generic/parser/parser.factor b/core/generic/parser/parser.factor
index 90f7b91f839888d9fb28659ebe120fd745693e26..42704ed1caf5cba96c6e858d609b1bea26ab1fc7 100644 (file)
--- a/core/generic/parser/parser.factor
+++ b/core/generic/parser/parser.factor
@@ -56,4 +56,4 @@ PRIVATE>
 : (M:) ( -- method def )
     [
         scan-new-method [ parse-method-definition ] with-method-definition
-    ] in-word-definition ;
+    ] in-definition ;