Well, here's the xxd dump's head.
[languages/punie/t] jisom% xxd past_node_5.out | head
0000000: 2020 2020 2020 2020 2020 2020 2020 2020
0000010: 2020 2020 2020 2020 2020 2020 2020 2020
0000020: 2020 2020 2020 2020 2020 2020 2020 2020
0000030: 2020 2020 2020 2020 2020 2020 2020 2020
0000040: 2020 2020 2020 2020 2020 2020 2020 2020
0000050: 2020 2020 2020 2020 2020 2020 2020 2020
0000060: 2020 2020 2020 2020 2020 2020 2020 2020
0000070: 2020 2020 2020 2020 2020 2020 2020 2020
0000080: 2020 2020 2020 2020 2020 2020 2020 2020
0000090: 2020 2020 2020 2020 2020 2020 2020 2020
[languages/punie/t] jisom%
I don't think there's a line ending. It's the same if I run it
directly. Got up to 20 megs in a couple seconds. Since that's
obviously rather useless, here's a trace.
0 load_bytecode "languages/punie/lib/"
0 newclass P0, "PAST::Node" - P0=PMCNULL,
3 addattribute P0, "source" -
P0=Class=PAST::Node:PMC(0x50ba50),
6 addattribute P0, "pos" - P0=Class=PAST::Node:PMC(0x50ba50),
9 addattribute P0, "children" -
P0=Class=PAST::Node:PMC(0x50ba50),
12 set_returns PMC_C[6]
14 returncc
2 new P1, "PAST::Node" - P1=PMCNULL,
18 new P1, 38 - P1=PMCNULL,
21 new P2, 31 - P2=PMCNULL,
24 new P3, 38 - P3=PMCNULL,
27 setattribute P0, "source", P1 -
P0=Object(PAST::Node)=PMC(0x50ba68), , P1=PerlUndef=PMC(0x50b888)
31 setattribute P0, "pos", P2 -
P0=Object(PAST::Node)=PMC(0x50ba68), , P2=Integer=PMC(0x50b870: 0)
35 setattribute P0, "children", P3 -
P0=Object(PAST::Node)=PMC(0x50ba68), , P3=PerlUndef=PMC(0x50b858)
39 set_returns PMC_C[6]
41 returncc
5 new P0, "PAST::Node" - P0=PMCNULL,
18 new P1, 38 - P1=PMCNULL,
21 new P2, 31 - P2=PMCNULL,
24 new P3, 38 - P3=PMCNULL,
27 setattribute P0, "source", P1 -
P0=Object(PAST::Node)=PMC(0x50b8a0), , P1=PerlUndef=PMC(0x50b828)
31 setattribute P0, "pos", P2 -
P0=Object(PAST::Node)=PMC(0x50b8a0), , P2=Integer=PMC(0x50b810: 0)
35 setattribute P0, "children", P3 -
P0=Object(PAST::Node)=PMC(0x50b8a0), , P3=PerlUndef=PMC(0x50b7f8)
39 set_returns PMC_C[6]
41 returncc
8 set_args PMC_C[7] (4), P0, "b", 9, P2 - ,
P0=Object(PAST::Node)=PMC(0x50b8a0), , , P2=PMCNULL
14 get_results PMC_C[12]
16 callmethodcc P0, "set_node" -
P0=Object(PAST::Node)=PMC(0x50b8a0),
42 get_params PMC_C[14] (4), P0, S0, I0, P1 - , P0=PMCNULL,
, I0=2178912, P1=PMCNULL
48 getattribute P2, P0, "source" - P2=PMCNULL,
P0=Object(PAST::Node)=PMC(0x50b8a0),
52 set P2, S0 - P2=PerlUndef=PMC(0x50b828), S0="b"
55 getattribute P2, P0, "pos" - P2=PerlString=PMC(0x50b828),
P0=Object(PAST::Node)=PMC(0x50b8a0),
59 set P2, I0 - P2=Integer=PMC(0x50b810: 0), I0=9
62 setattribute P0, "children", P1 -
P0=Object(PAST::Node)=PMC(0x50b8a0), , P1=PMCNULL
66 set_returns PMC_C[6]
DOD
GC
68 returncc
19 new P2, 46 - P2=PMCNULL,
22 push P2, P0 - P2=PerlArray=PMC(0x50b840),
P0=Object(PAST::Node)=PMC(0x50b8a0)
25 set_args PMC_C[7] (4), P1, "foo", 42, P2 - ,
P1=Object(PAST::Node)=PMC(0x50ba68), , , P2=PerlArray=PMC(0x50b840)
31 get_results PMC_C[12]
33 callmethodcc P1, "set_node" -
P1=Object(PAST::Node)=PMC(0x50ba68),
42 get_params PMC_C[14] (4), P0, S0, I0, P1 - , P0=PMCNULL,
, I0=9, P1=PMCNULL
48 getattribute P2, P0, "source" - P2=PMCNULL,
P0=Object(PAST::Node)=PMC(0x50ba68),
52 set P2, S0 - P2=PerlUndef=PMC(0x50b888), S0="foo"
55 getattribute P2, P0, "pos" - P2=PerlString=PMC(0x50b888),
P0=Object(PAST::Node)=PMC(0x50ba68),
59 set P2, I0 - P2=Integer=PMC(0x50b870: 0), I0=42
62 setattribute P0, "children", P1 -
P0=Object(PAST::Node)=PMC(0x50ba68), , P1=PerlArray=PMC(0x50b840)
66 set_returns PMC_C[6]
68 returncc
36 set_args PMC_C[8] (1), P1 - ,
P1=Object(PAST::Node)=PMC(0x50ba68)
39 get_results PMC_C[12]
41 callmethodcc P1, "dump" -
P1=Object(PAST::Node)=PMC(0x50ba68),
102 get_params PMC_C[29] (2), P0, I0 - , P0=PMCNULL,
I0=5289976
106 repeat S0, " ", I0 - , , I0=5289976
110 add I0, 1 - I0=5289976,
DOD
GC
113 typeof S1, P0 - , P0=Object(PAST::Node)=PMC(0x50ba68)
116 print S0 - S0=" "
On Feb 4, 2006, at 6:17 PM, Allison Randal wrote:
On Feb 4, 2006, at 14:23, Joshua Isom via RT wrote:
Apparently I have a 267 megabyte past_node_5.out file... And if
past_op_2.pir and past_val_2.pir were printed to a file, I imagine
it'd
do the same(printing a lot of spaces). Seems to be more than just
Parrot::Test for me.
Could you send me the first 50 lines of the past_node_5.out file?
That'll help me figure out where the extra bytes are coming from. I
just ran it and got a file 11 lines long and less than 1k.
past_op_2.out and past_val_2.out are each 6 lines long.
Also, run:
parrot past_node_5.pir > past_node_5.out
and let me know if you still end up with a 267 megabyte file.
Allison
