summaryrefslogtreecommitdiffstats
path: root/tests/sock-common.tl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/sock-common.tl')
-rw-r--r--tests/sock-common.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/sock-common.tl b/tests/sock-common.tl
index 63f31c83..8fed8f23 100644
--- a/tests/sock-common.tl
+++ b/tests/sock-common.tl
@@ -1,5 +1,5 @@
(defun local-addr (family port)
- (caseql family
+ (caseql* family
(af-inet (new sockaddr-in addr inaddr-loopback port port))
(af-inet6 (new sockaddr-in6 addr in6addr-loopback port port))))