From: Sam S. <sd...@gn...> - 2011-04-11 01:46:24
|
> * Vladimir Tzankov <igmnaxbi@tznvy.pbz> [2011-04-08 16:42:45 +0300]: > > On 4/5/11, Sam Steingold <sd...@gn...> wrote: >> it would be nice if you could investigate this. >> (build with "./configure --with-debug --cbc build-g", run under gdb, >> break in legal_namechar, and see why the char 160 is illegal when >> *PATHNAME-ENCODING* is ISO-8859-1). > > legal_namebyte():825 is reached with ch == 160 and this is form config.h: > #define VALID_FILENAME_CHAR ((ch >= 1) && (ch <= 127) && (ch != 47)) is this actually correct? only ascii pathnames on mac os x? oh well... fine, so the test has to be fixed. please try the appended patch on mac os x. thanks! -- Sam Steingold (http://sds.podval.org/) on Ubuntu 10.10 (maverick) X http://openvotingconsortium.org http://iris.org.il http://jihadwatch.org http://thereligionofpeace.com http://mideasttruth.com http://www.memritv.org ((lambda (x) `(,x ',x)) '(lambda (x) `(,x ',x))) diff -r 35868d7a9a29 tests/path.tst --- a/tests/path.tst Sun Apr 10 17:53:58 2011 -0400 +++ b/tests/path.tst Sun Apr 10 21:45:13 2011 -0400 @@ -1345,8 +1345,10 @@ NIL (custom:*load-paths* (list (concatenate 'string dir "**")))) (rmrf dir) (ext:make-directory dir) + (handler-case (open (concatenate 'string dir weird) :direction :probe :if-does-not-exist :create) + (parse-error (c) (princ-error c))) ; only ASCII pathnames on OSX (with-open-file (os (concatenate 'string dir good ".lisp") :direction :output) (format os "(defparameter *load-var* 1234)~%")) |