[ViewVC] Contents of: cvs/EV/typemap

JSON *          T_JSON

INPUT

T_JSON
        if (!(SvROK ($arg) && SvOBJECT (SvRV ($arg))
            && SvSTASH (SvRV ($arg)) == JSON_STASH))
          croak (\"object is not of type JSON::XS\");
        $var = (JSON *)SvPVX (SvRV ($arg));


Revision:	1.1
Committed:	Fri Oct 26 09:19:48 2007 UTC (16 years, 6 months ago) by root
Branch:	MAIN
Log Message:	* empty log message *
#	Content
1	JSON * T_JSON
2
3	INPUT
4
5	T_JSON
6	if (!(SvROK ($arg) && SvOBJECT (SvRV ($arg))
7	&& SvSTASH (SvRV ($arg)) == JSON_STASH))
8	croak (\"object is not of type JSON::XS\");
9	$var = (JSON *)SvPVX (SvRV ($arg));
10
11