AST pretty printing example

test.jl

code = quote
    function show_body_lines(io::IO, ex)
        args = is_expr(ex, :block) ? ex.args : {ex}
        for arg in args
            if !is_linenumber(arg); print(io, '\n'); end
            show(io, arg)
        end
    end
end

show(code)

Test output:

begin   #  line 2:
    function show_body_lines(io::IO, ex)    #  none, line 3:
        args=if is_expr(ex, :block)
                ex.args
            else 
                {ex}
            end #  line 4:
        for arg=args    #  line 5:
            if !(is_linenumber(arg))    #  line 5:
                begin 
                    print(io, '\n')
                end
            end #  line 6:
            show(io, arg)
        end
    end
end