From cda2cab5600ce4f97ae2516e47fb8db6ada1498f Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Mon, 21 Jan 2013 17:08:52 -0500 Subject: [PATCH] 2.26.139: make a clos variable ignorable to make allegro happy. --- asdf.asd | 2 +- header.lisp | 2 +- run-program.lisp | 2 +- upgrade.lisp | 2 +- version.lisp-expr | 2 +- 5 files changed, 5 insertions(+), 5 deletions(-) diff --git a/asdf.asd b/asdf.asd index 63bb29b5..23d408b3 100644 --- a/asdf.asd +++ b/asdf.asd @@ -15,7 +15,7 @@ :licence "MIT" :description "Another System Definition Facility" :long-description "ASDF builds Common Lisp software organized into defined systems." - :version "2.26.138" ;; to be automatically updated by make bump-version + :version "2.26.139" ;; to be automatically updated by make bump-version :depends-on () :components ((:module "build" :components ((:file "asdf")))) :in-order-to (#+asdf2.27 (compile-op (monolithic-load-concatenated-source-op asdf/defsystem)))) diff --git a/header.lisp b/header.lisp index b9b497ef..4cf1cab2 100644 --- a/header.lisp +++ b/header.lisp @@ -1,5 +1,5 @@ ;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp ; coding: utf-8 -*- -;;; This is ASDF 2.26.138: Another System Definition Facility. +;;; This is ASDF 2.26.139: Another System Definition Facility. ;;; ;;; Feedback, bug reports, and patches are all welcome: ;;; please mail to <asdf-devel@common-lisp.net>. diff --git a/run-program.lisp b/run-program.lisp index ced1759f..e3bc42bf 100644 --- a/run-program.lisp +++ b/run-program.lisp @@ -177,7 +177,7 @@ by /bin/sh in POSIX" (defmethod slurp-input-stream (x stream &key linewise prefix (element-type 'character) buffer-size &allow-other-keys) - (declare (ignorable linewise prefix element-type buffer-size)) + (declare (ignorable stream linewise prefix element-type buffer-size)) (cond #+(or gcl<2.7 genera) ((functionp x) (funcall x stream)) diff --git a/upgrade.lisp b/upgrade.lisp index 3dd26243..f651f3d8 100644 --- a/upgrade.lisp +++ b/upgrade.lisp @@ -35,7 +35,7 @@ ;; "2.345.6" would be a development version in the official upstream ;; "2.345.0.7" would be your seventh local modification of official release 2.345 ;; "2.345.6.7" would be your seventh local modification of development version 2.345.6 - (asdf-version "2.26.138") + (asdf-version "2.26.139") (existing-asdf (find-class (find-symbol* :component :asdf nil) nil)) (existing-version *asdf-version*) (already-there (equal asdf-version existing-version)) diff --git a/version.lisp-expr b/version.lisp-expr index 38330557..de354a3a 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -1 +1 @@ -"2.26.138" +"2.26.139" -- GitLab