From 35c4abd0494db398f9d30ce6e9bcc163bdf0b5f7 Mon Sep 17 00:00:00 2001 From: Eric Dobson Date: Mon, 11 Nov 2013 21:43:04 -0800 Subject: [PATCH] Made tabs into spaces. original commit: 6e00ae83d38ac85f7f9843f8fe0ad01f16d5bc85 --- .../typed-racket/utils/stxclass-util.rkt | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/utils/stxclass-util.rkt b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/utils/stxclass-util.rkt index ed6172dc..62dfbba8 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/utils/stxclass-util.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/utils/stxclass-util.rkt @@ -13,11 +13,11 @@ [(_ arg:expr attr:id pat) (let* ([i (generate-temporary)] [get-i (datum->syntax - i - (string->symbol - (string-append (symbol->string (syntax-e i)) - "." - (symbol->string (syntax-e #'attr)))))]) + i + (string->symbol + (string-append (symbol->string (syntax-e i)) + "." + (symbol->string (syntax-e #'attr)))))]) (quasisyntax/loc stx (syntax-parse arg [#,i #:declare #,i pat #'#,get-i])))]))