fix for undef as last arg to setsockopt

	Message-ID: <19980603112219.B7638@asic.sc.ti.com>

p4raw-id: //depot/perl@1093

diff --git a/pp_sys.c b/pp_sys.c
index ad9eee1..1814a59 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1968,7 +1968,7 @@ PP(pp_ssockopt)
                buf = SvPV(sv, na);
                len = na;
            }
-           else if (SvOK(sv)) {
+           else {
                aint = (int)SvIV(sv);
                buf = (char*)&aint;
                len = sizeof(int);