Checking for undefined in Perl interface code? - Mailing list pgsql-hackers

From Tom Lane
Subject Checking for undefined in Perl interface code?
Date
Msg-id 9276.1011827772@sss.pgh.pa.us
Whole thread Raw
List pgsql-hackers
PL/Perl tries to handle an "undef" result from a Perl function (which
should convert to a SQL NULL) with code like so:
   /* XXX is this the approved way to check for an undef result? */   if (perlret == &PL_sv_undef)   {       retval =
(Datum)0;       fcinfo->isnull = true;   }   else   {// handle non-null result   }
 

But I find that it doesn't work, at least not on RH Linux 7.2 with
perl 5.6.0.  The if-test fails to notice undef results.

Anyone know what the correct way to do this is?
        regards, tom lane


pgsql-hackers by date:

Previous
From: Bill Studenmund
Date:
Subject: Re: RFD: schemas and different kinds of Postgres objects
Next
From: Stephan Szabo
Date:
Subject: Re: RFD: schemas and different kinds of Postgres objects