From 732850bc9b42d439994acad390142df65d581636 Mon Sep 17 00:00:00 2001
From: slava <slava@factorcode.org>
Date: Thu, 26 Oct 2006 05:17:21 +0000
Subject: [PATCH] space-invaders MAIN: stack effect fix

---
 contrib/space-invaders/space-invaders.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/contrib/space-invaders/space-invaders.factor b/contrib/space-invaders/space-invaders.factor
index 9a624568e4..217a424887 100644
--- a/contrib/space-invaders/space-invaders.factor
+++ b/contrib/space-invaders/space-invaders.factor
@@ -322,6 +322,6 @@ M: invaders-gadget graft* ( gadget -- )
 M: invaders-gadget ungraft* ( gadget -- )
  t swap set-invaders-gadget-quit? ;
 
-: run ( -- gadget )  
+: run ( -- )  
   <space-invaders> "invaders.rom" over load-rom <invaders-gadget> 
-  [ "Space Invaders" open-titled-window ] keep ;
+  "Space Invaders" open-titled-window ;