link-comma:chain — ordinary primitive
EXTENSIONS
link, ( list -- )();p4:"link-comma";
link, ( list -- )(
)
: link, here over @ a, swap ! ;