Fix memory leak: free s if calloc fails.

(From Jonas Maebe)

OK from beck@
More KNF.