Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(790)

Unified Diff: third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t

Issue 15736030: Add JSON.pm to third_party (Closed) Base URL: svn://svn.chromium.org/chrome/trunk/src
Patch Set: Fix permissions and shebangs Created 7 years, 6 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
« no previous file with comments | « third_party/JSON/JSON-2.59/t/e06_allow_barekey.t ('k') | third_party/JSON/JSON-2.59/t/e08_decode.t » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t
diff --git a/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t b/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t
new file mode 100644
index 0000000000000000000000000000000000000000..0e35e3f3419537498575a010a157575b86178b6c
--- /dev/null
+++ b/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t
@@ -0,0 +1,20 @@
+
+use Test::More;
+use strict;
+BEGIN { plan tests => 4 };
+BEGIN { $ENV{PERL_JSON_BACKEND} = "JSON::backportPP"; }
+use JSON;
+#########################
+
+my $json = JSON->new->allow_nonref;
+
+eval q| $json->decode("{'foo':'bar'}") |;
+
+ok($@); # in XS and PP, the error message differs.
+
+$json->allow_singlequote;
+
+is($json->decode(q|{'foo':"bar"}|)->{foo}, 'bar');
+is($json->decode(q|{'foo':'bar'}|)->{foo}, 'bar');
+is($json->allow_barekey->decode(q|{foo:'bar'}|)->{foo}, 'bar');
+
« no previous file with comments | « third_party/JSON/JSON-2.59/t/e06_allow_barekey.t ('k') | third_party/JSON/JSON-2.59/t/e08_decode.t » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698