coroutines: 4-space style.

extra/coroutines/coroutines.factor

@@ -11,7 +11,8 @@ TUPLE: coroutine resumecc exitcc originalcc ;
 : cocreate ( quot -- co )
     coroutine new
     dup current-coro associate
-  [ swapd , , \ with-variables , 
+    [
+        swapd , , \ with-variables , 
         "Coroutine has terminated illegally." , \ throw ,
     ] [ ] make
     [ >>resumecc ] [ >>originalcc ] bi ;