multiple_functions: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        ( function() {
            if ( !window ) {
                return;
            }
            function f() {}
            function g() {}
        } )();
    }
    expect: {
        ( function() {
            // NOTE: other compression steps will reduce this
            // down to just `window`.
            if ( window );
            function f() {}
            function g() {}
        } )();
    }
}

single_function: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        ( function() {
            if ( !window ) {
                return;
            }
            function f() {}
        } )();
    }
    expect: {
        ( function() {
            if ( window );
            function f() {}
        } )();
    }
}

deeply_nested: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        ( function() {
            if ( !window ) {
                return;
            }
            function f() {}
            function g() {}
            if ( !document ) {
                return;
            }
            function h() {}
        } )();
    }
    expect: {
        ( function() {
            // NOTE: other compression steps will reduce this
            // down to just `window`.
            if ( window )
                if (document);
            function f() {}
            function g() {}
            function h() {}
        } )();
    }
}

not_hoisted_when_already_nested: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        ( function() {
            if ( !window ) {
                return;
            }
            if ( foo ) function f() {}
        } )();
    }
    expect: {
        ( function() {
            if ( window )
                if ( foo ) function f() {}
        } )();
    }
}

defun_if_return: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        function e() {
            function f() {}
            if (!window) return;
            else function g() {}
            function h() {}
        }
    }
    expect: {
        function e() {
            function f() {}
            if (window) function g() {}
            function h() {}
        }
    }
}

defun_hoist_funs: {
    options = {
        hoist_funs: true,
        if_return: true,
    }
    input: {
        function e() {
            function f() {}
            if (!window) return;
            else function g() {}
            function h() {}
        }
    }
    expect: {
        function e() {
            function f() {}
            function g() {}
            function h() {}
            if (window);
        }
    }
}

defun_else_if_return: {
    options = {
        hoist_funs: false,
        if_return: true,
    }
    input: {
        function e() {
            function f() {}
            if (window) function g() {}
            else return;
            function h() {}
        }
    }
    expect: {
        function e() {
            function f() {}
            if (window) function g() {}
            function h() {}
        }
    }
}
span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/dbus.scm (polkit-service-type)[description]: New field.
* gnu/services/dict.scm (dicod-service-type)[description]: New field.
* gnu/services/dns.scm (knot-service-type)[description]: New field.
* gnu/services/networking.scm (dhcpd-service-type)[description]: New field.
* gnu/services/shepherd.scm (shepherd-root-service-type)[description]:
New field.
* gnu/services/xorg.scm (slim-service-type)[description]: New field.
(screen-locker-service-type)[description]: New field.
* gnu/system/pam.scm (pam-root-service-type)[description]: New field.
* gnu/system/shadow.scm (account-service-type)[description]: New field.
</span></span></td><td>Ludovic Courtès</td></tr>