Cameron MacKinnon  <cmackin+nn@clearspot.net> wrote:
+---------------
| Bj�rn Lindberg wrote:
| > Asdf has become the standard system definition facility...
| 
| Yes. And I think there are problems with that. ...
...
| (asdf:oos 'asdf:load-op :araneida)
...
| The Lisp equivalent is, to someone who doesn't know Lisp, inscrutable. 
+---------------

Which is why I have the following function in my "~/.cmucl-init"!!  ;-}

    ;;; Save a bunch of typing:
    (defun asdf (&rest systems)
      (if systems
	(dolist (system systems)
	  (asdf:operate 'asdf:load-op system))
	;; !@#$%^ "library:local/systems/*.asd" lists everything *twice*!
	(let ((all-asd
	      (directory "/usr/local/lib/cmucl/lib/local/systems/*.asd")))
	  (format t "Available systems:~%~a~%"
		    (sort (mapcar #'pathname-name all-asd) #'string<)))))


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607