matchWildCardString wildCardString targetString = case ABC.parse parser targetString of
    ABC.Done "" _ -> True
    ABC.Partial f -> case f "" of
        ABC.Done "" _ -> True
        _ -> False
    _ -> False
    where
        parser = generateParser wildCardParserGenerater wildCardString
matchWildCardString wildCardString targetString = case ABC.parse parser targetString of
    ABC.Done "" _ -> True
    ABC.Partial f -> case f "" of
        ABC.Done "" _ -> True
        _ -> False
    _ -> False
    where
        parser = generateParser wildCardParserGenerater wildCardString
matchWildCardString wildCardString targetString = case ABC.parse parser targetString of
    ABC.Done "" _ -> True
    ABC.Partial f -> case f "" of
        ABC.Done "" _ -> True
        _ -> False
    _ -> False
    where
        parser = generateParser wildCardParserGenerater wildCardString