problem compiling CVS version of clocc

(oops - I saw that I should send bug reports here...)

I am using SBCL-0.8.21 on solaris.

I am following the instructions in the INSTALL file - doing it
at the lisp prompt. I get an error at this step of the install
process:

(mk:oos "cllib" :compile)


This is the error:

debugger invoked on a SB-INT:COMPILED-PROGRAM-ERROR in thread 15484:
  Execution of a form compiled with errors.
Form:
  #'(NAMED-LAMBDA GEN-EXPONENTIAL-VARIATE-LOG-METHOD
                (MU &OPTIONAL (*RANDOM-STATE* *RANDOM-STATE*))
                (DECLARE (TYPE RANDOM-STATE *RANDOM-STATE*)
                         (TYPE (DOUBLE-FLOAT (0.0d0)) MU))
                (BLOCK GEN-EXPONENTIAL-VARIATE-LOG-METHOD
                  (* MU (- (LOG (RANDOM 1.0d0))))))
Compile-time-error:
  Lock on package COMMON-LISP violated when declaring the type of *RANDOM-STATE*.
See also:
  The SBCL Manual, Node "Package Locks"
  The ANSI Standard, Section 11.1.2.1.2

Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

((SB-C::TOP-LEVEL-FORM
  (SB-IMPL::%DEFUN 'GEN-EXPONENTIAL-VARIATE-LOG-METHOD
                   (SB-INT:NAMED-LAMBDA "#<...>" . "#<...>")
                   "Generate a pseudo-random number drawn from an exponential PDF with a
mean of mu:
                - X/MU
              %E
              --------
                 MU

 STATE is the random state to use.  The logarithmic method is used.
"
                   "#<...>"
                   . "#<...>")))
0] backtrace

0: ((SB-C::TOP-LEVEL-FORM
     (SB-IMPL::%DEFUN 'GEN-EXPONENTIAL-VARIATE-LOG-METHOD
                      (SB-INT:NAMED-LAMBDA "#<...>" . "#<...>")
                      "Generate a pseudo-random number drawn from an exponential PDF with a
mean of mu:
                - X/MU
              %E
              --------
                 MU

 STATE is the random state to use.  The logarithmic method is used.
"
                      "#<...>"
                      . "#<...>")))
1: (SB-FASL::LOAD-FASL-GROUP
    #<SB-SYS:FD-STREAM for "file \"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl\"" {40F9F2A1}>)
2: (SB-FASL::LOAD-AS-FASL
    #<SB-SYS:FD-STREAM for "file \"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl\"" {40F9F2A1}> 
    T
    #<unavailable argument>)
3: (SB-FASL::INTERNAL-LOAD
    #P"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl"
    #P"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl"
    :ERROR
    T
    NIL
    :BINARY
    NIL)
4: (SB-FASL::INTERNAL-LOAD
    #P"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl"
    #P"/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl"
    :ERROR
    T
    NIL
    NIL
    :DEFAULT)
5: (LOAD
    "/net/oslo/vol/vol1/sim/work/ram/public_src/clocc_cvs/clocc/src/cllib/rng.fasl")
6: (MAKE::LOAD-FILE-OPERATION #<FILE: rng> :NEW-SOURCE-ALL)
7: (MAKE::COMPILE-AND-LOAD-OPERATION #<FILE: rng> :NEW-SOURCE-ALL)
8: (MAKE::OPERATE-ON-COMPONENT #<FILE: rng> :COMPILE :NEW-SOURCE-ALL)
9: (MAKE::OPERATE-ON-COMPONENTS
    #<DEFSYSTEM: cllib>
    :COMPILE
    :NEW-SOURCE-AND-DEPENDENTS
    #<unavailable argument>)
10: (MAKE::OPERATE-ON-COMPONENT
     #<DEFSYSTEM: cllib>
     :COMPILE
     :NEW-SOURCE-AND-DEPENDENTS)
11: ((LAMBDA ()))
12: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA #) {400014BD}>)
13: (MAKE:OPERATE-ON-SYSTEM
     "cllib"
     :COMPILE
     :FORCE
     NIL
     :VERSION
     NIL
     :TEST
     NIL
     :VERBOSE
     NIL
     :LOAD-SOURCE-INSTEAD-OF-BINARY
     NIL
     :LOAD-SOURCE-IF-NO-BINARY
     NIL
     :BOTHER-USER-IF-NO-BINARY
     NIL
     :COMPILE-DURING-LOAD
     NIL
     :DRIBBLE
     NIL
     :MINIMAL-LOAD
     NIL
     :OVERRIDE-COMPILATION-UNIT
     T)
14: (SB-INT:EVAL-IN-LEXENV
     (MAKE:OOS "cllib" :COMPILE)
     #S(SB-KERNEL:LEXENV
        :FUNS NIL
        :VARS NIL
        :BLOCKS NIL
        :TAGS NIL
        :TYPE-RESTRICTIONS NIL
        :LAMBDA NIL
        :CLEANUP NIL
        :HANDLED-CONDITIONS NIL
        :DISABLED-PACKAGE-LOCKS NIL
        :POLICY ((SPEED . 1) (SPACE . 1) (SAFETY . 1)
                 (SB-EXT:INHIBIT-WARNINGS . 1) (DEBUG . 1)
                 (COMPILATION-SPEED . 1))))
15: (SB-EXT:INTERACTIVE-EVAL (MAKE:OOS "cllib" :COMPILE))
16: (SB-IMPL::REPL-FUN NIL)
17: ((LAMBDA ()))
18: ((LAMBDA ()))
19: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {400001ED}>)
20: (SB-IMPL::TOPLEVEL-REPL NIL)
21: (SB-IMPL::TOPLEVEL-INIT)
22: ((FLET SB-IMPL::RESTART-LISP))



-------------------------------------------------------
This SF.Net email is sponsored by: New Crystal Reports XI.
Version 11 adds new functionality designed to reduce time involved in
creating, integrating, and deploying reporting solutions. Free runtime info,
new features, or free trial, at: http://www.businessobjects.com/devxi/728