X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=forth.jl.git;a=blobdiff_plain;f=src%2Flib_9_misc.4th;h=9078fc4d9a6cbed01713065203619a01e6ed2b47;hp=a864cbbedae0d1b2d8a4df81b05dc525447fbbb0;hb=90a9b8ad41a542c3ca7d150d4d1168cb8ec97b81;hpb=56f581c25775f4244cd60d5943a5beb46a9ccafb

diff --git a/src/lib_9_misc.4th b/src/lib_9_misc.4th
index a864cbb..9078fc4 100644
--- a/src/lib_9_misc.4th
+++ b/src/lib_9_misc.4th
@@ -1,4 +1,4 @@
-\ Miscellaneous core words
+\ Miscellaneous undefined core words
 
 : ROLL ( x_u x_u-1... x_0 u -- x_u-1 ... x_0 x_u )
         1+ DUP PICK SWAP    ( x_u x_u-1 ... x_0 x_u u+1 )
@@ -24,13 +24,5 @@
         then
 ;
 
-: MIN           ( n m -- max )
-        2dup - 0> if
-                swap drop
-        else
-                drop
-        then
-;
-
 : UNUSED  ( -- cells )
         MEMSIZE HERE - ;