pub fn parse_ole_site_concrete<'a, E>(
    input: &'a [u8]
) -> IResult<&'a [u8], OleSiteConcreteControl, E>where
    E: ParseError<&'a [u8]> + ContextError<&'a [u8]>,