[Bug-mit-scheme] [bug #21134] (values 'foo) does not return foo

[Abdulaziz Ghuloum]

URL:
  <http://savannah.gnu.org/bugs/?21134>

                 Summary: (values 'foo) does not return foo
                 Project: MIT/GNU Scheme
            Submitted by: aghuloum
            Submitted on: Saturday 09/22/2007 at 07:06
                Category: None
                Severity: 3 - Normal
                Priority: 5 - Normal
              Item Group: Incorrect behavior
                  Status: None
                 Privacy: Public
             Assigned to: None
         Originator Name: 
        Originator Email: 
             Open/Closed: Open
         Discussion Lock: Any
                Keywords: 

    _______________________________________________________

Details:

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.

Aziz,,,






    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?21134>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/