2009-03-15 22:25:19 -04:00
|
|
|
! Copyright (C) 2009 Slava Pestov.
|
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
|
|
|
USING: kernel generic generic.parser words fry ;
|
|
|
|
|
IN: method-chains
|
|
|
|
|
|
2009-03-21 02:27:50 -04:00
|
|
|
SYNTAX: AFTER: (M:) dupd '[ [ _ (call-next-method) ] _ bi ] define ;
|
|
|
|
|
SYNTAX: BEFORE: (M:) over '[ _ [ _ (call-next-method) ] bi ] define ;
|
