suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add for/set and it's varieties to the default prefs

Browse Source
This commit is contained in:
Robby Findler 2013-02-13 10:48:44 -06:00
parent 9ff47ec1d0
commit 7dff18c385
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/private/main.rkt
View File

@ -101,7 +101,7 @@
(define base-fors (define base-fors
'(for for/list for/hash for/hasheq for/hasheqv for/and for/or '(for for/list for/hash for/hasheq for/hasheqv for/and for/or
for/lists for/first for/last for/fold for/vector for/flvector for/lists for/first for/last for/fold for/vector for/flvector
for/sum for/product)) for/sum for/product for/set))
(define untyped-fors (define untyped-fors
(append base-fors (append base-fors
(map (λ (x) (string->symbol (regexp-replace #rx"^for" (symbol->string x) "for*"))) (map (λ (x) (string->symbol (regexp-replace #rx"^for" (symbol->string x) "for*")))