extend-procedure

[procedure] extend-procedure procedure x

Chicken: returns a copy of procedure with an extra data slot initialized by x. See also extended-procedure?, procedure-data, set-procedure-data!.