From 32a8da58cb609fad2240ae3a6410c2dbec078d29 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 29 Apr 2011 11:12:38 -0400 Subject: [PATCH] More indentation of TR keywords. --- collects/framework/private/main.rkt | 19 +++++++++++-------- 1 file changed, 11 insertions(+), 8 deletions(-) diff --git a/collects/framework/private/main.rkt b/collects/framework/private/main.rkt index 18572e0428..3227e9379b 100644 --- a/collects/framework/private/main.rkt +++ b/collects/framework/private/main.rkt @@ -221,8 +221,8 @@ '(struct local - struct: define-struct: define-struct/exec: - define: + struct: define-struct: define-typed-struct define-struct/exec: + define: pdefine: define-type define-predicate match-define)) (for-each (λ (x) @@ -258,13 +258,16 @@ lambda: λ: plambda: opt-lambda: popt-lambda: - for for/list for/hash for/hasheq for/and for/or - for/lists for/first for/last for/fold - for* for*/list for*/hash for*/hasheq for*/and for*/or - for*/lists for*/first for*/last for*/fold + 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* 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: for/list: for/or: for/lists: for/fold: - for*: for*/lists: for*/fold: do: + 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*: for*/list: for*/hash: for*/hasheq: for*/hasheqv: for*/and: for*/or: + for*/lists: for*/first: for*/last: for*/fold: for*/vector: for*/flvector: + do: kernel-syntax-case syntax-case syntax-case* syntax-rules syntax-id-rules