From 72343067effad906a01f43798d01ed974cd005f8 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sun, 16 Jan 2022 01:21:28 +0530
Subject: tests: Move plist-ref ahead of test-begin.

This is a purely cosmetic change just to keep definitions outside the
test cases.

* tests/utils.scm (plist-ref): Move ahead of test-begin.
---
 tests/utils.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'tests/utils.scm')

diff --git a/tests/utils.scm b/tests/utils.scm
index 8a1e6a1..6db9fe2 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -24,6 +24,9 @@
              (ccwl conditions)
              (ccwl utils))
 
+(define plist-ref
+  (@@ (ccwl utils) plist-ref))
+
 (test-begin "utils")
 
 (test-equal "pairify"
@@ -34,9 +37,6 @@
   '((spam . 1) (ham . 2) (eggs . 3))
   (plist->alist (list #:spam 1 #:ham 2 #:eggs 3)))
 
-(define plist-ref
-  (@@ (ccwl utils) plist-ref))
-
 (test-equal "plist-ref"
   2
   (plist-ref (list #:spam 1 #:ham 2 #:eggs 3)
-- 
cgit v1.2.3