code: purgatorio

ref: 00c219c7d9c2b9f60c2db0e1ba7289b2301209a7
dir: /appl/lib/convcs/utf8_stob.b/

View raw version 
implement Stob;

include "sys.m";
include "convcs.m";

sys : Sys;

init(nil : string) : string
{
	sys = load Sys Sys->PATH;
	return nil;
}

stob(nil : Convcs->State, str : string) : (Convcs->State, array of byte)
{
	return (nil, array of byte str);
}