contrib/asdf-install/loader.lisp

   1
   2 (in-package :cl-user)
   3 (eval-when (:compile-toplevel :load-toplevel :execute)
   4   (require 'asdf)
   5   (asdf:operate 'asdf:load-op 'asdf-install :verbose nil))
   6
   7 (defun run ()
   8   (handler-case
   9       (apply #'asdf-install:install (cdr *posix-argv*))
  10     (error (c)
  11       (princ "Install failed due to error:") (terpri)
  12       (princ c) (terpri)
  13       (quit :unix-status 1))))
  14
  15 ;(quit)