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

Add more TR keywords to tabify list.

Browse Source
This commit is contained in:
Vincent St-Amour 2011-04-28 16:10:21 -04:00
parent cfab042e54
commit 5592e9b34b
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -221,13 +221,13 @@
'(struct '(struct
local local
struct: struct: define-struct: define-struct/exec:
define: define:
define-type define-type define-predicate
match-define)) match-define))
(for-each (λ (x) (for-each (λ (x)
(hash-set! hash-table x 'begin)) (hash-set! hash-table x 'begin))
'(case-lambda '(case-lambda case-lambda: pcase-lambda:
match-lambda match-lambda* match-lambda match-lambda*
cond cond
delay delay
@ -256,6 +256,7 @@
let-values: letrec-values: let*-values: let-values: letrec-values: let*-values:
let/cc: let/ec: let/cc: let/ec:
lambda: λ: lambda: λ:
plambda: opt-lambda: popt-lambda:
for for/list for/hash for/hasheq for/and for/or for for/list for/hash for/hasheq for/and for/or
for/lists for/first for/last for/fold for/lists for/first for/last for/fold
@ -263,7 +264,7 @@
for*/lists for*/first for*/last for*/fold for*/lists for*/first for*/last for*/fold
for: for/list: for/or: for/lists: for/fold: for: for/list: for/or: for/lists: for/fold:
for*: for*/lists: do: for*: for*/lists: for*/fold: do:
kernel-syntax-case kernel-syntax-case
syntax-case syntax-case* syntax-rules syntax-id-rules syntax-case syntax-case* syntax-rules syntax-id-rules