fromLazy bs = Folding (\construct wrap done -> 
  foldrChunks (kurry construct) (done ()) bs)
fromLazy bs = Folding (\construct wrap done -> 
  foldrChunks (kurry construct) (done ()) bs)
fromLazy bs = Folding (\construct wrap done -> 
  foldrChunks (kurry construct) (done ()) bs)