From ddcb0318051c05363bafb9c5e960bd8c095cf74c Mon Sep 17 00:00:00 2001 From: Asumu Takikawa Date: Tue, 3 Sep 2013 21:11:25 -0400 Subject: [PATCH] Fix indentation --- .../typed-racket/base-env/base-special-env.rkt | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt index a08ccd77b8..31f8510801 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt @@ -38,11 +38,11 @@ [(make-template-identifier 'all-languages 'string-constants/string-constant) (-> (-lst -Symbol))] ;; qq-append - [(make-template-identifier 'qq-append 'racket/private/qq-and-or) - (-poly (a b) - (cl->* - (-> (-lst a) (-val '()) (-lst a)) - (-> (-lst a) (-lst b) (-lst (Un a b)))))] + [(make-template-identifier 'qq-append 'racket/private/qq-and-or) + (-poly (a b) + (cl->* + (-> (-lst a) (-val '()) (-lst a)) + (-> (-lst a) (-lst b) (-lst (Un a b)))))] ;; make-sequence [(make-template-identifier 'make-sequence 'racket/private/for) (-poly (a b)