Copy to *lenp just in case lenp != NULL.
Use mrb_int as possible.
Merge pull request #993 from monaka/pr-cleanup-symbol.c-20130312

Cleanup symbol.c.