From 3941006bf022a066499390d7f7aff99fea64aa50 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Sun, 8 Oct 2023 11:45:32 +0200 Subject: Document atomic types. --- tests/unit/util/atomic-queue.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'tests/unit/util/atomic-queue.scm') diff --git a/tests/unit/util/atomic-queue.scm b/tests/unit/util/atomic-queue.scm index 428f4457..07ec0329 100644 --- a/tests/unit/util/atomic-queue.scm +++ b/tests/unit/util/atomic-queue.scm @@ -15,6 +15,9 @@ (enqueue! 4 q) +(test-equal "Returned order when extracting list" + '(2 3 4) (queue->list q)) + (test-equal 2 (dequeue! q)) (test-equal 3 (dequeue! q)) (test-equal 4 (dequeue! q)) -- cgit v1.2.3