From: grunwald@goober.cs.colorado.edu (Dirk Grunwald)
Subject: Error in init file: error: "Lisp nesting exceeds max-lisp-eval-depth"
Reply-To: grunwald@foobar.cs.colorado.edu
Organization: University of Colorado at Boulder
Date: 16 Aug 92 10:09:30


I attempted to preload much of the lisp software using the site-load
appended below.

Once I did that, I started getting the message

Error in init file: error: "Lisp nesting exceeds max-lisp-eval-depth"

when I started lemacs. So, I uncommented the preloading & I *still*
get this message. I must have screwed up something, but don't know
what. Any ideas?

Also, it turns out you can't preload some things because they complain
about needing to run under an X display - things like ange-ftp,
dired-x and so forth.

Any help appreciated.

Here's my site-load.el--

;;
;;	site-load.el for SRL lucid emacs
;;
(defun loadup::load-list (doit list)
  (if doit
      (if (not (null list))
	  (progn
	    (load (car list))
	    (garbage-collect)
	    (print pure-bytes-used)
	    (loadup::load-list doit (cdr list))
	    )
	)
    )
)

(loadup::load-list 't
 '("gnus" "gnusmail" "gnusmisc" "gnuspost"
   "nntp" "gnus-mark" "gnus-hide-quote" ) ; timezone 
 )

(loadup::load-list 't
'( "vm-delete" "vm-edit" "vm-folder" "vm-group" 
   "vm-mark" "vm-message" "vm-misc" "vm-motion" "vm-page" "vm-save"
   "vm-search" "vm-summary" "vm-undo" "vm-vars" "vm-window"
 )
)

(loadup::load-list 't
	'( "dired" "dired-cd" "dired-cwd" "dired-link" "dired-num" 
	   "dired-rcs" "dired-trns" ); "ange-ftp"  -- can't preload?
)

;;
;; CMU shell
(loadup::load-list 't
 '( "comint" "shell" )
 )

(loadup::load-list 't
		   '( "bytecomp" "bytecomp-runtime" "byte-optimize")
)

;;
;; built-ins we use a lot...
;;
(loadup::load-list 't
		   '( 
		     ;;
		     ;; modes
		     ;;

		     "dabbrev" "c-mode"
		     "c++-mode""sendmail" "c-style"
		     ;;
		     ;; Packages
		     ;;
		     "webster" "compile" "info"  "man"  
		     "apropos" "edebug" "info" "mh-e"
		     ;;
		     ;; from prim
		     ;;
		     "rect" "register"	; "timer"
		     ;;
		     ;; utils
		     ;;
		     "backquote"
		     )
		   )

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Localisms...
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(setq old-load-path load-path)

(defun loadup::add (path)
  (setq load-path (cons path load-path))
  )

(let* ((local-gnu "/srl/Lucid19/local"))
  (loadup::add (concat local-gnu "/VorTeX/"))
  (loadup::add (concat local-gnu "/SC-2.2/"))
  (loadup::add local-gnu)
  )

;;
;; VorTeX -- Load first because it used to define fill-paragraph
;; and we want to over-ride that with filladapt.elc
;;
(loadup::load-list 't
 '( 
   "TeX-mode" "TeX-custom" "TeX-misc" "TeX-match" "TeX-spell" 
   ;;    "BibTeX-abv" "BibTeX-misc" "BibTeX-mode" "BibTeX-ops"
   ;;    "TeX-bib"
   )
 )

;;
;; Supercite
;;
(loadup::load-list 't
 '( "sc" "sc-alist" "sc-electric" )
 )

;;
;; Random shit
;;
(loadup::load-list 't
 '( "crypt" "electric-minibuffer" "filladapt" ;  "ps-mode"
    )
 )

;;
;; Clean up after ourselves..
;;


(setq load-path old-load-path)

(makunbound 'old-load-path)
(fmakunbound 'loadup::load-list)
(fmakunbound 'loadup::add)

(garbage-collect)
(print pure-bytes-used)
(garbage-collect)

Date: Wed, 12 Aug 1992 22:16:34 +0200
From: girou%circe.fr@lucid.com (Denis GIROU)
Subject: lemacs 19.2
Newsgroups: alt.lucid-emacs.help