Xref: utzoo gnu.emacs.help:699 comp.emacs:9810
Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!tut.cis.ohio-state.edu!compass.com!worley
From: worley@compass.com (Dale Worley)
Newsgroups: gnu.emacs.help,comp.emacs
Subject: What command causes load-file to exit immediately?
Message-ID: <9101021551.AA07483@sn1987a.compass.com>
Date: 2 Jan 91 15:51:59 GMT
Sender: daemon@tut.cis.ohio-state.edu
Followup-To: gnu.emacs.help
Organization: Gatewayed from the GNU Project mailing list help-gnu-emacs@prep.ai.mit.edu
Lines: 20

From: squash@shadrach.math.ufl.edu  (Jonathan King)
> Is there a command which I can put into a file to be loaded which
> causes the remainder of the file not to be read?

This code seems to work:

    (condition-case
	nil
	(while t
	  (read))
      (end-of-file))

It reads expressions from the current file (the one being loaded)
until it finds end-of-file.

Dale

Dale Worley		Compass, Inc.			worley@compass.com
--
Start the project after the deadline -- the pressure is less then.