できました。ありがとうございます。

if (!(p = strchr(r, s[i]))) {
の行で、
コンパイラに、おそらく不正な代入関数（main)とでるのですが。
何か分かりますか？