summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ice-9/boot-9.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index fed4f3639..6e132d167 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -98,7 +98,7 @@
(define (-1+ n) (+ n -1))
(define 1- -1+)
(define return-it noop)
-(define (and=> value thunk) (and value (thunk value)))
+(define (and=> value procedure) (and value (procedure value)))
(define (make-hash-table k) (make-vector k '()))
;;; apply-to-args is functionally redunant with apply and, worse,