Split read-lexical-mode into an individual parameter

so that the reader directive such as #!r7rs work during a single read() call.
Merged