id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
548	While command doesn't  return a value	ftakao	Víctor de Buen Remiro	"According to documentation, the while command should return a value and assign this value to a variable:

Anything While(Real condition, Anything whatToDo)

However, the code below generates an error and doesn't create the returnValue set:

Real continue = 0;
Set returnValue = While(Not(continue), 
{
  Real Sleep(1);

  Text doTest = TclTkMessageBox(SetOfSet(
    TclArgSt(""-title"",   ""Dialogo TclYesNoQuestion""), 
    TclArgSt(""-message"", ""¿Deseja sair do while?""),
    TclArgSt(""-type"",    ""yesno""),
    TclArgSt(""-icon"",    ""question"")
  ));
  Real continue := If(doTest==""yes"",1,0);
  Set [[1,2]]
});"	defect	closed	high		Kernel	1.1.5	normal	fixed