/[suikacvs]/messaging/manakai/lib/Message/DOM/XMLParser.dis
Suika

Diff of /messaging/manakai/lib/Message/DOM/XMLParser.dis

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by wakaba, Sat Dec 31 12:21:15 2005 UTC revision 1.5 by wakaba, Sat Jan 21 07:06:09 2006 UTC
# Line 26  Namespace: Line 26  Namespace:
26      http://suika.fam.cx/~wakaba/archive/2004/8/18/dom-core#      http://suika.fam.cx/~wakaba/archive/2004/8/18/dom-core#
27    @DOMMain:    @DOMMain:
28      http://suika.fam.cx/~wakaba/archive/2004/dom/main#      http://suika.fam.cx/~wakaba/archive/2004/dom/main#
29      @dtest:
30        http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/DIS#Test/
31    @dx:    @dx:
32      http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/Error/DOMException#      http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/Error/DOMException#
33    @ecore:    @ecore:
# Line 56  Namespace: Line 58  Namespace:
58      http://www.w3.org/2000/01/rdf-schema#      http://www.w3.org/2000/01/rdf-schema#
59    @t:    @t:
60      http://suika.fam.cx/~wakaba/archive/2004/dom/tree#      http://suika.fam.cx/~wakaba/archive/2004/dom/tree#
61      @test:
62        http://suika.fam.cx/~wakaba/archive/2004/dis/Test#
63    @xml:    @xml:
64      http://www.w3.org/XML/1998/namespace      http://www.w3.org/XML/1998/namespace
65    @xmlns:    @xmlns:
# Line 2924  _ Line 2928  _
2928          $self->{has_error} = true;          $self->{has_error} = true;
2929        }        }
2930      } // default      } // default
2931    
2932      @XMLTests:
2933        @@XMLTest:
2934          @@@DEnt:
2935            @@@@test:value:
2936              <p></p>
2937          @@@test:domTree:
2938            document {
2939              xml-version: '1.0';
2940              element {
2941                namespace-uri: null;
2942                prefix: null;
2943                local-name: 'p';
2944                text-content: '';
2945              }
2946            }
2947        @@PerlDef:
2948          my $impl = $Message::DOM::ImplementationRegistry->get_implementation ({
2949            'Core' => '3.0',
2950            'XML' => '3.0',
2951            'XMLVersion' => ['1.0', '1.1'],
2952          });
2953          my $parser = <Class::ManakaiXMLParser>->new ($impl);
2954    
2955          for my $test_data (@$TestData) {
2956            $test->start_new_test ($test_data->{uri});
2957            my $doc_ent = $test_data->{entity}->{$test_data->{root_uri}};
2958            my $doc = $parser->parse_string ($doc_ent->{<H::test:value>});
2959            try {
2960              $test->assert_dom_tree_equals
2961                       (actual_value => $doc,
2962                        expected_hash => $test_data->{dom_tree});
2963              $test->ok;
2964            } catch Message::Util::IF::DTException with { };
2965          }
2966          
2967  ##ManakaiXMLParser  ##ManakaiXMLParser
2968    
2969    ElementTypeBinding:
2970      @Name: XMLTests
2971      @ElementType:
2972        dis:ResourceDef
2973      @ShadowContent:
2974        @@ForCheck: ManakaiDOM|ForClass
2975        @@rdf:type: test|ParserTestSet
2976    
2977    ElementTypeBinding:
2978      @Name: XMLTest
2979      @ElementType:
2980        dis:ResourceDef
2981      @ShadowContent:
2982        @@ForCheck: ManakaiDOM|ForClass
2983        @@rdf:type: test|ParserTest
2984    
2985    ElementTypeBinding:
2986      @Name: DEnt
2987      @ElementType:
2988        dis:ResourceDef
2989      @ShadowContent:
2990        @@rdf:type: test|RootEntity
2991    
2992    ElementTypeBinding:
2993      @Name: Ent
2994      @ElementType:
2995        dis:ResourceDef
2996      @ShadowContent:
2997        @@rdf:type: test|Entity
2998    
2999  ResourceDef:  ResourceDef:
3000    @QName: xp|get-location-from-token    @QName: xp|get-location-from-token
3001    @rdf:type: DISPerl|BlockCode    @rdf:type: DISPerl|BlockCode

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24