Contar ocurrencias de un carácter en una cadena

Crea una función que reciba un carácter y una cadena como argumentos y devuelva la cantidad de veces que aparece el carácter en la cadena.

Ejemplos

CharCount('a', "edabit") ➞ 1

CharCount('c', "Chamber of secrets") ➞ 1

CharCount('b', "big fat bubble") ➞ 4

Notas

Tu resultado debe distinguir entre mayúsculas y minúsculas (consulta el segundo ejemplo).