| 4090 | // |
| 4091 | |
| 4092 | static void printa(const TEXT* column, bool call, const TEXT* string, ...) |
| 4093 | { |
| 4094 | va_list ptr; |
| 4095 | TEXT s[256]; |
| 4096 | |
| 4097 | va_start(ptr, string); |
| 4098 | strcpy(s, column); |
| 4099 | strcat(s, string); |
| 4100 | strcat(s, "\n"); |
| 4101 | vsprintf(output_buffer, s, ptr); |
| 4102 | va_end(ptr); |
| 4103 | COB_print_buffer(output_buffer, call); |
| 4104 | } |
| 4105 | |
| 4106 | |
| 4107 | #ifdef NOT_USED_OR_REPLACED |
no test coverage detected