Cleanup x-spell.c part 1.

Lines 1 to 2000.
Cleanup x-spell.c part 2.