Re: How to (eval ...) in a R7RS library?

[Lukas Böger]

Thanks for the suggestion! With this fix, I get as a result of

(import (test-eval))
(my-eval)

an error which is shown below. Any ideas?

Cheers,
Lukas


Error: (car) bad argument type: ()

        Call history:

        <syntax>          (import r7rs)
        <syntax>          (##core#begin (##core#require r7rs r7rs#))
        <syntax>          (##core#require r7rs r7rs#)
        <syntax>          (chicken.load#load-extension (##core#quote r7rs) 
(##core#quote (r7rs#)) (##core#quote require))
        <syntax>          (##core#quote r7rs)
        <syntax>          (##core#quote (r7rs#))
        <syntax>          (##core#quote require)
        <syntax>          (import scheme.r5rs)
        <syntax>          (##core#begin (##core#require scheme.r5rs 
scheme.r5rs#))
        <syntax>          (##core#require scheme.r5rs scheme.r5rs#)
        <syntax>          (chicken.load#load-extension (##core#quote 
scheme.r5rs) (##core#quote (scheme.r5rs#)) (##core#quote ...
        <syntax>          (##core#quote scheme.r5rs)
        <syntax>          (##core#quote (scheme.r5rs#))
        <syntax>          (##core#quote require)
        <eval>    (chicken.load#load-extension (##core#quote r7rs) 
(##core#quote (r7rs#)) (##core#quote require))
        <eval>    (chicken.load#load-extension (##core#quote scheme.r5rs) 
(##core#quote (scheme.r5rs#)) (##core#quote ...       <--

Error: unbound variable: ##sys#delq

        Call history:

        <syntax>          (import r7rs)
        <syntax>          (##core#begin (##core#require r7rs r7rs#))
        <syntax>          (##core#require r7rs r7rs#)
        <syntax>          (chicken.load#load-extension (##core#quote r7rs) 
(##core#quote (r7rs#)) (##core#quote require))
        <syntax>          (##core#quote r7rs)
        <syntax>          (##core#quote (r7rs#))
        <syntax>          (##core#quote require)
        <syntax>          (import scheme.r5rs)
        <syntax>          (##core#begin (##core#require scheme.r5rs 
scheme.r5rs#))
        <syntax>          (##core#require scheme.r5rs scheme.r5rs#)
        <syntax>          (chicken.load#load-extension (##core#quote 
scheme.r5rs) (##core#quote (scheme.r5rs#)) (##core#quote ...
        <syntax>          (##core#quote scheme.r5rs)
        <syntax>          (##core#quote (scheme.r5rs#))
        <syntax>          (##core#quote require)
        <eval>    (chicken.load#load-extension (##core#quote r7rs) 
(##core#quote (r7rs#)) (##core#quote require))
        <eval>    (chicken.load#load-extension (##core#quote scheme.r5rs) 
(##core#quote (scheme.r5rs#)) (##core#quote ...       <--