<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style>
</head>
<body class='hmmessage'><div dir='ltr'>
I mentioned the extra error when using quicklisp > it is thrown when compiling "lists.lisp", so I just opened lists.lisp in the quicklisp dist folder and the one I downloaded from your site, Edi. I found the following differences:<BR> <BR>Quicklisp:<BR>(|COMMON-LISP|::|IN-PACKAGE| :|CL-UNICODE|) <br>(|COMMON-LISP|::|SETQ| |CL-UNICODE|::|*GENERAL-CATEGORIES*| '(|CL-UNICODE-NAMES|::|CO| etc...<BR> <BR>Edi's site:<BR>(in-package :cl-unicode) <br>(setq *general-categories* (quote (cl-unicode-names::CO etc...<BR> <BR>Both are version 0.1.2 so I don't understand why this is, but it is clear that my CL implementation has trouble with that. I actually use "GDL" btw, which is build on top of AllegroCL and for some reason it doesn't recognise COMMON-LISP.<BR> <BR><div><hr id="stopSpelling">From: n_reijnders@hotmail.com<br>To: cl-ppcre-devel@common-lisp.net<br>Date: Fri, 25 Nov 2011 18:34:05 +0100<br>CC: support@franz.com<br>Subject: Re: [cl-ppcre-devel] Error loading cl-unicode<br><br>
<meta name="Generator" content="Microsoft SafeHTML">
<style>
.ExternalClass .ecxhmmessage P
{padding:0px;}
.ExternalClass body.ecxhmmessage
{font-size:10pt;font-family:Tahoma;}
</style>
<div dir="ltr">
Hey Gary,<br> <br>Thank you for the patch! Although I understand that the patch changes the lines stated below; is this something that can be applied automatically? <br>As was most likely clear, I'm not the most experienced CL coder at the moment, so I was wondering if your text was runnable code for a program or not. Not that it isn't doable by hand but I'd like to learn the tricks of the trade! :)<br> <br>Regards<br> <br><div>> From: gwking@metabang.com<br>> Date: Fri, 25 Nov 2011 11:22:13 -0500<br>> To: cl-ppcre-devel@common-lisp.net<br>> CC: support@franz.com<br>> Subject: Re: [cl-ppcre-devel] Error loading cl-unicode<br>> <br>> Hi Noldus and Edi,<br>> <br>> The following patch gets you most of the way there:<br>> <br>> Common subdirectories: cl-unicode-0.1.2/build and cl-unicode-0.1.2a/build<br>> Common subdirectories: cl-unicode-0.1.2/doc and cl-unicode-0.1.2a/doc<br>> Only in cl-unicode-0.1.2a: hash-tables.lisp<br>> Only in cl-unicode-0.1.2a: lists.lisp<br>> Only in cl-unicode-0.1.2a: methods.lisp<br>> Common subdirectories: cl-unicode-0.1.2/test and cl-unicode-0.1.2a/test<br>> diff cl-unicode-0.1.2/util.lisp cl-unicode-0.1.2a/util.lisp<br>> 186c186<br>> < (define-hangul-constant "NCount" (* +v-count+ +t-count+))<br>> ---<br>> > (define-hangul-constant "NCount" (* +V-COUNT+ +T-COUNT+))<br>> 195,198c195,198<br>> < (let* ((s-index (- code-point +s-base+))<br>> < (l-value (+ +l-base+ (floor s-index +n-count+)))<br>> < (v-value (+ +v-base+ (floor (mod s-index +n-count+) +t-count+)))<br>> < (t-value (+ +t-base+ (mod s-index +t-count+))))<br>> ---<br>> > (let* ((s-index (- code-point +S-BASE+))<br>> > (l-value (+ +L-BASE+ (floor s-index +N-COUNT+)))<br>> > (v-value (+ +V-BASE+ (floor (mod s-index +N-COUNT+) +T-COUNT+)))<br>> > (t-value (+ +T-BASE+ (mod s-index +T-COUNT+))))<br>> 203c203<br>> < (and (/= t-value +t-base+)<br>> ---<br>> > (and (/= t-value +T-BASE+)<br>> <br>> <br>> All tests pass except for <br>> <br>> 279:<br>> (string= (unicode-name 13327) "CJK UNIFIED IDEOGRAPH-340F") returned NIL<br>> <br>> but this would work if the test used string-equal rather than string=<br>> <br>> HTH,<br>> <br>> <br>> <br>> _______________________________________________<br>> cl-ppcre-devel site list<br>> cl-ppcre-devel@common-lisp.net<br>> http://common-lisp.net/mailman/listinfo/cl-ppcre-devel<br></div> </div>
<br>_______________________________________________
cl-ppcre-devel site list
cl-ppcre-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cl-ppcre-devel</div> </div></body>
</html>