develooper Front page | perl.perl5.porters | Postings from August 2003

[patch sv.h api doc] SvTAINTED_on does its craft only under -T

From:
Stas Bekman
Date:
August 29, 2003 17:12
Subject:
[patch sv.h api doc] SvTAINTED_on does its craft only under -T
Message ID:
3F4FEBBD.8000901@stason.org
Since:

#define SvTAINTED_on(sv)  STMT_START{ if(PL_tainting){sv_taint(sv);}   }STMT_END

SvTAINTED_on marks an SV as tainted *only* if tainting is enabled.

--- sv.h.orig   2003-08-29 17:07:16.000000000 -0700
+++ sv.h        2003-08-29 17:07:56.000000000 -0700
@@ -822,7 +822,7 @@
  not.

  =for apidoc Am|void|SvTAINTED_on|SV* sv
-Marks an SV as tainted.
+Marks an SV as tainted if tainting is enabled.

  =for apidoc Am|void|SvTAINTED_off|SV* sv
  Untaints an SV. Be I<very> careful with this routine, as it short-circuits


__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About