xref: /freebsd-src/contrib/one-true-awk/bugs-fixed/fs-overflow.awk (revision 0269ae4c19ad779b43b0d6e2416ac7386945d692)

function foo() {
    a = "";
    for (i = 0; i < 10000; i++) {
        a = a "c";
    }
    return a;
}

BEGIN {
    FS = foo();
    $0="foo";
    print $1;
}