id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
1002	define-values is overly restrictive	johnwcowan		"Currently, `define-values` requires that its lambda-list be a proper list of identifiers like `(a b)`, whereas it should allow `(a b . c)` and even `a`, which are both valid lambda-lists.

The following definition achieves this:

{{{
(define-syntax define-values 
   (syntax-rules () 
     ((define-values () exp) 
      (call-with-values (lambda () exp) (lambda () 'unspecified))) 
     ((define-values (var . vars) exp) 
      (begin  
        (define var (call-with-values (lambda () exp) list)) 
        (define-values vars (apply values (cdr var))) 
        (define var (car var)))) 
     ((define-values var exp) 
      (define var (call-with-values (lambda () exp) list))))) 
}}}"	enhancement	closed	major	someday	unknown	4.8.x	fixed