Author: | blei |
---|---|
Mode: | factor |
Date: | Tue, 29 Jun 2010 14:54:01 |
( scratchpad ) MIXIN: a-mix ( scratchpad ) MIXIN: b-mix ( scratchpad ) INSTANCE: b-mix a-mix ( scratchpad ) TUPLE: c ; ( scratchpad ) INSTANCE: c b-mix ( scratchpad ) GENERIC: foo ( x -- y ) ( scratchpad ) M: a-mix foo drop 1 ; ( scratchpad ) c new foo --- Data stack: 1