Changeset 23048 for src/perl6/gimme5

Show
Ignore:
Timestamp:
11/20/08 19:58:42 (7 weeks ago)
Author:
lwall
Message:

[gimme5] switch back to YAML::Syck till YAML::XS is fixed
[viv] allow input from stdin
[STD] always report worries for now

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/perl6/gimme5

    r23025 r23048  
    1818} 
    1919 
    20 use YAML::XS; 
     20use YAML::Syck; 
    2121 
    2222our $SEQ = 0; 
    … …  
    283283} 
    284284 
    285 use YAML::XS; 
    286 #{ 
    287 #    local $/; 
    288 #    my $yaml = <DATA>; 
    289 #    *::RE = Load($yaml); 
    290 #} 
     285use YAML::Syck; 
    291286 
    292287END 
    … …  
    924919sub dumpretree { 
    925920    if (%$RETREE) { 
    926         $out .= "BEGIN {\n    \$retree = YAML::XS::Load(<<'RETREE_END');\n"; 
     921        $out .= "BEGIN {\n    \$retree = YAML::Syck::Load(<<'RETREE_END');\n"; 
    927922        $out .= Encode::decode("utf8", Dump($RETREE)); 
    928923        $out .= "RETREE_END\n}\n";