diff options
| -rw-r--r-- | tests/utils.scm | 6 |
1 files changed, 3 insertions, 3 deletions
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) |