[Chicken-users] Problem with define-values

[Jack Trades]

I'm trying to use define-values inside a module.  define-values doesn't seem to work when the chicken module is prefixed but works fine when chicken is imported without a prefix.

Version 4.0.7 - SVN rev. 14991

;; This works

(module test (a b)
(import scheme chicken)
(define-values (a b) (values 1 2)))

;; This also works

(module test (a b)
(import (prefix scheme s.) chicken)
(define-values (a b) (s.values 1 2)))

;; This fails

(module test (a b)
(import scheme (prefix chicken c.))
(c.define-values (a b) (values 1 2)))

Warning: reference to possibly unbound identifier: set!-values

Error: module unresolved: test

        Call history:

        <syntax>                (module test (a b) (import (prefix chicken c.) scheme) (c.define-values (a b) (values 1 2)))
        <syntax>                (##core#module test (a b) (import (prefix chicken c.) scheme) (c.define-values (a b) (values 1 2)))
        <syntax>                (import (prefix chicken c.) scheme)
        <syntax>                (##core#undefined)
        <syntax>                (c.define-values (a b) (values 1 2))
        <syntax>                (set!-values23 (a b) (values 1 2))
        <syntax>                (a b)
        <syntax>                (values 1 2)    <--


Jack Trades