[Openmcl-devel] Unicode - Yippy!
gb at clozure.com
Wed Oct 25 23:29:26 UTC 2006
On Wed, 25 Oct 2006, Ben Hyde wrote:
> Congratulations! This is very exciting.
It'll be even more exciting (I hope ...) when it works a little better.
> Hopefully this problem is because I've never quite grok'd locale.
No, that should have worked. Something in the guts of PEEK-CHAR
was neglecting to pass a required argument to a function that was
compiled with (SPEED 3) (SAFETY 0), and wackiness ensued.
Will be fixed in CVS in a little while.
> 535$ echo '(progn (print :gee) (quit))' | scripts/openmcl -K utf-8 -Q
> -n -b
> > Error: value #<Compiled-function CCL::%IOBLOCK-READ-U8-ENCODED-
> CHAR (Non-Global) #x80E0F3E> is not of the expected type BASE-CHAR.
> > While executing: CCL::%ADD-CHAR-TO-TOKEN, in process listener(1).
> > Type :POP to abort, :R for a list of available restarts.
> > Type :? for other options.
> Unhandled exception 4 at 0x1000, context->regs at #xf0134ab8
> Everything else below is just to illustrate how my rig is set up,
> 528$ cvs -q up -A
> M scripts/openmcl
> 529$ cvs -q diff
> Index: scripts/openmcl
> RCS file: /usr/local/tmpcvs/openmcl-dev/ccl/scripts/openmcl,v
> retrieving revision 22.214.171.124
> diff -r126.96.36.199 openmcl
> < CCL_DEFAULT_DIRECTORY=/usr/local/src/ccl
> > CCL_DEFAULT_DIRECTORY=/Users/bhyde/w/openmcl/ccl
> 530$ scripts/openmcl -n -e '(progn (print :gee) (quit))'
> 531$ scripts/openmcl -K utf-8 -n -e '(progn (print :gee) (quit))'
> Though it doesn't work in Terminal either.
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
More information about the Openmcl-devel