From c6c619a96fa11b09bef26d0c724b6cfd0bdbb34b Mon Sep 17 00:00:00 2001 From: Doug MacEachern Date: Mon, 11 Jun 2001 15:19:45 -0700 Subject: ext/ + -Wall Message-ID: p4raw-id: //depot/perl@10534 --- ext/GDBM_File/GDBM_File.xs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'ext/GDBM_File') diff --git a/ext/GDBM_File/GDBM_File.xs b/ext/GDBM_File/GDBM_File.xs index 1ec5ea803d..3f18a4a28c 100644 --- a/ext/GDBM_File/GDBM_File.xs +++ b/ext/GDBM_File/GDBM_File.xs @@ -197,6 +197,10 @@ constant(char *name, int arg) errno = EINVAL; return 0; + if (0) { + goto not_there; /* -Wall */ + } + not_there: errno = ENOENT; return 0; -- cgit v1.2.1