test2.xreate
No OneTemporary
Actions

Subscribers

None

File Metadata


	// Different sizos get different prefixes

	SIZO = type slave sizo.

	findSizoId = function(key::Annotation):: int; interpretation(force){
	dict = intrinsic query("dictSizos")::[Annotation].

	id = loop fold(dict->entryAnn::Annotation, 0->id):: int {
	entry = extractDictEntry(entryAnn):: DictEntry.

	if(entry[0] == key):: int { entry[1] } else { id }
	}.

	id
	}

	findSizoPrefx = function(sizo:: SIZO):: string
	{
	id = findSizoId(sizo).

	buf = "0000"::string.
	seq
	{ sprintf(buf, "%d", id).}
	{ buf }
	}

	openfile = function
	{
	domCurrent = query context:: SIZO.
	prefix = findSizoPrefx(domCurrent):: string.

	fopen(prefixStr + fileName)
	}

	writefile = function
	{

	}