Re: [Chicken-janitors] #478: coops: Error: during expansion of (define-class ...) - unbound variable: alist-cons

[Chicken Trac]

#478: coops: Error: during expansion of (define-class ...) - unbound variable:
alist-cons
-------------------------+--------------------------------------------------
  Reporter:  syn         |       Owner:  felix   
      Type:  defect      |      Status:  reopened
  Priority:  minor       |   Milestone:          
 Component:  extensions  |     Version:  4.6.x   
Resolution:              |    Keywords:  coops   
-------------------------+--------------------------------------------------
Changes (by ewfalor):

 * cc: ewfalor (added)


Comment:

 Here's the error trace I'm getting with `chicken-install coops` on Windows
 Chicken 4.6.5:

 {{{
 installing coops: ...
 changing current directory to
 C:\Users\efalor\AppData\Local\Temp/temp30c0/coops
   "C:\chicken\bin\csi" -bnq -setup-mode -e "(require-library setup-api)"
 -e "(import setup-api)" -e "
 (setup-error-handling)" -e "(extension-name-and-version '(\"coops\"
 \"\"))" "C:\Users\efalor\AppData\
 Local\Temp\temp30c0\coops\coops.setup"
   ""C:\chicken\bin\csc"" -feature compiling-extension -setup-mode    -s
 -O3 -d1 coops-module.scm -JS
 -o coops.so

 Error: during expansion of (register-generic-procedure1229 ...) - unbound
 variable: when

         Call history:

         <eval>    (rename1169 (##core#syntax getter-with-setter))
         <eval>    (##sys#cons (##sys#cons (rename1169 (##core#syntax make-
 generic-procedure/name)) (##sys#cons name ar......
         <eval>    (##sys#cons (rename1169 (##core#syntax make-generic-
 procedure/name)) (##sys#cons name args))
         <eval>    (rename1169 (##core#syntax make-generic-procedure/name))
         <eval>    (##sys#cons name args)
         <eval>    (##sys#cons (##sys#cons (rename1169 (##core#syntax make-
 generic-procedure/name)) (##sys#cons (##sys#......
         <eval>    (##sys#cons (rename1169 (##core#syntax make-generic-
 procedure/name)) (##sys#cons (##sys#cons (rename......
         <eval>    (rename1169 (##core#syntax make-generic-procedure/name))
         <eval>    (##sys#cons (##sys#cons (rename1169 (##core#syntax
 setter)) (##sys#cons name (quote1168 ()))) args)
         <eval>    (##sys#cons (rename1169 (##core#syntax setter))
 (##sys#cons name (quote1168 ())))
         <eval>    (rename1169 (##core#syntax setter))
         <eval>    (##sys#cons name (quote1168 ()))
         <syntax>          (##core#begin (register-generic-procedure1229
 print-object) (define1230 print-object (#%getter-with-......
         <syntax>          (register-generic-procedure1229 print-object)
         <eval>    (cadr x)
         <eval>    (when (symbol? name) (put! name (quote ##coops#generic)
 (or (##sys#current-module) #t)))   <--

 Error: shell command terminated with non-zero exit status 70:
 ""C:\chicken\bin\chicken.exe" "coops-module.scm" -output-file "coops.c"
 -dynamic -feature chicken-compile-shared -feature compiling-extension
 -setup-mode -optimize-level 3 -debug-level 1 -emit-all-import-libraries
 -scrutinize"

 Error: shell command failed with nonzero exit status 1:

   ""C:\chicken\bin\csc"" -feature compiling-extension -setup-mode    -s
 -O3 -d1 coops-module.scm -JS -o coops.so

 }}}

-- 
Ticket URL: <http://bugs.call-cc.org/ticket/478#comment:8>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.