The spec for width is:
('width' #r #width)and the code is:
width | t1 | t1 _ self bounds intersect: bounds. ^ t1 width
The spec for height is:
('height' #r #height)and the code is:
height | t1 | t1 _ self bounds intersect: bounds. ^ t1 height
the spec for sprite width is:
('%m width' #r #width:)the code is:
width: t1 | t2 | t2 _ t1 bounds intersect: t1 bounds. ^ t2 width
the spec for sprite height is:
('%m height' #r #height:)and the code is:
height: t1 | t2 | t2 _ t1 bounds intersect: t1 bounds. ^ t2 height
.

Offline