** Writes the message and handle 'tocont', finishing the message ** if needed and setting the next warn function. */
| 1086 | ** if needed and setting the next warn function. |
| 1087 | */ |
| 1088 | static void warnfcont (void *ud, const char *message, int tocont) { |
| 1089 | lua_State *L = (lua_State *)ud; |
| 1090 | lua_writestringerror("%s", message); /* write message */ |
| 1091 | if (tocont) /* not the last part? */ |
| 1092 | lua_setwarnf(L, warnfcont, L); /* to be continued */ |
| 1093 | else { /* last part */ |
| 1094 | lua_writestringerror("%s", "\n"); /* finish message with end-of-line */ |
| 1095 | lua_setwarnf(L, warnfon, L); /* next call is a new message */ |
| 1096 | } |
| 1097 | } |
| 1098 | |
| 1099 | |
| 1100 | static void warnfon (void *ud, const char *message, int tocont) { |
no test coverage detected