summaryrefslogtreecommitdiff
path: root/module/ice-9/vlist.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/ice-9/vlist.scm')
-rw-r--r--module/ice-9/vlist.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/module/ice-9/vlist.scm b/module/ice-9/vlist.scm
index 4b40b9932..8c7c87b72 100644
--- a/module/ice-9/vlist.scm
+++ b/module/ice-9/vlist.scm
@@ -66,9 +66,7 @@
;;;
(define block-growth-factor
- (let ((f (make-fluid)))
- (fluid-set! f 2)
- f))
+ (make-fluid 2))
(define-syntax-rule (define-inline (name formals ...) body ...)
;; Work around the lack of an inliner.