[libr] Add -performv::

ruamoko/include/Object.h

@@ -24,6 +24,10 @@
 - (id) performSelector: (SEL)aSelector
 			withObject: (void *)anObject
 			withObject: (void *)anotherObject;
+// void return does not touch the actual return value (effectively retval)
+// so if the target returns a value, and the forwarding method simply returns
+// (and is void), the vallue will get out to the caller
+- (void) performv: (SEL) sel : (@va_list) args;
 - (BOOL) respondsToSelector: (SEL)aSelector;
 - (BOOL) conformsToProtocol: (Protocol *)aProtocol;
 

ruamoko/lib/Object.r

@@ -280,6 +280,11 @@ BOOL (id object) object_is_meta_class = #0;
 	return msg (self, aSelector, anObject, anotherObject);
 }
 
+- (void) performv: (SEL) sel : (@va_list) args
+{
+	obj_msg_sendv (self, sel, args);
+}
+
 - (void) doesNotRecognizeSelector: (SEL)aSelector
 {
 	[self error: "%s does not recognize %s",