more at https://github.com/konfou/vfam.jl

do-until.jl

"""
    @do begin
        body
    end when condition

Macro emulating a do-until construct.
"""
@eval macro $(:do)(body, when::Symbol, condition)
    quote
        while true
            $body
            if $condition break; end;
        end
    end |> esc
end