Paste: copy-at

Author: slava
Mode: factor
Date: Wed, 22 Oct 2008 23:11:21
Plain Text |
:: copy-at ( from to assoc -- )
    from assoc at [ to assoc set-at ] when* ; inline

Annotation: fry as poor mans locals

Author: dharmatech
Mode: factor
Date: Wed, 22 Oct 2008 23:15:13
Plain Text |
: copy-at ( from to assoc -- )
  tuck '[ _ _ at [ _ _ set-at ] when* ] call ; inline

New Annotation

Summary:
Author:
Mode:
Body: