… | … | ||
---|---|---|---|
203 | { | 203 | { |
204 | if (!SvROK (scalar)) croak ("refcnt_dec_rv requires a reference as it's first argument"); | 204 | if (!SvROK (scalar)) croak ("refcnt_dec_rv requires a reference as it's first argument"); |
205 | scalar = SvRV (scalar); | 205 | scalar = SvRV (scalar); |
206 | } | 206 | } |
207 | SvREFCNT_dec (scalar); | 207 | SvREFCNT_dec (scalar); |
208 | |||
209 | bool | ||
210 | ok(scalar) | ||
211 | SV * scalar | ||
212 | PROTOTYPE: $ | ||
213 | CODE: | ||
214 | RETVAL = SvOK (scalar); | ||
215 | OUTPUT: | ||
216 | RETVAL | ||
217 | |||
218 | bool | ||
219 | uok(scalar) | ||
220 | SV * scalar | ||
221 | PROTOTYPE: $ | ||
222 | CODE: | ||
223 | RETVAL = SvUOK (scalar); | ||
224 | OUTPUT: | ||
225 | RETVAL | ||
226 | |||
227 | bool | ||
228 | rok(scalar) | ||
229 | SV * scalar | ||
230 | PROTOTYPE: $ | ||
231 | CODE: | ||
232 | RETVAL = SvROK (scalar); | ||
233 | OUTPUT: | ||
234 | RETVAL | ||
235 | |||
236 | bool | ||
237 | pok(scalar) | ||
238 | SV * scalar | ||
239 | PROTOTYPE: $ | ||
240 | CODE: | ||
241 | RETVAL = SvPOK (scalar); | ||
242 | OUTPUT: | ||
243 | RETVAL | ||
244 | |||
245 | bool | ||
246 | nok(scalar) | ||
247 | SV * scalar | ||
248 | PROTOTYPE: $ | ||
249 | CODE: | ||
250 | RETVAL = SvNOK (scalar); | ||
251 | OUTPUT: | ||
252 | RETVAL | ||
253 | |||
254 | bool | ||
255 | niok(scalar) | ||
256 | SV * scalar | ||
257 | PROTOTYPE: $ | ||
258 | CODE: | ||
259 | RETVAL = SvNIOK (scalar); | ||
260 | OUTPUT: | ||
261 | RETVAL | ||
262 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |