'label :: String -> Get a -> Get a' adds the given string to the error message string if the given decoder fails. Fixes #16.