Skip to content
Snippets Groups Projects
Commit e5ae9243 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

1.592: fix upgrade by removing deleted symbol before defpackage.

parent dd281823
No related branches found
No related tags found
No related merge requests found
......@@ -41,11 +41,19 @@
;;;
;;; -- LICENSE END
;;; the problem with writing a defsystem replacement is bootstrapping:
;;; we can't use defsystem to compile it. Hence, all in one file
;;; The problem with writing a defsystem replacement is bootstrapping:
;;; we can't use defsystem to compile it. Hence, all in one file.
#+xcvb (module ())
(cl:in-package :cl-user)
(eval-when (:compile-toplevel :load-toplevel :execute)
(let ((sym (find-symbol "*ASDF-REVISION*" :asdf)))
(when sym
(unexport sym)
(unintern sym))))
(defpackage #:asdf
(:documentation "Another System Definition Facility")
(:export #:defsystem #:oos #:operate #:find-system #:run-shell-command
......@@ -165,7 +173,7 @@
;;;;
(defparameter *asdf-version*
;; the 1+ hair is to ensure that we don't do an inadvertent find and replace
(subseq "VERSION:1.591" (1+ (length "VERSION"))))
(subseq "VERSION:1.592" (1+ (length "VERSION"))))
(defun asdf-version ()
*asdf-version*)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment