質問です。文字列の中に特定の文字が何個あるかを数える関数ありますか？

例

(foo "abaca" "a")
=> 3

みたいな。m/(_ _)\m