Paste: refactor
Author: | pltonik |
Mode: | factor |
Date: | Thu, 13 May 2010 11:25:52 |
Plain Text |
How do you factor out the quotation below to avoid the boilerplate? the quotation stack effects are below:
: add-at
rot [ ?adjoin ] curry change-at ;
: remove-at
rot [ ?delete ] curry change-at ;
: ?adjoin
: ?delete
Author: | doublec |
Mode: | factor |
Date: | Thu, 13 May 2010 11:33:25 |
Plain Text |
: change-set
[ rot ] dip curry change-at ; inline
: add-at
[ ?adjoin ] change-set ;
: remove-at
[ ?delete ] change-set
New Annotation