pub fn source<R>(r: R) -> Source<R> where
    R: Read