Horrendous EOF typeout still exists

[Randy Parker <PARKER@MIT-REAGAN.ARPA>]

    Date: Mon, 28 Apr 86 15:38 EDT
    From: Doug Dodds <DODDS@TENEX.SCRC.Symbolics.COM>

	Date: Tue, 22 Apr 86 20:13 EST
	From: Randy Parker <PARKER@MIT-REAGAN.ARPA>

In Symbolics 3600 Release 6.1, IP-TCP 29.13, 6-1-Patches 1.13,
AISite 14.7, microcode TMC5-COL-MIC 353, FEP 127,
FEP0:>v127-lisp.flod(2), FEP0:>v127-loaders.flod(2),
FEP0:>v127-tests.flod(2), FEP0:>v127-debug.flod(1),
FEP0:>v127-info.flod(2), Rodent Free Namespace Editor,
Logical Pathname Completion patch, on PA Lisp Machine Merlin:

	When a c-sh-E (or the like) is done on a "form" lacking
	proper closing of parentheses, a "read error: end of file"
	occurs and the entire form to that point is displayed
	in the typein area, scrolling at high speed.  

	Why not truncate it with just enough prinlevel and prinlength to read
	it, or give him an option to do Find Unbalanced Parens?
	The current solution isn't one.

    This happens in neither Release 6.1 nor the current experimental
    Symbolics system.  Both properly beep at you and print "unbalanced
    parentheses" in the typein area.

Thankfully true in the normal case, and I have no complaints with that.

Well, I guess I didn't explain it properly.  I have gotten it to lose
without doing such a perverse example as this:

In your mail buffer, type M-X LISP, and then c-sh-E with the point
in the definition below.  My entire point is:
no matter in how bogus a manner you want to fake the reader out,
the "scroll-the-remainder-of-the-text-by-the-user-at-warp-speed"  solution
doesn't seem very useful to *any* users.

(defun test ()
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   (part-of-scrolling-away-function-definition)
   ((part-of-scrolling-away-function-definition)
#|| ) ||#
   (part-of-scrolling-away-function-definition))