greedy wc test

wctst.jl

function reallygreedylinecounter(fname::String)
    f = open(fname)
    return reallygreedylinecounter(f)
end
function reallygreedylinecounter(f::IOStream)
    try
        seek(f, 0)
    end 
    ln = 0
    eof = int(typemax(Uint32)) #argh
    while (c = ccall(:ios_getc, Int, (Ptr{Void},), f.ios)) != eof
        if c == '\n'
            ln += 1
        end
    end
    return ln
end

wcbasedlinecounter(fname::String) = integer(split(readall(`wc -l $fname`),' ',false)[1])

There, I fixed it ;)