basis: removing unnecessary method stack effects.

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

diff --git a/basis/ui/gadgets/tracks/tracks.factor b/basis/ui/gadgets/tracks/tracks.factor
index 11ff0fb51dbbd9c7b8b8b7fe7dd51c0580d846d9..0b133117239352b93c44c81162de0e1920948cd9 100644 (file)
--- a/basis/ui/gadgets/tracks/tracks.factor
+++ b/basis/ui/gadgets/tracks/tracks.factor
@@ -35,7 +35,7 @@ TUPLE: track < pack sizes ;
     } cleave
     '[ [ _ n*v _ set-axis ] when* ] 2map ;
 
-M: track layout* ( track -- ) dup track-layout pack-layout ;
+M: track layout* dup track-layout pack-layout ;
 
 : track-pref-dims-1 ( track -- dim )
     [ children>> pref-dims max-dims ]
@@ -48,7 +48,7 @@ M: track layout* ( track -- ) dup track-layout pack-layout ;
         max-dims
     ] [ gap-dim ] bi v+ ;
 
-M: track pref-dim* ( gadget -- dim )
+M: track pref-dim*
     [ track-pref-dims-1 ]
     [ [ alloted-dim ] [ track-pref-dims-2 ] bi v+ ]
     [ orientation>> ]