use all-attrs as default value for current-attrs parameter

main
Matthew Butterick 3 years ago
parent d0e6a86cd5
commit 92c56e3ee4

@ -1,5 +1,6 @@
#lang racket/base
(require racket/match
"constants.rkt"
"struct.rkt")
(provide (all-defined-out))
@ -13,7 +14,7 @@
val))) ...))
(define-guarded-parameters
[current-attrs (λ (xs) (and (list? xs) (andmap attr-key? xs))) null]
[current-attrs (λ (xs) (and (list? xs) (andmap attr-key? xs))) all-attrs]
[current-show-timing? boolean? #false]
[current-strict-attrs? boolean? #false]
[current-use-preconditions? boolean? #true]

Loading…
Cancel
Save