From 72a8bc09e049b99c0514189272897fba9d985a7b Mon Sep 17 00:00:00 2001
From: Simon Brooke <simon@journeyman.cc>
Date: Sun, 1 Mar 2026 20:37:16 +0000
Subject: [PATCH] Very minor fixes/

---
 lisp/documentation.lisp | 4 ++--
 src/init.c              | 2 +-
 src/io/print.c          | 9 +--------
 3 files changed, 4 insertions(+), 11 deletions(-)

diff --git a/lisp/documentation.lisp b/lisp/documentation.lisp
index 7f5867b..b303856 100644
--- a/lisp/documentation.lisp
+++ b/lisp/documentation.lisp
@@ -11,10 +11,10 @@
 (set! member? (lambda
             (item collection)
             "`(member item collection)`: Return `t` if this `item` is a member of this `collection`, else `nil`."
-            ;; (print (list "In member? item is " item "; collection is " collection))
+            (print (list "In member? item is " item "; collection is " collection))
             ;; (println)
             (cond
-              ((= nil collection) nil)
+              ((= 0 (count collection)) nil)
               ((= item (car collection)) t)
               (t (member? item (cdr collection))))))
 
diff --git a/src/init.c b/src/init.c
index 74b6d94..565065f 100644
--- a/src/init.c
+++ b/src/init.c
@@ -94,7 +94,7 @@ void maybe_bind_init_symbols(  ) {
         privileged_keyword_location = c_string_to_lisp_keyword( L"location" );
     }
     if ( nilp( privileged_keyword_payload ) ) {
-        privileged_keyword_location = c_string_to_lisp_keyword( L"payload" );
+        privileged_keyword_payload = c_string_to_lisp_keyword( L"payload" );
     }
 }
 
diff --git a/src/io/print.c b/src/io/print.c
index a8f2770..f5f80a5 100644
--- a/src/io/print.c
+++ b/src/io/print.c
@@ -348,16 +348,9 @@ lisp_println( struct stack_frame *frame, struct cons_pointer frame_pointer,
 
     if ( writep( out_stream ) ) {
         output = pointer2cell( out_stream ).payload.stream.stream;
-        inc_ref( out_stream );
-    } else {
-        output = file_to_url_file( stderr );
-    }
 
-    println( output );
+        println( output );
 
-    if ( writep( out_stream ) ) {
-        dec_ref( out_stream );
-    } else {
         free( output );
     }