Or the even more succinct

    fibs = 0 : scanl (+) 1 fibs

scanl is similar to a fold, but returns a list of successive reduced values from the left.