From 42a121fb609b61438fdd86219a2414ba1a69e57f Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Sat, 7 Nov 2009 21:51:50 -0600
Subject: [PATCH] 0 [ndip] can be a nop

---
 basis/fry/fry.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/fry/fry.factor b/basis/fry/fry.factor
index d8a8fefa4c..60c76b726f 100644
--- a/basis/fry/fry.factor
+++ b/basis/fry/fry.factor
@@ -43,7 +43,7 @@ INSTANCE: fried-callable fried
 
 : [ndip] ( quot n -- quot' )
     {
-        { 0 [ \ call [ ] 2sequence ] }
+        { 0 [ ] }
         { 1 [ \ dip  [ ] 2sequence ] }
         { 2 [ \ 2dip [ ] 2sequence ] }
         { 3 [ \ 3dip [ ] 2sequence ] }