aboutsummaryrefslogtreecommitdiffstats
path: root/queue.scm
diff options
context:
space:
mode:
Diffstat (limited to 'queue.scm')
-rwxr-xr-x[-rw-r--r--]queue.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/queue.scm b/queue.scm
index 820894f..d9bb0e9 100644..100755
--- a/queue.scm
+++ b/queue.scm
@@ -22,7 +22,7 @@
;;@args
;;Returns a new, empty queue.
(define make-queue
- (let ((construct-queue (record-constructor queue:record-type)))
+ (let ((construct-queue (record-constructor queue:record-type '(first-pair last-pair))))
(lambda ()
(construct-queue '() '()))))