Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / basis / ui / gadgets / frames / frames.factor

diff --git a/basis/ui/gadgets/frames/frames.factor b/basis/ui/gadgets/frames/frames.factor
index 34f46865187081aebe5bcfcbb54538174574da7f..168fb4bb114473387077718b3f9978ce70d1f821 100644 (file)
--- a/basis/ui/gadgets/frames/frames.factor
+++ b/basis/ui/gadgets/frames/frames.factor
@@ -23,7 +23,7 @@ M: glue pref-dim* drop { 0 0 } ;
     [ '[ [ dim>> ] [ gap>> ] [ filled-cell>> ] tri _ tri@ ] dip ] dip call ; inline
 
 : available-space ( pref-dim gap dims -- avail )
-    length 1+ * [-] ; inline
+    length 1 + * [-] ; inline
 
 : -center) ( pref-dim gap filled-cell dims -- )
     [ nip available-space ] 2keep [ remove-nth sum [-] ] 2keep set-nth ; inline
@@ -46,4 +46,4 @@ M: frame layout*
     [ <frame-grid> ] dip new-grid ; inline
 
 : <frame> ( cols rows -- frame )
-    frame new-frame ;
\ No newline at end of file
+    frame new-frame ;