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