digestSizeS :: (MonadState HashState m) => m Int
digestSizeS = liftM digestSize get
digestSizeS :: (MonadState HashState m) => m Int
digestSizeS = liftM digestSize get
digestSizeS = liftM digestSize get