1. #!/usr/local/bin/sbcl --script
    
  2. (load "mandel.lisp")
    
  3. 
    
  4. ; Compile to an executable.
    
  5. (defun save ()
    
  6.     (sb-ext:save-lisp-and-die 
    
  7.         "mandel.sbcl.o"
    
  8.         :toplevel #'main
    
  9.         :executable t))
    
  10. (save)
    
  11. 
    
  12.