bugMIT/GNU Scheme - Bugs: bug #21134, (values 'foo) does not return foo


bug #21134: (values 'foo) does not return foo

Submitted by:  Abdulaziz Ghuloum <aghuloum>
Submitted on:  Sat 22 Sep 2007 07:06:45 AM UTC  
Category:  None Severity:  3 - Normal
Priority:  5 - Normal Item Group:  Incorrect behavior
Status:  Invalid Privacy:  Public
Assigned to:  None Originator Name: 
Open/Closed:  Closed

Add a New Comment(Rich Markup)

You are not logged in

Please log in, so followups can be emailed to you.


Mon 03 Jun 2013 04:11:31 PM UTC, comment #1:

(values 'foo) is not supposed to return 'foo.

Matt Birkholz <mhb>
Project Member
Sat 22 Sep 2007 07:06:45 AM UTC, original submission:

Instead, values returns a closure:

MIT/GNU Scheme running under MacOSX
Image saved on Saturday June 23, 2007 at 8:26:50 PM
Release 7.7.90.+ || Microcode 15.1 || Runtime 15.7

1 ]=> (values 'foo)

;Value 1: #[compiled-closure 1 ("global" #xd) #x5e #x2726de #x4cd298]

A related bug is in call-with-values, when the producer returns a value (without calling values):

1 ]=> (call-with-values (lambda () 1) list)

;The object 1 is not applicable.
;To continue, call RESTART with an option number:
; (RESTART 2) => Specify a procedure to use in its place.
; (RESTART 1) => Return to read-eval-print level 1.


Abdulaziz Ghuloum <aghuloum>


(Note: upload size limit is set to 16384 kB, after insertion of the required escape characters.)

Attach Files:

No files currently attached


Depends on the following items: None found

Items that depend on this one: None found


Carbon-Copy List
  • -email is unavailable- added by mhb (Posted a comment)
  • -email is unavailable- added by aghuloum (Submitted the item)

    Do you think this task is very important?
    If so, you can add your encouragement to it.
    This task has 0 encouragements so far.

    Only logged-in users can vote.




    Follow 2 latest changes.

    Date Changed by Updated Field Previous Value => Replaced by
    2013-06-03 mhb StatusNone => Invalid
        Open/ClosedOpen => Closed

    Back to the top

    Powered by Savane 3.3