Custom Query (1030 matches)

The CL HyperSpec says of *print-radix*:

For integers, base ten is indicated by a trailing decimal point instead of a leading radix specifier; for ratios, #10r is used.

Yet CCL omits the leading "#10r" in the example shown below. I did the same test in Allegro CL, CLISP, CMUCL, GCL, Lispworks, and SBCL, and each of those printed "#10r4/5" rather than "4/5".

Welcome to Clozure Common Lisp Version 1.9-dev-r15503M-trunk (LinuxX8664)! ? (setq *print-base* 10 *print-radix* t) T ? 4/5 4/5 ?

It appears that sometimes (prog1 x y) returns y. I've attached a file where CCL returns an incorrect value, perhaps for that reason. Version/platform info is in that file, but here it is:

1.9-dev-r15527M-trunk  (LinuxX8664)

[and from uname -a:]

Linux sloth 2.6.32-45-server #100-Ubuntu SMP Wed Nov 14 11:02:27 UTC 2012 x86_64 GNU/Linux

As explained in the attached file, I didn't have this problem on a Mac for a slightly older CCL version.

The attached file produces an error in CCL, startup banner:

Welcome to Clozure Common Lisp Version 1.10-dev-r15881M-trunk  (LinuxX8664)!

The error message is as shown below.

% /projects/acl2/lisps/ccl/ccl-15881
Starting 64-bit CCL
Welcome to Clozure Common Lisp Version 1.10-dev-r15881M-trunk  (LinuxX8664)!
? (load "bug.lisp")
> Error: Registers clobbered applying G to (3)
>        save0 sb: NIL, Was: 4
>        save1 sb: #1=(NIL), Was: #1#
>        save2 sb: *SAVE-SOURCE-LOCATIONS*, Was: *SAVE-SOURCE-LOCATIONS*
>        save3 sb: #2=#<CCL::LEXICAL-ENVIRONMENT #x302000496AAD>, Was: #2#
>        
> While executing: (:INTERNAL CCL::WITH-COMPILATION-UNIT-BODY CCL::LOAD-FROM-STREAM), in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > 

Perhaps this related to CCL's optimized handling of CASE expressions in some situations; for example, changing 2 to 8 in this example makes the problem disappear.

By the way, I tried it on a Mac too, with a slightly older version of CCL and got a similar error. Startup banner there was:

Welcome to Clozure Common Lisp Version 1.10-dev-r15835M-trunk  (DarwinX8664)!