/[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.27 by wakaba, Fri Feb 17 15:06:33 2006 UTC revision 1.28 by wakaba, Sat Feb 18 07:39:04 2006 UTC
# Line 221  ClsDef: Line 221  ClsDef:
221        
222    @Implement: DOMLS|LSParser    @Implement: DOMLS|LSParser
223    
224    @f:implements:    @f:implements: DOMLS|LSFeature30
225      @@@: DOMLS|LSFeature30    @f:implements: DOMLS|ParseString10
226      @@For: ManakaiDOM|DOM3    @enImplNote:
227        @@ddid: dtdfeature
228        @@@:
229          {TODO::
230            Once DTD validation is implemented, add <Q::f:implements>
231            for XML-DTD-feature.
232          }
233    
234    @DISLang:role: gls|ParserRole    @DISLang:role: gls|ParserRole
235    
# Line 244  ClsDef: Line 250  ClsDef:
250      be found.      be found.
251    
252    @Test:    @Test:
253        @@QName: GLSImpl.createGLSParser.LS.test
254        @@enDesc:
255          Since there is at least one implementation of the feature (i.e.
256          this class), the <M::gls|GLSImplementation.createGLSParser>
257          must not throw an exception.
258        @@PerlDef:
259          my $impl;
260          __CODE{DOMLS|createImplForTest:: $impl => $impl}__;
261          
262          my $p = $impl-><M::gls|GLSImplementation.createGLSParser>
263                           ({LS => '3.0'});
264    
265          $test->assert_isa ($p, <IFName::LSParser>);
266      @Test:
267        @@QName: GLSImpl.createGLSParser.ParseXMLString.test
268        @@enDesc:
269          Since there is at least one implementation of the feature (i.e.
270          this class), the <M::gls|GLSImplementation.createGLSParser>
271          must not throw an exception.
272        @@PerlDef:
273          my $impl;
274          __CODE{DOMLS|createImplForTest:: $impl => $impl}__;
275          
276          my $p = $impl-><M::gls|GLSImplementation.createGLSParser>
277                           ({<Q::fe|ParseXMLString> => '1.0'});
278    
279          $test->assert_not_null ($p);
280      @Test:
281        @@QName: GLSImpl.createGLSParser.LS.ParseXMLString.test
282        @@enDesc:
283          Since there is at least one implementation of the feature (i.e.
284          this class), the <M::gls|GLSImplementation.createGLSParser>
285          must not throw an exception.
286        @@PerlDef:
287          my $impl;
288          __CODE{DOMLS|createImplForTest:: $impl => $impl}__;
289          
290          my $p = $impl-><M::gls|GLSImplementation.createGLSParser>
291                           ({LS => '3.0', <Q::fe|ParseXMLString> => '1.0'});
292    
293          $test->assert_isa ($p, <IFName::LSParser>);
294    
295      @Test:
296        @@QName: DOMImplLS.createLSParser.1.test
297        @@enDesc:
298          Since there is at least one implementation of the feature (i.e.
299          this class), the <M::gls|GLSImplementation.createGLSParser>
300          must not throw an exception.
301        @@PerlDef:
302          my $impl;
303          __CODE{DOMLS|createImplForTest:: $impl => $impl}__;
304          
305          my $p = $impl-><M::DOMLS|DOMImplementationLS.createLSParser>
306                           (<C::DOMLS|DOMImplementationLS.MODE_SYNCHRONOUS>);
307          $test->assert_isa ($p, <IFName::LSParser>);
308      @enImplNote:
309        @@ddid: lsparsertext
310        @@@:
311          Future version should add test:
312        @@QName: DOMImplLS.createLSParser.2.test
313        @@enDesc:
314          Since there is at least one implementation of the feature (i.e.
315          this class), the <M::gls|GLSImplementation.createGLSParser>
316          must not throw an exception.
317        @@PerlDef:
318          my $impl;
319          __CODE{DOMLS|createImplForTest:: $impl => $impl}__;
320          
321          my $p = $impl-><M::DOMLS|DOMImplementationLS.createLSParser>
322                           (<C::DOMLS|DOMImplementationLS.MODE_SYNCHRONOUS>,
323                            <Q::xml-dtd:>);
324          $test->assert_isa ($p, <IFName::LSParser>);
325    
326      @Test:
327      @@QName: Perl.open.utf8.strref.1.test      @@QName: Perl.open.utf8.strref.1.test
328      @@enDesc:      @@enDesc:
329        Does PerlIO works as intended?        Does PerlIO works as intended?
Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24