libk  emitc.fn.c at [c231d33808]

File mod/kstr/emitc.fn.c artifact 0654040df9 part of check-in c231d33808

#include <k/type.h>
#include <k/str.h>
#include <k/io.h>

kcond
ksemitc(const char** array, sz bufsz, kiochan channel) {
	ubyte cache [sizeof(ksbuf) + bufsz];
	ksbuf* out = ksbufmk(cache, channel, bufsz);

	kcond c = ksbufwrite(out, array);
	if (!kokay(c)) return c;

	return ksbufflush(out);
}