anchor.diff:          + "    # pir = past_root.'compile'( 'target' => 'pir' )              \n"
           + "    # print pir                                                   \n"
           + "                                                                  \n"
  -        + "    .local pmc pastcompiler, eval_past                            \n"
  -        + "    pastcompiler = new 'HLLCompiler'                              \n"
  -        + "    pastcompiler.'removestage'('parse')                           \n"
  -        + "    pastcompiler.'removestage'('past')                            \n"
  -        + "    eval_past = pastcompiler.'compile'(past_root)                 \n"
  +        + "    .local pmc plumhead_compiler, eval_past                       \n"
  +        + "    plumhead_compiler = new [ 'PCT::HLLCompiler' ]                \n"
  +        + "    plumhead_compiler.'removestage'('parse')                      \n"
  +        + "    plumhead_compiler.'removestage'('past')                       \n"
  +        + "    eval_past = plumhead_compiler.'compile'(past_root)            \n"
           + "    eval_past()                                                   \n"
           + "                                                                  \n"
           + ".end                                                              \n"
  
positive.code:         + "  .local pmc code_string                                          \n"
          + "  code_string = new 'CodeString'                                  \n"
          + "  ( val ) = code_string.'escape'( val )                           \n"
          + "      past_temp.'init'( 'name' => val, 'vtype' => '.Undef' )      \n"
          + "  " + $node.reg_mother + ".'push'( past_temp )                    \n"
          + "  # end of SINGLEQUOTE_STRING                                                 \n"
          + "                                                                  \n"
        );
      }
  
negative.code:       System.out.print( 
            "  " + reg + ".'attr'( 'pirop', '" + pirop + "', 1 )                \n"
          + "  " + reg + ".'attr'( 'name',  '" + name + "' , 1 )                \n"
          + "  " + reg + ".'attr'( 'lvalue',  0 , 1 )                           \n"
          + "  " + $node.reg_mother + ".'push'( " + reg + " )                   \n"
          + "    # leaving PLUS | MINUS | MUL_OP | BITWISE_OP                   \n"
        );
  