ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/JSON-XS/typemap
(Generate patch)

Comparing JSON-XS/typemap (file contents):
Revision 1.2 by root, Mon Aug 13 16:14:20 2007 UTC vs.
Revision 1.3 by root, Wed Nov 28 13:57:15 2007 UTC

1JSON * T_JSON 1JSON * T_JSON
2 2
3INPUT 3INPUT
4 4
5T_JSON 5T_JSON
6 if (!(SvROK ($arg) && SvOBJECT (SvRV ($arg)) 6 if (!(
7 && SvSTASH (SvRV ($arg)) == JSON_STASH)) 7 SvROK ($arg)
8 && SvOBJECT (SvRV ($arg))
9 && (SvSTASH (SvRV ($arg)) == JSON_STASH || sv_derived_from ($arg, \"JSON::XS\"))
10 ))
8 croak (\"object is not of type JSON::XS\"); 11 croak (\"object is not of type JSON::XS\");
12 /**/
9 $var = (JSON *)SvPVX (SvRV ($arg)); 13 $var = (JSON *)SvPVX (SvRV ($arg));
10 14
11 15

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines