add `br/list`

beautiful-racket-lib/br/list.rkt

@@ -0,0 +1,6 @@
+#lang racket/base
+(require br/define (for-syntax racket/base))
+(provide (all-defined-out))
+         
+(define-macro (values->list EXPR)
+  #'(call-with-values (λ () EXPR) list))

beautiful-racket-lib/br/main.rkt

@@ -1,10 +1,10 @@
 #lang racket/base
 (require racket/provide racket/list racket/string racket/format racket/match racket/port  racket/function
-         br/define br/syntax br/datum br/debug br/cond racket/class racket/vector br/reader-utils
+         br/define br/syntax br/datum br/debug br/cond br/list racket/class racket/vector br/reader-utils
          (for-syntax racket/base racket/syntax br/syntax br/debug br/define br/datum))
 (provide (all-from-out racket/base)
          (all-from-out racket/list racket/string racket/format racket/match racket/port racket/function
-                       br/syntax br/datum br/debug br/cond racket/class racket/vector br/define br/reader-utils)
+                       br/syntax br/datum br/debug br/cond br/list racket/class racket/vector br/define br/reader-utils)
          (for-syntax (all-from-out racket/base racket/syntax br/syntax br/debug br/datum))
          (for-syntax caller-stx with-shared-id)) ; from br/define
          
@@ -21,10 +21,6 @@
   #'(parameterize ([current-namespace (make-base-namespace)])
       (dynamic-require . ARGS)))
 
-(provide values->list)
-(define-macro (values->list EXPR)
-  #'(call-with-values (λ () EXPR) list))
-
 (module reader syntax/module-reader
   #:language 'br
   #:info br-get-info