third_party/JSON/JSON-2.59/t/e90_misc.t - Issue 15736030: Add JSON.pm to third_party

Side by Side Diff

Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.

Keyboard Shortcuts

	File
u :	up to issue
j / k :	jump to file after / before current file
J / K :	jump to next file with a comment after / before current file
	Side-by-side diff
i :	toggle intra-line diffs
e :	expand all comments
c :	collapse all comments
s :	toggle showing all comments
n / p :	next / previous diff chunk or comment
N / P :	next / previous comment
<Up> / <Down> :	next / previous line

	Issue
u :	up to list of issues
j / k :	jump to patch after / before current patch
o / <Enter> :	open current patch in side-by-side view
i :	open current patch in unified diff view

	Issue List
j / k :	jump to issue after / before current issue
o / <Enter> :	open current issue

Side by Side Diff: third_party/JSON/JSON-2.59/t/e90_misc.t

Issue 15736030: Add JSON.pm to third_party (Closed) Base URL: svn://svn.chromium.org/chrome/trunk/src

Patch Set: Update to v2.59, proper override 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:

OLD	NEW
(Empty)
	1 #!/usr/bin/perl

	2

	3 use strict;

	4 use Test::More tests => 4;

	5

	6 BEGIN {

	7 $ENV{ PERL_JSON_BACKEND } = $ARGV[0] \|\| 'JSON::backportPP';

	8 }

	9

	10 use JSON;

	11

	12 # reported by https://rt.cpan.org/Public/Bug/Display.html?id=68359

	13

	14 eval { JSON->to_json( 5, { allow_nonref => 1 } ) };

	15 ok($@);

	16

	17 is( q{"5"}, JSON::to_json( "5", { allow_nonref => 1 } ) );

	18 is( q{5}, JSON::to_json( 5, { allow_nonref => 1 } ) );

	19 is( q{"JSON"}, JSON::to_json( 'JSON', { allow_nonref => 1 } ) );

OLD	NEW