master: Fix a test on windows

The branch "master" has been updated in SBCL:
       via  b541f2f25b14b62fcab7e14aa5124db5dd1d6b20 (commit)
      from  588d0d281a98482c4cabb01581cf8d7d913c2e6f (commit)

- Log -----------------------------------------------------------------
commit b541f2f25b14b62fcab7e14aa5124db5dd1d6b20
Author: Stas Boukarev <[email protected]>
Date:   Tue Aug 4 01:35:04 2026 +0300

    Fix a test on windows
    
    "nul" returns NIL for file-position.
---
 tests/stream.pure.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/stream.pure.lisp b/tests/stream.pure.lisp
index 3b321c6cb..3551104d7 100644
--- a/tests/stream.pure.lisp
+++ b/tests/stream.pure.lisp
@@ -553,8 +553,8 @@
                (file-position str))))
   (with-open-file (str (or #+win32 "nul" "/dev/null") :if-exists :append :direction :output)
     (write-char #\a str)
-    (assert (= (file-position (make-broadcast-stream str))
-               (file-position str))))
+    (assert (eql (file-position (make-broadcast-stream str))
+                 (file-position str))))
   (with-open-file (i "zero")
     (with-open-file (o (or #+win32 "nul" "/dev/null") :if-exists :append :direction :output)
       (assert (null (file-position (make-echo-stream i o))))))

-----------------------------------------------------------------------


hooks/post-receive
-- 
SBCL