Author: particle
Date: Wed Dec 28 13:43:50 2005
New Revision: 10746
Added:
trunk/runtime/parrot/library/JSON.pir
- copied, changed from r10743, trunk/runtime/parrot/library/JSON.imc
Removed:
trunk/runtime/parrot/library/JSON.imc
Modified:
trunk/MANIFEST
trunk/t/library/json.t
Log:
#37520: [TODO] rename library files from .imc to .pir
~ convert JSON library
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Wed Dec 28 13:43:50 2005
@@ -1454,7 +1454,7 @@ runtime/parrot/library/File/Spec.pir
runtime/parrot/library/File/Spec/Unix.pir [library]
runtime/parrot/library/File/Spec/Win32.pir [library]
runtime/parrot/library/Getopt/Long.pir [main]doc
-runtime/parrot/library/JSON.imc [library]
+runtime/parrot/library/JSON.pir [library]
runtime/parrot/library/JSON/Parser.pir [library]
runtime/parrot/library/PGE/Dumper.pir [library]
runtime/parrot/library/PGE/Glob.pir [library]
Copied: trunk/runtime/parrot/library/JSON.pir (from r10743,
trunk/runtime/parrot/library/JSON.imc)
==============================================================================
--- trunk/runtime/parrot/library/JSON.imc (original)
+++ trunk/runtime/parrot/library/JSON.pir Wed Dec 28 13:43:50 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-JSON.imc - PIR implementation of JSON data interchange format.
+JSON.pir - PIR implementation of JSON data interchange format.
=head1 SYNOPSIS
@@ -12,7 +12,7 @@ JSON.imc - PIR implementation of JSON da
#$P1 is now a array-like container PMC with three Integer elements.
.end
- .include 'library/JSON.imc'
+ .include 'library/JSON.pir'
=head1 DESCRIPTION
Modified: trunk/t/library/json.t
==============================================================================
--- trunk/t/library/json.t (original)
+++ trunk/t/library/json.t Wed Dec 28 13:43:50 2005
@@ -35,7 +35,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
""
OUT
@@ -51,7 +51,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
"abcdeABCDE01234$%^&*"
OUT
@@ -67,7 +67,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
"abcde\\ABCDE\"01234\n$%^&*"
OUT
@@ -98,7 +98,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
0
35
@@ -129,7 +129,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
0
2.5
@@ -156,7 +156,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( n, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
"abcde\\ABCDE\"01234\n$%^&*"
-42
@@ -186,7 +186,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
[0,1,2,3,4,5,6,7,8,9]
OUT
@@ -213,7 +213,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( array, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
[
0,
@@ -247,7 +247,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( array, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
[
35,
@@ -277,7 +277,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( array, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
[
0,
@@ -304,7 +304,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( hash, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
{
"alpha" : 29,
@@ -330,7 +330,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
{"alpha":29,"beta":"B","delta":"DELTA","gamma":3.1}
OUT
@@ -366,7 +366,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( world, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
{
"population" : 1234567890,
@@ -418,7 +418,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
{"population":1234567890,"some_country":[[{"Perl":"Highway","Python":"Grove","Ruby":"Lane"},{}],[]]}
OUT
@@ -445,7 +445,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( s, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
""
""
@@ -475,7 +475,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( i, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
0
0
@@ -505,7 +505,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( b, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
false
false
@@ -533,7 +533,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Create
$S0 = _json( n, 1 )
print $S0
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
null
null
@@ -558,7 +558,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Decode
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
String
@@ -575,7 +575,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Decode
ok:
print "ok\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
ok
OUT
@@ -593,7 +593,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Decode
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
.Boolean
1
@@ -612,7 +612,7 @@ pir_output_is(<<'CODE', <<'OUT', 'Decode
print $S0
print "\n"
.end
-.include 'library/JSON.imc'
+.include 'library/JSON.pir'
CODE
.Boolean
0
