public static Cons cppTranslateWhile(Cons tree) {
    { Stella_Object test = Stella_Object.cppTranslateATree(tree.rest.value);
      Cons body = Cons.cppTranslateListOfTrees(tree.rest.rest);

      tree.rest.rest = Stella.NIL;
      return (Cons.list$(Cons.cons(Stella.SYM_STELLA_CPP_WHILE, Cons.cons(test, Cons.cons(Cons.cons(Cons.list$(Cons.cons(Stella.SYM_STELLA_CPP_PROGN, Cons.cons(Cons.cons(Stella.SYM_STELLA_CPP_STATEMENTS, body.concatenate(Stella.NIL, Stella.NIL)), Cons.cons(Stella.NIL, Stella.NIL)))), Stella.NIL), Stella.NIL)))));
    }
  }