Hello again, Moritz Heidkamp <mor...@twoticketsplease.de> writes: > 1. It dumps compilation results in ~/.cache by default. This, however, > is a bit like dumping stuff in /usr/share so I think it would be > better to make this ~/.cache/chicken-inline or something.
Mario just pointed out to me in #chicken that the current default is actually ".cache", not "~/.cache". It just happened to be that I ran csi from my home when trying it out and then I didn't properly read the code when hacking up the patch. Considering that this default directory is apparently meant as a relative path I propose the attached new version which sets it to ".chicken-inline" by default. Moritz
Index: inline.scm =================================================================== --- inline.scm (revision 28291) +++ inline.scm (working copy) @@ -39,7 +39,7 @@ (define (inline-eval x . o) (inline-compile x (if (pair? o) (car o) "") #t)) -(define-constant default-inline-cache-name ".cache") +(define-constant default-inline-cache-name ".chicken-inline") (define windows-shell (foreign-value "C_WINDOWS_SHELL" bool)) (define inline-cache (make-parameter default-inline-cache-name)) @@ -94,7 +94,6 @@ (zero? (system (sprintf "cmp -s ~A ~A" (qs a) (qs b)))) ))) (define (ensure-cache) - (unless (file-exists? (inline-cache)) - (create-directory (inline-cache)) ) ) + (create-directory (inline-cache) #t) ) )
_______________________________________________ Chicken-hackers mailing list Chicken-hackers@nongnu.org https://lists.nongnu.org/mailman/listinfo/chicken-hackers