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

Comparing JSON-XS/typemap (file contents):
Revision 1.1 by root, Mon Jul 2 07:39:31 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)) && SvSTASH (SvRV ($arg)) == json_stash)) 6 if (!(
7 SvROK ($arg)
8 && SvOBJECT (SvRV ($arg))
9 && (SvSTASH (SvRV ($arg)) == JSON_STASH || sv_derived_from ($arg, \"JSON::XS\"))
10 ))
7 croak (\"object is not of type JSON::XS\"); 11 croak (\"object is not of type JSON::XS\");
12 /**/
8 $var = (JSON *)SvPVX (SvRV ($arg)); 13 $var = (JSON *)SvPVX (SvRV ($arg));
9 14
10 15

Diff Legend

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