From bd9733926076885e3417b74de76e4c9c7bc56254 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:28 -0800 Subject: Import Upstream version 2c7 --- queue.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'queue.scm') diff --git a/queue.scm b/queue.scm index 4557746..89a65b0 100644 --- a/queue.scm +++ b/queue.scm @@ -49,7 +49,7 @@ (if (null? old-first-pair) (queue:set-last-pair! q new-first-pair))) q) - + (define (enqueue! q datum) (let ((new-pair (cons datum '()))) (cond ((null? (queue:first-pair q)) -- cgit v1.2.3