[ViewVC] Annotation 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 *
#	User	Rev	Content
1	root	1.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