Re: A utility for renaming old-style file names
Derick Eddington 26 Dec 2009 22:54 UTC
On Fri, 2009-12-11 at 22:19 -0800, Derick Eddington wrote:
> Note that rename-old-style.r6rs-prog can easily be modified to rename
> other extensions such as .sps to .r6rs-prog.
Here's how to do that:
--- rename-old-style.r6rs-prog 2009-11-23 12:32:22.000000000 -0800
+++ rename-old-style.r6rs-prog 2009-12-26 14:44:56.000000000 -0800
@@ -112,9 +112,9 @@
'(: ($ (**? 1 #F any)) ;; library name last part
(? ($ (+ #\- (+ (/ #\0 #\9))))) ;; PLT-style version
(? #\. ($ (+ (~ #\.)))) ;; Scheme system specific
- ".sls")))
+ ".sps")))
-(define ext "r6rs-lib")
+(define ext "r6rs-prog")
(define (main dir rename-command delete-command)
(define (rename-dir)
--
: Derick
----------------------------------------------------------------