This commit is contained in:
Michael Myers 2018-03-23 21:23:38 -04:00 committed by Vincent St-Amour
parent e01a21db0c
commit a70e6bdfc9

View File

@ -65,7 +65,7 @@
(ser-push! (bulk-binding-at-bulk bba))) (ser-push! (bulk-binding-at-bulk bba)))
#:property prop:reach-scopes #:property prop:reach-scopes
(lambda (sms reach) (lambda (sms reach)
;; bulk bindings are pruned dependong on whether all scopes ;; bulk bindings are pruned depending on whether all scopes
;; in `scopes` are reachable, and we shouldn't get here ;; in `scopes` are reachable, and we shouldn't get here
;; when looking for scopes ;; when looking for scopes
(error "shouldn't get here")) (error "shouldn't get here"))