@implementation RPair

+ (void)addCellsTo:(LObject*)object inRuntime:(LRuntime*)runtime
{
    [object setCell:[runtime withExecutableAncestor:[[EForward alloc] initWithName:@"key"]] withName:@"key"];
    [object setCell:[runtime withExecutableAncestor:[[EForward alloc] initWithName:@"value"]] withName:@"value"];
}

@end
