| 169 | } |
| 170 | |
| 171 | void _xsCall(txMachine *the, txSlot *res, txSlot *self, txUnsigned id, ...) |
| 172 | { |
| 173 | va_list ap; |
| 174 | int n; |
| 175 | txSlot *v; |
| 176 | |
| 177 | va_start(ap, id); |
| 178 | for (n = 0; va_arg(ap, txSlot *) != NULL; n++) |
| 179 | ; |
| 180 | va_end(ap); |
| 181 | mxOverflow(-(n+6)); |
| 182 | fxPush(*self); |
| 183 | fxCallID(the, (txID)id); |
| 184 | va_start(ap, id); |
| 185 | while ((v = va_arg(ap, txSlot *)) != NULL) |
| 186 | fxPush(*v); |
| 187 | va_end(ap); |
| 188 | fxRunCount(the, n); |
| 189 | if (res != NULL) |
| 190 | *res = fxPop(); |
| 191 | else |
| 192 | mxPop(); |
| 193 | } |
| 194 | |
| 195 | void _xsNew(txMachine *the, txSlot *res, txSlot *self, txUnsigned id, ...) |
| 196 | { |
nothing calls this directly
no test coverage detected