Re: asdf restart named in the keyword package

Hi Matthew,

I'm happy to apply this patch unless the internet says "no".


On Jun 16, 2008, at 1:31 PM, Matthew D.Swank wrote:

> My original post seems to have gotten lost.  Here is is again.
> :try-recompiling as a restart name seems an unnecessary pollution of  
> the keyword
> name-space, and inconsistent with already exported restarts retry  
> and accept.
> Below is a small patch that places try-recompiling firmly in the  
> asdf package.
>
> Matt
>
>
> Index: asdf.lisp
> ===================================================================
> RCS file: /cvsroot/cclan/asdf/asdf.lisp,v
> retrieving revision 1.118
> diff -u -r1.118 asdf.lisp
> --- asdf.lisp	29 May 2008 18:09:36 -0000	1.118
> +++ asdf.lisp	16 Jun 2008 17:23:28 -0000
> @@ -99,6 +99,7 @@
>            #:circular-dependency        ; errors
>            #:duplicate-names
>
> +           #:try-recompiling
>            #:retry
>            #:accept                     ; restarts
> 	   )
> @@ -836,7 +837,7 @@
> 	    (perform (make-instance 'asdf:compile-op) c))
> 	   (t
> 	    (with-simple-restart
> -		(:try-recompiling "Recompile ~a and try loading it again"
> +		(try-recompiling "Recompile ~a and try loading it again"
> 				  (component-name c))
> 	      (setf state :failed-load)
> 	      (call-next-method)
> @@ -856,7 +857,7 @@
> 	    (perform (make-instance 'asdf:compile-op) c))
> 	   (t
> 	    (with-simple-restart
> -		(:try-recompiling "Try recompiling ~a"
> +		(try-recompiling "Try recompiling ~a"
> 				  (component-name c))
> 	      (setf state :failed-compile)
> 	      (call-next-method)
>
>
>
> -------------------------------------------------------------------------
> Check out the new SourceForge.net Marketplace.
> It's the best place to buy or sell services for
> just about anything Open Source.
> http://sourceforge.net/services/buy/index.php
> _______________________________________________
> cclan-list mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/cclan-list

--
Gary Warren King, metabang.com
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM





-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php