A whole bunch of missing newlines at EOFs (and a few other spaceages).

original commit: cbfb1fdb370244c2cadcf327332f1c643d4588c0
This commit is contained in:
Eli Barzilay 2012-10-19 06:47:24 -04:00
parent e2fae17d73
commit f19e523806
5 changed files with 5 additions and 5 deletions

View File

@ -28,4 +28,4 @@
(place-channel-put enq-ch (vector 'log name dir res-ch*))
(place-channel-get res-ch)]
[else
(generate-log/place name dir)]))
(generate-log/place name dir)]))

View File

@ -6,4 +6,4 @@
(define (f t)
(match t
[(s value) (s value)]
[_ (error 'fail)]))
[_ (error 'fail)]))

View File

@ -11,4 +11,4 @@
(dynamic-require (collapse-module-path '(submod "." #%type-decl) m)
#f))))
(provide add-mod! do-requires)
(provide add-mod! do-requires)

View File

@ -10,4 +10,4 @@
(dict-set! mvar-env id #t))
(define (is-var-mutated? id)
(dict-ref mvar-env id #f))
(dict-ref mvar-env id #f))

View File

@ -7,4 +7,4 @@
(disappeared-use-todo (cons t (disappeared-use-todo))))
(define disappeared-bindings-todo (make-parameter '()))
(define (add-disappeared-binding t)
(disappeared-bindings-todo (cons t (disappeared-bindings-todo))))
(disappeared-bindings-todo (cons t (disappeared-bindings-todo))))