** Writes the message and handle 'tocont', finishing the message ** if needed and setting the next warn function. */
| 1109 | ** if needed and setting the next warn function. |
| 1110 | */ |
| 1111 | static void warnfcont (void *ud, const char *message, int tocont) { |
| 1112 | lua_State *L = (lua_State *)ud; |
| 1113 | lua_writestringerror("%s", message); /* write message */ |
| 1114 | if (tocont) /* not the last part? */ |
| 1115 | lua_setwarnf(L, warnfcont, L); /* to be continued */ |
| 1116 | else { /* last part */ |
| 1117 | lua_writestringerror("%s", "\n"); /* finish message with end-of-line */ |
| 1118 | lua_setwarnf(L, warnfon, L); /* next call is a new message */ |
| 1119 | } |
| 1120 | } |
| 1121 | |
| 1122 | |
| 1123 | static void warnfon (void *ud, const char *message, int tocont) { |
no test coverage detected