Opened 10 years ago

Closed 8 years ago

#478 closed defect (fixed)

coops: Error: during expansion of (define-class ...) - unbound variable: alist-cons

Reported by: Moritz Heidkamp Owned by: felix winkelmann
Priority: minor Milestone:
Component: extensions Version: 4.6.x
Keywords: coops Cc: ewfalor
Estimated difficulty:

Description

The example at http://moritz.twoticketsplease.de/files/dirty-coops.scm fails with the above message. coopse is probably missing something like (begin-for-syntax (use srfi-1)) there!

Change History (10)

comment:1 Changed 10 years ago by felix winkelmann

Resolution: fixed
Status: newclosed

Thanks - I have tagged a new version (1.3).

comment:2 Changed 9 years ago by felix winkelmann

Milestone: 4.7.04.8.0

Milestone 4.7.0 deleted

comment:3 Changed 9 years ago by Moritz Heidkamp

Resolution: fixed
Status: closedreopened

Oddly, I again/still get this error with coops 1.6 and Chicken 4.7 now.

comment:4 Changed 9 years ago by Moritz Heidkamp

Ah, the fix you commited for this was to add (import-for-syntax srfi-1). This doesn't seem to do the trick anymore. Replacing it with this works though:

(begin-for-syntax
 (import chicken)
 (use srfi-1))

Not sure if there is a better solution, perhaps?

comment:5 Changed 9 years ago by felix winkelmann

Milestone: 4.8.0

comment:6 Changed 9 years ago by felix winkelmann

Resolution: fixed
Status: reopenedclosed

Ugh. Thanks. 1.7 has been tagged.

comment:7 Changed 9 years ago by Jim Ursetto

Resolution: fixed
Status: closedreopened

This is reported to break coops on Chicken 4.6.5 (at least).

comment:8 Changed 9 years ago by ewfalor

Cc: ewfalor added

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

comment:9 Changed 9 years ago by felix winkelmann

It seems to work with 4.6.7 and 4.7.4. I'm not sure what to do and if or how to support older chickens. Does syn's suggested modifications work with 4.6.5?

comment:10 Changed 8 years ago by felix winkelmann

Resolution: fixed
Status: reopenedclosed

I close this now. I think upgrading to 4.7.0 is acceptable.

Note: See TracTickets for help on using tickets.