Handbook
Glossary
aligned-locs ( sizes pack -- seq )
Vocabulary
ui
.
gadgets
.
packs
.
private
Inputs
sizes
an
object
pack
an
object
Outputs
seq
an
object
Definition
USING:
accessors
kernel
ui.baseline-alignment
;
IN:
ui.gadgets.packs.private
:
aligned-locs
( sizes pack -- seq )
dup
align>>
+baseline+
eq?
[
nip
baseline-aligned-locs
]
[
numerically-aligned-locs
]
if
;