" Tlist_Cleanup()
" Cleanup all the taglist window variables.
function! s:Tlist_Cleanup()
    if has('syntax')
        silent! syntax clear TagListTitle
    endif
    match none

    if exists('b:tlist_ftype') && b:tlist_ftype != ''
        let count_var_name = 's:tlist_' . b:tlist_ftype . '_count'
        if exists(count_var_name)
            let old_ftype = b:tlist_ftype
            let i = 1
            while i <= s:tlist_{old_ftype}_count
                let ttype = s:tlist_{old_ftype}_{i}_name
                let j = 1
                let var_name = 'b:tlist_' . old_ftype . '_' . ttype . '_count'
                if exists(var_name)
                    let cnt = b:tlist_{old_ftype}_{ttype}_count
                else
                    let cnt = 0
                endif
                while j <= cnt
                    unlet! b:tlist_{old_ftype}_{ttype}_{j}
                    let j = j + 1
                endwhile
                unlet! b:tlist_{old_ftype}_{ttype}_count
                unlet! b:tlist_{old_ftype}_{ttype}_start
                let i = i + 1
            endwhile
        endif
    endif

    " Clean up all the variables containing the tags output
    if exists('b:tlist_tag_count')
        while b:tlist_tag_count > 0
            unlet! b:tlist_tag_{b:tlist_tag_count}
            let b:tlist_tag_count = b:tlist_tag_count - 1
        endwhile
    endif

    unlet! b:tlist_bufnum
    unlet! b:tlist_bufname
    unlet! b:tlist_ftype
endfunction

##</code><code>##

do { something(); } while <FOO

# wouldn't get you

do { something(); } while (<FOO>) {}

##</code><code>##


    ASCII ART!

+----------+
|          |                  *******
|    +----------+           **.......**
|    |     |    |         **...........**
+----|-----+    |         *..*********..*
     |          |         ***         ***
     +----------+       **++**       **++**         -------|>
                       *++++++*******++++++*       /
                       *+++++++++++++++++++*      /
     -----------\      *+++++++++++++++++++*     /
                 \      **+++++++++++++++**     /
                  \       ***+++++++++***      /
                   \         *********        /
                    \                        /
                     \                      /
                      ---------------------/