# File kwartz.rb, line 1852
        def translate_while_stmt(stmt_node, code='', level=0)
            cond_expr = stmt_node.condition
            nodelist  = stmt_node.left
            #
            indent(code, level)
            code << encode(:while)
            translate(cond_expr, code)
            code << encode(:do)
            translate(nodelist, code, level+1)
            indent(code, level)
            code << encode(:endwhile)
            return code
        end