]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/ui.factor
Eliminate duplicate syntax for stack effects "(" no longer drops and is identical...
[factor.git] / basis / ui / ui.factor
index 7a7868149d6c5a77497df4f778e6c8ab06c41bb8..4917b3697b6600ee1b42079e64aaee9c3bed8d6d 100644 (file)
@@ -222,7 +222,7 @@ HOOK: system-alert ui-backend ( caption text -- )
 
 : define-main-window ( word attributes quot -- )
     [
-        '[ [ f _ clone @ open-window ] with-ui ] (( -- )) define-declared
+        '[ [ f _ clone @ open-window ] with-ui ] ( -- ) define-declared
     ] [ 2drop current-vocab main<< ] 3bi ;
 
 SYNTAX: MAIN-WINDOW: