[cl_menu] Update plist usage of obj_msg_sendv

Wonder if there's anywhere else...
This commit is contained in:
Bill Currie 2020-03-12 00:52:42 +09:00
parent e4caf50ee1
commit 0d4c7ba10f

View file

@ -58,6 +58,7 @@ class_from_plist (PLDictionary *pldict)
return ret;
}
obj = [class alloc];
params[0].pointer_val = obj;
messages = (PLArray*) [pldict getObjectForKey:"Messages"];
message_count = [messages count];
@ -65,9 +66,10 @@ class_from_plist (PLDictionary *pldict)
msg = (PLArray*) [messages getObjectAtIndex:i];
selname = [(PLString*) [msg getObjectAtIndex:0] string];
sel = sel_get_uid (selname);
va_list.count = [msg count] - 1;
for (j = 0; j < va_list.count; j++) {
paramstr = [(PLString*) [msg getObjectAtIndex:j + 1] string];
params[1].pointer_val = sel;
va_list.count = [msg count] + 1;
for (j = 2; j < va_list.count; j++) {
paramstr = [(PLString*) [msg getObjectAtIndex:j - 1] string];
switch (str_mid (paramstr, 0, 1)) {
case "\"":
va_list.list[j].string_val = str_mid (paramstr, 1, -1);