chained
* chained ( xt list -- ) \ gforth

generic chains
 : chained  linked , ;

gforth ordinary primitive