recode s-lex-format in terms of s-match-strings-all

This is a much better implementation expanding the whole of the macro with a function.