@node Starting and Stopping
@comment node-name, next, previous, up
-@chapter Starting and Stoppping
+@chapter Starting and Stopping
@menu
* Starting SBCL::
-loop), where you can interact with SBCL by typing expressions.
@smallexample
-@cartouche
$ sbcl
This is SBCL 0.8.13.60, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.
4
* (quit)
$
-@end cartouche
@end smallexample
See also @ref{Command Line Options} and @ref{Stopping SBCL}.
@menu
* Quit::
-* End of File::
-* Exit on Errors::
+* End of File::
+* Saving a Core Image::
+* Exit on Errors::
@end menu
@node Quit
pressing @kbd{Control-D} on an attached terminal, or end of input when
using SBCL as part of a shell pipeline.
+@node Saving a Core Image
+@comment node-name, next, previous, up
+@subsection Saving a Core Image
+
+SBCL has the ability to save its state as a file for later
+execution. This functionality is important for its bootstrapping
+process, and is also provided as an extension to the user.
+
+@include fun-sb-ext-save-lisp-and-die.texinfo
@node Exit on Errors
@comment node-name, next, previous, up
SBCL can also be configured to exit if an unhandled error occurs,
which is mainly useful for acting as part of a shell pipeline; doing
so under most other circumstances would mean giving up large parts of
-the flexibility and robustness of Common Lisp. See @ref{Customization
-Hooks for Users}.
+the flexibility and robustness of Common Lisp. See @ref{Starting the
+Debugger}.
@node Command Line Options
@end table
-In the future, runtime options may be added to control behavior such
+In the future, runtime options may be added to control behaviour such
as lazy allocation of memory.
Runtime options, including any --end-runtime-options option, are
@item --disable-debugger
This is equivalent to @code{--eval '(sb-ext:disable-debugger)'}.
-@xref{Customization Hooks for Users}.
+@xref{Starting the Debugger}.
@end table
@comment node-name, next, previous, up
@subsubsection Unix-style Command Line Protocol
-Standard Unix tools that are interpeters follow a common command line
+Standard Unix tools that are interpreters follow a common command line
protocol that is necessary to work with ``shebang scripts''. SBCL
doesn't do this by default, but adding the following snippet to an
initialization file does the trick:
@lisp
;;; If the first user-processable command-line argument is a filename,
;;; disable the debugger, load the file handling shebang-line and quit.
-(let ((script (and (second sb-ext:*posix-argv*)
- (probe-file (second sb-ext:*posix-argv*)))))
- (when script
- ;; Handle the possible shebang-line
- (set-dispatch-macro-character #\# #\!
- (lambda (stream char arg)
- (declare (ignore char arg))
- (read-line stream)))
- ;; Disable debugger
- (setf sb-ext:*invoke-debugger-hook*
- (lambda (condition hook)
- (declare (ignore hook))
- (format *error-output* "Error: ~A~%" condition)
- (quit :unix-status 1)))
- (load script)
- (quit)))
+(let ((script (and (second *posix-argv*)
+ (probe-file (second *posix-argv*)))))
+ (when script
+ ;; Handle shebang-line
+ (set-dispatch-macro-character #\# #\!
+ (lambda (stream char arg)
+ (declare (ignore char arg))
+ (read-line stream)))
+ ;; Disable debugger
+ (setf *invoke-debugger-hook*
+ (lambda (condition hook)
+ (declare (ignore hook))
+ ;; Uncomment to get backtraces on errors
+ ;; (sb-debug:backtrace 20)
+ (format *error-output* "Error: ~A~%" condition)
+ (quit)))
+ (load script)
+ (quit)))
@end lisp
Example file (@file{hello.lisp}):
Usage examples:
@smallexample
-@cartouche
$ ./hello.lisp
Hello, World!
-@end cartouche
@end smallexample
@smallexample
-@cartouche
$ sbcl hello.lisp
This is SBCL 0.8.13.70, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
Hello, World!
-@end cartouche
@end smallexample
(require :asdf)
;;; If a fasl was stale, try to recompile and load (once).
-(defmethod asdf:perform :around ((o asdf:load-op) (c asdf:cl-source-file))
- (handler-case (call-next-method o c)
- (sb-ext:invalid-fasl error ()
- (asdf:perform (make-instance 'asdf:compile-op) c)
- (call-next-method))))
+(defmethod asdf:perform :around ((o asdf:load-op)
+ (c asdf:cl-source-file))
+ (handler-case (call-next-method o c)
+ ;; If a fasl was stale, try to recompile and load (once).
+ (sb-ext:invalid-fasl ()
+ (asdf:perform (make-instance 'asdf:compile-op) c)
+ (call-next-method))))
@end lisp
projects / sbcl.git / blobdiff