← Back to branch summary

~ubuntu-branches/ubuntu/hardy/libfile-spec-perl/hardy

« back to all changes in this revision

Viewing changes to t/Spec.t

  • Committer: Bazaar Package Importer
  • Author(s): Damyan Ivanov
  • Date: 2008-01-14 12:42:45 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20080114124245-0t9wefk1cx22b72b
Tags: 3.2501-3
* Drop (>= 0.19) from libmodule-build-perl Build-Dependency oldstable has
  0.26 and versioned B-D breaks building with perl-modules 5.10 (which
  includes Module::Build)
* add ppport.h licensing/copyright to debian/copyright

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/Spec.t
358
358
[ "VMS->splitdir('[]')",          ''          ],
359
359
[ "VMS->splitdir('d1.d2.d3')",    'd1,d2,d3'  ],
360
360
[ "VMS->splitdir('[d1.d2.d3]')",  'd1,d2,d3'  ],
361
 
[ "VMS->splitdir('.d1.d2.d3')",   ',d1,d2,d3' ],
362
 
[ "VMS->splitdir('[.d1.d2.d3]')", ',d1,d2,d3' ],
363
 
[ "VMS->splitdir('.-.d2.d3')",    ',-,d2,d3'  ],
364
 
[ "VMS->splitdir('[.-.d2.d3]')",  ',-,d2,d3'  ],
 
361
[ "VMS->splitdir('.d1.d2.d3')",   'd1,d2,d3' ],
 
362
[ "VMS->splitdir('[.d1.d2.d3]')", 'd1,d2,d3' ],
 
363
[ "VMS->splitdir('.-.d2.d3')",    '-,d2,d3'  ],
 
364
[ "VMS->splitdir('[.-.d2.d3]')",  '-,d2,d3'  ],
365
365
[ "VMS->splitdir('[d1.d2]')",           'd1,d2'  ],
366
366
[ "VMS->splitdir('[d1-.--d2]')",        'd1-,--d2'  ],
367
367
[ "VMS->splitdir('[d1---.-.d2]')",      'd1---,-,d2'  ],
368
368
[ "VMS->splitdir('[d1.---.d2]')",       'd1,-,-,-,d2'  ],
369
369
[ "VMS->splitdir('[d1---d2]')",         'd1---d2'  ],
370
370
[ "VMS->splitdir('[d1.][000000.d2]')",  'd1,d2'  ],
 
371
[ "VMS->splitdir('[.d1.d2^.d3]')", 'd1,d2^.d3' ],
371
372
 
372
373
[ "VMS->catdir('')",                                                      ''                 ],
373
374
[ "VMS->catdir('d1','d2','d3')",                                          '[.d1.d2.d3]'         ],
618
619
#[ "Epoc->canonpath('/a/.')",                                  '/a'        ],
619
620
#[ "Epoc->canonpath('/.')",                                    '/'         ],
620
621
 
621
 
[ "Cygwin->case_tolerant()",         '0'  ],
 
622
[ "Cygwin->case_tolerant()",         '1'  ],
 
623
[ "Cygwin->catfile('a','b','c')",         'a/b/c'  ],
 
624
[ "Cygwin->catfile('a','b','./c')",       'a/b/c'  ],
 
625
[ "Cygwin->catfile('./a','b','c')",       'a/b/c'  ],
 
626
[ "Cygwin->catfile('c')",                 'c' ],
 
627
[ "Cygwin->catfile('./c')",               'c' ],
 
628
 
 
629
[ "Cygwin->splitpath('file')",            ',,file'            ],
 
630
[ "Cygwin->splitpath('/d1/d2/d3/')",      ',/d1/d2/d3/,'      ],
 
631
[ "Cygwin->splitpath('d1/d2/d3/')",       ',d1/d2/d3/,'       ],
 
632
[ "Cygwin->splitpath('/d1/d2/d3/.')",     ',/d1/d2/d3/.,'     ],
 
633
[ "Cygwin->splitpath('/d1/d2/d3/..')",    ',/d1/d2/d3/..,'    ],
 
634
[ "Cygwin->splitpath('/d1/d2/d3/.file')", ',/d1/d2/d3/,.file' ],
 
635
[ "Cygwin->splitpath('d1/d2/d3/file')",   ',d1/d2/d3/,file'   ],
 
636
[ "Cygwin->splitpath('/../../d1/')",      ',/../../d1/,'      ],
 
637
[ "Cygwin->splitpath('/././d1/')",        ',/././d1/,'        ],
 
638
 
 
639
[ "Cygwin->catpath('','','file')",            'file'            ],
 
640
[ "Cygwin->catpath('','/d1/d2/d3/','')",      '/d1/d2/d3/'      ],
 
641
[ "Cygwin->catpath('','d1/d2/d3/','')",       'd1/d2/d3/'       ],
 
642
[ "Cygwin->catpath('','/d1/d2/d3/.','')",     '/d1/d2/d3/.'     ],
 
643
[ "Cygwin->catpath('','/d1/d2/d3/..','')",    '/d1/d2/d3/..'    ],
 
644
[ "Cygwin->catpath('','/d1/d2/d3/','.file')", '/d1/d2/d3/.file' ],
 
645
[ "Cygwin->catpath('','d1/d2/d3/','file')",   'd1/d2/d3/file'   ],
 
646
[ "Cygwin->catpath('','/../../d1/','')",      '/../../d1/'      ],
 
647
[ "Cygwin->catpath('','/././d1/','')",        '/././d1/'        ],
 
648
[ "Cygwin->catpath('d1','d2/d3/','')",        'd2/d3/'          ],
 
649
[ "Cygwin->catpath('d1','d2','d3/')",         'd2/d3/'          ],
 
650
 
 
651
[ "Cygwin->splitdir('')",           ''           ],
 
652
[ "Cygwin->splitdir('/d1/d2/d3/')", ',d1,d2,d3,' ],
 
653
[ "Cygwin->splitdir('d1/d2/d3/')",  'd1,d2,d3,'  ],
 
654
[ "Cygwin->splitdir('/d1/d2/d3')",  ',d1,d2,d3'  ],
 
655
[ "Cygwin->splitdir('d1/d2/d3')",   'd1,d2,d3'   ],
 
656
 
 
657
[ "Cygwin->catdir()",                     ''          ],
 
658
[ "Cygwin->catdir('/')",                  '/'         ],
 
659
[ "Cygwin->catdir('','d1','d2','d3','')", '/d1/d2/d3' ],
 
660
[ "Cygwin->catdir('d1','d2','d3','')",    'd1/d2/d3'  ],
 
661
[ "Cygwin->catdir('','d1','d2','d3')",    '/d1/d2/d3' ],
 
662
[ "Cygwin->catdir('d1','d2','d3')",       'd1/d2/d3'  ],
622
663
[ "Cygwin->catdir('/','d2/d3')",     '/d2/d3'  ],
623
664
 
 
665
[ "Cygwin->canonpath('///../../..//./././a//b/.././c/././')",   '/a/b/../c' ],
 
666
[ "Cygwin->canonpath('')",                       ''               ],
 
667
[ "Cygwin->canonpath('a/../../b/c')",            'a/../../b/c'    ],
 
668
[ "Cygwin->canonpath('/.')",                     '/'              ],
 
669
[ "Cygwin->canonpath('/./')",                    '/'              ],
 
670
[ "Cygwin->canonpath('/a/./')",                  '/a'             ],
 
671
[ "Cygwin->canonpath('/a/.')",                   '/a'             ],
 
672
[ "Cygwin->canonpath('/../../')",                '/'              ],
 
673
[ "Cygwin->canonpath('/../..')",                 '/'              ],
 
674
 
 
675
[  "Cygwin->abs2rel('/t1/t2/t3','/t1/t2/t3')",          '.'                  ],
 
676
[  "Cygwin->abs2rel('/t1/t2/t4','/t1/t2/t3')",          '../t4'              ],
 
677
[  "Cygwin->abs2rel('/t1/t2','/t1/t2/t3')",             '..'                 ],
 
678
[  "Cygwin->abs2rel('/t1/t2/t3/t4','/t1/t2/t3')",       't4'                 ],
 
679
[  "Cygwin->abs2rel('/t4/t5/t6','/t1/t2/t3')",          '../../../t4/t5/t6'  ],
 
680
#[ "Cygwin->abs2rel('../t4','/t1/t2/t3')",              '../t4'              ],
 
681
[  "Cygwin->abs2rel('/','/t1/t2/t3')",                  '../../..'           ],
 
682
[  "Cygwin->abs2rel('///','/t1/t2/t3')",                '../../..'           ],
 
683
[  "Cygwin->abs2rel('/.','/t1/t2/t3')",                 '../../..'           ],
 
684
[  "Cygwin->abs2rel('/./','/t1/t2/t3')",                '../../..'           ],
 
685
#[ "Cygwin->abs2rel('../t4','/t1/t2/t3')",              '../t4'              ],
 
686
[  "Cygwin->abs2rel('/t1/t2/t3', '/')",                 't1/t2/t3'           ],
 
687
[  "Cygwin->abs2rel('/t1/t2/t3', '/t1')",               't2/t3'              ],
 
688
[  "Cygwin->abs2rel('t1/t2/t3', 't1')",                 't2/t3'              ],
 
689
[  "Cygwin->abs2rel('t1/t2/t3', 't4')",                 '../t1/t2/t3'        ],
 
690
 
 
691
[ "Cygwin->rel2abs('t4','/t1/t2/t3')",             '/t1/t2/t3/t4'    ],
 
692
[ "Cygwin->rel2abs('t4/t5','/t1/t2/t3')",          '/t1/t2/t3/t4/t5' ],
 
693
[ "Cygwin->rel2abs('.','/t1/t2/t3')",              '/t1/t2/t3'       ],
 
694
[ "Cygwin->rel2abs('..','/t1/t2/t3')",             '/t1/t2/t3/..'    ],
 
695
[ "Cygwin->rel2abs('../t4','/t1/t2/t3')",          '/t1/t2/t3/../t4' ],
 
696
[ "Cygwin->rel2abs('/t1','/t1/t2/t3')",            '/t1'             ],
 
697
 
624
698
) ;
625
699
 
626
700