is_deeply($rt->_unrev_path($rt->_unrev_path([['ab', 'cd', 'ef']], $context), $context), [['ab', 'cd', 'ef']], 'path(ab,cd,ef) back');
is_deeply($rt->_unrev_path(['ab', 'cd', 'ef', '\\d+', '\\D', 'ghi', 'jkl', 'mno'], $context), ['mno', 'jkl', 'ghi', '\\D', '\\d+', 'ef', 'cd', 'ab'], 'path(ab cd...)');
is_deeply($rt->_unrev_path($rt->_unrev_path(['ab', 'cd', 'ef', '\\d+', '\\D', 'ghi', 'jkl', 'mno'], $context), $context), ['ab', 'cd', 'ef', '\\d+', '\\D', 'ghi', 'jkl', 'mno'], 'path(ab cd...) back');
is_deeply($rt->_unrev_node([0 => [0, 1]], $context), [1 => [1, 0]], 'node(0)');
is_deeply($rt->_unrev_node([0 => [0, 1], 2 => [2, 0]], $context), [1 => [1, 0], 0 => [0, 2]], 'node(0,2)');
is_deeply($rt->_unrev_node(['' => 0, 'a' => ['a', 'b']], $context), ['' => 0, 'b' => ['b', 'a']], 'node(*,a,b)');
is_deeply($rt->_unrev_node(['' => 0, 'a' => ['a', 'b'], 'b' => ['b', 'c', 'd', 'e', 'f', 'g']], $context), ['' => 0, 'b' => ['b', 'a'], 'g' => ['g', 'f', 'e', 'd', 'c', 'b']], 'node(*a,b2)');
is_deeply($rt->_unrev_path([['x' => ['x', '0'], '' => 0]], $context), [['0' => ['0', 'x'], '' => 0]], 'node(* 0)');
is_deeply($rt->_unrev_node(['ab' => ['ab', 'bc'], 'bc' => ['bc', 'cd', 'de', 'ef', 'fg', 'gh'], 'ef' => ['ef', 'gh', 'ij']], $context), ['bc' => ['bc', 'ab'], 'gh' => ['gh', 'fg', 'ef', 'de', 'cd', 'bc'], 'ij' => ['ij', 'gh', 'ef']], 'node(ab,bc,ef)');
is_deeply($rt->_unrev_node(['' => 0, 'b' => [[['b' => ['b'], 'b?' => [['' => 0, 'b' => ['b']], 'a']]], ['' => 0, 'c' => ['c']]]], $context), ['' => 0, 'c' => [['' => 0, 'c' => ['c']], [['a' => ['a', ['' => 0, 'b' => ['b']]], 'b' => ['b']]]]], 'node of (?:(?:ab?|b)c?)?');
is_deeply($rt->_unrev_path(['a', 'b', ['c' => ['c', 'd', 'e'], 'f' => ['f', 'g', 'h'], 'i' => ['i', 'j', ['k' => ['k', 'l', 'm'], 'n' => ['n', 'o', 'p']], 'x']]], $context), [['e' => ['e', 'd', 'c'], 'h' => ['h', 'g', 'f'], 'x' => ['x', ['m' => ['m', 'l', 'k'], 'p' => ['p', 'o', 'n']], 'j', 'i']], 'b', 'a'], 'path(node(path))');
//{
$r = new Regexp_Assemble();
$ra = $r->add('refused')->add('fused')->add('used');
$ra->_reduce();
ok(eq_set([array_keys($rt->_lookahead($ra->__path[0]))], ['f', 'r']), '_lookahead refused/fused/used');
$ra->reset()->add('refused')->add('reamused')->add('fused')->add('amused')->add('used')->_reduce();
ok(eq_set([array_keys($rt->_lookahead($ra->__path[0]))], ['a', 'f', 'r']), '_lookahead reamused/refused/amused/fused/used');
$ra->reset()->add('reran')->add('ran')->_reduce();
ok(eq_set([array_keys($rt->_lookahead($ra->__path[0]))], ['r']), '_lookahead reran/ran');
$ra->reset()->add('cruised')->add('bruised')->add('hosed')->add('gazed')->add('used')->_reduce();
ok(eq_set([array_keys($rt->_lookahead($ra->__path[0]))], ['b', 'c', 'g', 'h', 'u']), '_lookahead cruised/bruised/hosed/gazed/used');
//}
is($rt->_dump([1, 0, NULL]), '[1 0 *]', 'dump undef');
is($rt->_dump([1, 0, ' ']), "[1 0 ' ']", 'dump space');
is($rt->_dump(['a' => ['a', 'b'], 'b' => ['b']]), '{a=>[a b] b=>[b]}', 'dump node');
is($rt->_dump(['a', chr(7), 'b']), '[a \\x07 b]', 'dump pretty');
//保留
//is( $r->insert(' ')->insert(' ')->dump(),
//    '[\\x07 {\\x05=>[\\x05] \\x06=>[\\x06]}]', 'dump pretty node'
//);