Handbook Glossary
factorcode.org
normalize-back ( list -- )


Vocabulary
unrolled-lists.private

Inputs
listan object


Outputs
None

Definition
USING: accessors kernel ;

IN: unrolled-lists.private

: normalize-back ( list -- )
dup back>>
[ dup prev>> [ drop ] [ swap front>> >>prev ] if ]
[ dup front>> >>back ] if* drop ; inline