/*
Parses this:

	do {
		...code...
	} (...cond...)

Into this:

	...code...
	while(...cond...) {
		...code...
	}
*/

//  -> [bytecodes]
::builtin do @body
	"" parseblock {} // "" means no entry into the symbol table (unnamed function) - equals to 0
	do@body(.) // (.) does not removes - only (_) no need for gencode because 
	gen(while) // address top bit 1 when builtin from C
	genopen() // equal to gencode(1)
	"" parseblock ()
	genclose()
	genopen{}
	do@body
	genclose{}