[osicat-cvs] CVS update: src/grovel-constants.lisp src/osicat.asd src/version.txt

[Nikodemus Siivola]

Update of /project/osicat/cvsroot/src
In directory common-lisp.net:/tmp/cvs-serv23136

Modified Files:
	grovel-constants.lisp osicat.asd version.txt 
Log Message:
Fixed *print-case* dependency
Date: Fri Mar  5 13:34:54 2004
Author: nsiivola

Index: src/grovel-constants.lisp
diff -u src/grovel-constants.lisp:1.3 src/grovel-constants.lisp:1.4
--- src/grovel-constants.lisp:1.3	Sun Feb 29 06:29:14 2004
+++ src/grovel-constants.lisp	Fri Mar  5 13:34:54 2004
@@ -29,7 +29,8 @@
 
 (defun write-groveler (file constants)
   (with-open-file (f file :direction :output :if-exists :supersede)
-    (format f "
+    (let ((*print-case* :upcase))
+      (format f "
 #include <stdio.h>
 #include <sys/stat.h>
 
@@ -50,7 +51,7 @@
     (format f "
       return 0;
 }
-")))
+"))))
 
 (unless (boundp '*grovel*)
   (error "No GROVEL hook!"))


Index: src/osicat.asd
diff -u src/osicat.asd:1.6 src/osicat.asd:1.7
--- src/osicat.asd:1.6	Sun Feb 29 15:29:35 2004
+++ src/osicat.asd	Fri Mar  5 13:34:54 2004
@@ -69,6 +69,7 @@
 ;;;; SYSTEM
 
 (defsystem :osicat
+    :version "0.3.6"
     :depends-on (:uffi)
     :components
     ((:c-source-file "osicat-glue")


Index: src/version.txt
diff -u src/version.txt:1.8 src/version.txt:1.9
--- src/version.txt:1.8	Sun Feb 29 18:52:23 2004
+++ src/version.txt	Fri Mar  5 13:34:54 2004
@@ -1 +1 @@
-0.3.5
+0.3.6