newlines at EOFs

svn: r16630

original commit: 44d88cee6b13d29d08d5bdd8e9e7681ca70a3765

collects/tests/typed-scheme/succeed/match-dots2.ss

@@ -6,4 +6,4 @@
 ;; evaluates a postfix sequence of items, using a stack
 (define (post-eval)
   (match '(1 2)
-    [(list (? number? #{stack : (Listof Number)}) ...) 3]))
+    [(list (? number? #{stack : (Listof Number)}) ...) 3]))

collects/tests/typed-scheme/xfail/applicative.ss

@@ -20,4 +20,4 @@
  (λ (env)
    ((f env) (x env))))
 
-(ap (pure id) (pure 4))
+(ap (pure id) (pure 4))

collects/tests/typed-scheme/xfail/rec-contract.ss

@@ -10,4 +10,4 @@
   (require 'm)
   (f 1))
 
-(require 'mm)
+(require 'mm)

collects/typed-scheme/private/colon.ss

@@ -46,4 +46,4 @@
      (case (length (syntax->list #'(x ...)))
        [(1)  (err "can only annotate identifiers with types" #'i)]
        [(0)  (err "missing type")]
-       [else (err "bad syntax (multiple types after identifier)")])]))
+       [else (err "bad syntax (multiple types after identifier)")])]))

collects/typed-scheme/rep/filter-rep.ss

@@ -95,4 +95,4 @@
 (define LatentFilterSet/c
   (flat-named-contract
    'LatentFilterSet
-   (λ (e) (or (LFilterSet? e)))))
+   (λ (e) (or (LFilterSet? e)))))