| Å×½ºÆ® :: ´ÜÀ§ :: TestSuite. Å×½ºÆ® :: ´ÜÀ§ :: TestSuite´Â ´ÜÀ§ Å×½ºÆ® ÇÁ·¹ÀÓ ¿öÅ©º£À̽º Ŭ·¡½ºÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Å×½ºÆ® :: ´ÜÀ§ :: TestSuite. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Christian Lemburg
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~clemburg/Test-Unit-0.14/lib/Test/Unit/tests/AllTests.pm
Å×½ºÆ® :: ´ÜÀ§ :: TestSuite. ű×
Å×½ºÆ® :: ´ÜÀ§ :: TestSuite. ¼³¸í
Å×½ºÆ® :: Unit :: TestSuite´Â ´ÜÀ§ Å×½ºÆ® ÇÁ·¹ÀÓ ¿öÅ©º£À̽º Ŭ·¡½ºÀÔ´Ï´Ù. Test :: Unit :: TestSuite´Â ´ÜÀ§ Å×½ºÆ® ÇÁ·¹ÀÓ ¿öÅ© ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. Å×½ºÆ® :: ´ÜÀ§ :: TestSuite; # ´õ ¸¹Àº ÄÚµå ¿©±â ... Sub Suite {my $ class = shift; # ºó Á¦Ç°±º ¸¸µé±â My $ Suite = Test :: Unit :: TestSuite-> empty_new ( "Å×½ºÆ® ½ºÀ§Æ®"); # ±âÁ¸ ½ºÀ§Æ® ½ºÀ§Æ® $ SUITE-> ADD_TEST (TEST :: UNIT :: TESTSUITE-> NEW ( "myModule :: Suite_1")¸¦ Ãß°¡ÇϽʽÿÀ. # Suite ¸Þ¼µå¸¦ »ç¿ëÇÏ¿© ½ºÀ§Æ® ·ëÀ» ÃßÃâÇÏ°í $ Suite-> add_test (myModule :: Suite_2-> Suite ())¸¦ Ãß°¡ÇÕ´Ï´Ù. # ´Ù¸¥ ±âÁ¸ Suite $ Suite-> add_test (test :: Unit :: TestSuite-> »õ ( "myModule :: testCase_2")¸¦ Ãß°¡ÇϽʽÿÀ. # ½ºÀ§Æ® ºôÆ® ºôÆ® ¸®ÅÏ $ Suite¸¦ ¹ÝȯÇÕ´Ï´Ù. }ÀÌ Å¬·¡½º´Â ÀϹÝÀûÀ¸·Î Á÷Á¢ÀûÀ¸·Î »ç¿ëµÇÁö ¾ÊÁö¸¸ »ç¿ëÀÚ Á¤ÀÇ ±¸Ãà µÈ Áý°è ½ºÀ§Æ®¸¦ ¸¸µå´Â µ¥ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù.ÀÌ Å¬·¡½º´Â ÁÖ¾îÁø À̸§ÀÇ Å×½ºÆ®ÀÇ À̸§ Á¢µÎ»ç°¡ÀÖ´Â ¸Þ¼Òµå¸¦ ÃßÃâÇÏ¿© Å×½ºÆ® ½ºÀ§Æ®¸¦ ÀÚµ¿À¸·Î ºôµåÇÏ´Â ±â´ÉÀ» Á¦°øÇÕ´Ï´Ù. Å×½ºÆ® ·¯³Ê¿¡ ÆÐÅ°Áö. ¿ä±¸ »çÇ× : ¡¤ Perl.
Å×½ºÆ® :: ´ÜÀ§ :: TestSuite. °ü·Ã ¼ÒÇÁÆ®¿þ¾î