[Oorexx-svn] SF.net SVN: oorexx: [934] test/trunk/tests/oorexxunit/ooRexx/base/class/ ooRexx.Base.Class.TimeSpan.testUnit

[<mie...@us...>]

Revision: 934
          http://oorexx.svn.sourceforge.net/oorexx/?rev=934&view=rev
Author:   miesfeld
Date:     2007-10-11 09:58:19 -0700 (Thu, 11 Oct 2007)

Log Message:
-----------
[ 1811586 ] Modify existing TimeSpan unitTest  Supplied by Lee Peedin, thanks
Lee.

Modified Paths:
--------------
    test/trunk/tests/oorexxunit/ooRexx/base/class/ooRexx.Base.Class.TimeSpan.testUnit

Modified: test/trunk/tests/oorexxunit/ooRexx/base/class/ooRexx.Base.Class.TimeSpan.testUnit
===================================================================
--- test/trunk/tests/oorexxunit/ooRexx/base/class/ooRexx.Base.Class.TimeSpan.testUnit	2007-10-11 16:11:18 UTC (rev 933)
+++ test/trunk/tests/oorexxunit/ooRexx/base/class/ooRexx.Base.Class.TimeSpan.testUnit	2007-10-11 16:58:19 UTC (rev 934)
@@ -3,14 +3,15 @@
    name:             ooRexx.Base.Class.TimeSpan.testUnit
    author:           Lee Peedin
    date:             2007/10/09
-   version:          1.0
+   version:          1.1
 
 -- line commented lines are ignored, when building the directory of infos from this header
    changed:
 
    languageLevel:    6.02
    purpose:          Test the methods of the class TimeSpan class.
-   remark:           ---
+   remark:           2007/10/11 Modified existing ~string test and added several more unitTests for string
+                                Added unitTests for ~fromStringFormat
 
    license:          CPL 1.0 (Common Public License v1.0, see below)
    link:
@@ -312,10 +313,83 @@
     a_timeSpan2 = .timespan~new(15,37,45)
 
     expected = 1
-    self~assertEquals('subTest35',expected,(a_timeSpan2 - a_timeSpan1)~sign)
+    self~assertEquals('subTest36',expected,(a_timeSpan2 - a_timeSpan1)~sign)
 
-::method 'test_string'
+::method 'test_stringA'
     a_timeSpan = .timespan~new(6,4,33,15,100)
-    expected = '6.04:33:15.000100'
-    self~assertEquals('subTest36',expected,a_timeSpan~string)
+    a_string   = a_timespan~string
+    expected = .true
+    self~assertEquals('subTest37',expected,a_string~isA(.string))
 
+::method 'test_stringB'
+    a_timeSpan = .timespan~new(4,33,15)
+    a_string   = a_timespan~string
+    expected = .false
+    self~assertEquals('subTest38',expected,a_string~isA(.timespan))
+
+::method 'test_stringC'
+    a_timeSpan = .timespan~new(4,33,15)
+    a_string   = a_timespan~string
+    expected = .true
+    self~assertEquals('subTest39',expected,a_timespan~string == a_string)
+
+::method 'test_stringD'
+    a_timeSpan = .timespan~new(-6,4,33,15,100)
+    a_string   = a_timespan~string
+    expected = .true
+    self~assertEquals('subTest40',expected,a_string~isA(.string))
+
+::method 'test_stringE'
+    a_timeSpan = .timespan~new(-4,33,15)
+    a_string   = a_timespan~string
+    expected = .true
+    self~assertEquals('subTest41',expected,a_string~isA(.string))
+
+::method 'test_stringF'
+    a_timeSpan = .timespan~new(-4,33,15)
+    a_string   = a_timespan~string
+    expected = .true
+    self~assertEquals('subTest42',expected,a_timespan~string == a_string)
+
+::method 'test_fromStringFormat'
+    a_string   = '6.4:33:15'
+    expected = 88.918
+    self~expectSyntax(expected)
+    a_timespan = .timespan~fromStringFormat(a_string)
+
+::method 'test_fromStringFormatA'
+    a_string   = '6.4:33:15.0'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .true
+    self~assertEquals('subTest44',expected,a_timespan~isA(.timespan))
+
+::method 'test_fromStringFormatB'
+    a_string   = '6.4:33:15.0'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .false
+    self~assertEquals('subTest45',expected,a_timespan~isA(.string))
+
+::method 'test_fromStringFormatC'
+    a_string   = '4:33:15.0'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .true
+    self~assertEquals('subTest46',expected,a_timespan~string == '0'a_string'00000')
+
+::method 'test_fromStringFormatD'
+    a_string   = '-6.4:33:15.000100'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .true
+    self~assertEquals('subTest47',expected,a_timespan~isA(.timespan))
+
+::method 'test_fromStringFormatE'
+    a_string   = '-4:33:15.000100'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .true
+    self~assertEquals('subTest48',expected,a_timespan~isA(.timespan))
+
+::method 'test_fromStringFormatF'
+    a_string   = '4:33:15.000100'
+    a_timespan = .timespan~fromStringFormat(a_string)
+    expected = .true
+    self~assertEquals('subTest49',expected,a_timespan~string == '0'a_string)
+


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.