diff --git a/extra/concurrency/concurrency.factor b/extra/concurrency/concurrency.factor
index 50abee8418..a8e0bc6eeb 100755
--- a/extra/concurrency/concurrency.factor
+++ b/extra/concurrency/concurrency.factor
@@ -270,11 +270,10 @@ TUPLE: future value processes ;
     tuck set-future-value
     dup future-processes [ schedule-thread ] each
     f swap set-future-processes ;
- 
+
 : future ( quot -- future )
     #! Spawn a process to call the quotation and immediately return.
     \ future construct-empty [
-    [
         [
             >r [ t 2array ] compose [ f 2array ] recover r>
             notify-future