SDBM_File.xs warning (was Re: danger! op\fork.t#2 causes core-dump)

Message-ID: <20020521220148.GH290@Bagpuss.unfortu.net>

p4raw-id: //depot/perl@16726

diff --git a/ext/SDBM_File/SDBM_File.xs b/ext/SDBM_File/SDBM_File.xs
index 94fc305..b454d59 100644 (file)
--- a/ext/SDBM_File/SDBM_File.xs
+++ b/ext/SDBM_File/SDBM_File.xs
@@ -119,7 +119,7 @@ sdbm_FIRSTKEY(db)
 datum_key
 sdbm_NEXTKEY(db, key)
        SDBM_File       db
-       datum_key       key = NO_INIT
+       datum_key       key = key; /* never used -  silence picky compilers. */
 
 int
 sdbm_error(db)