matching haskell style streams. writing a 1:Byte if there is data left, 0:Byte if there is nothing left, instead of 0:Bit, 1:Bit.