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

Comparing JSON-XS/XS.xs (file contents):
Revision 1.59 by root, Mon Aug 13 16:14:20 2007 UTC vs.
Revision 1.60 by root, Mon Aug 13 16:19:13 2007 UTC

1225 1225
1226 case 't': 1226 case 't':
1227 if (dec->end - dec->cur >= 4 && !memcmp (dec->cur, "true", 4)) 1227 if (dec->end - dec->cur >= 4 && !memcmp (dec->cur, "true", 4))
1228 { 1228 {
1229 dec->cur += 4; 1229 dec->cur += 4;
1230#if JSON_SLOW
1231 json_true = get_sv ("JSON::XS::true", 1); SvREADONLY_on (json_true);
1232#endif
1230 return SvREFCNT_inc (json_true); 1233 return SvREFCNT_inc (json_true);
1231 } 1234 }
1232 else 1235 else
1233 ERR ("'true' expected"); 1236 ERR ("'true' expected");
1234 1237
1236 1239
1237 case 'f': 1240 case 'f':
1238 if (dec->end - dec->cur >= 5 && !memcmp (dec->cur, "false", 5)) 1241 if (dec->end - dec->cur >= 5 && !memcmp (dec->cur, "false", 5))
1239 { 1242 {
1240 dec->cur += 5; 1243 dec->cur += 5;
1244#if JSON_SLOW
1245 json_false = get_sv ("JSON::XS::false", 1); SvREADONLY_on (json_false);
1246#endif
1241 return SvREFCNT_inc (json_false); 1247 return SvREFCNT_inc (json_false);
1242 } 1248 }
1243 else 1249 else
1244 ERR ("'false' expected"); 1250 ERR ("'false' expected");
1245 1251

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines