… | |
… | |
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 | |