[Oorexx-svn] SF.net SVN: oorexx: [1856] test/trunk/ooRexx/base/keyword/CALL.testGroup

[<bi...@us...>]

Revision: 1856
          http://oorexx.svn.sourceforge.net/oorexx/?rev=1856&view=rev
Author:   bigrixx
Date:     2007-12-28 15:55:29 -0800 (Fri, 28 Dec 2007)

Log Message:
-----------
fix assertion for time('e')

Modified Paths:
--------------
    test/trunk/ooRexx/base/keyword/CALL.testGroup

Modified: test/trunk/ooRexx/base/keyword/CALL.testGroup
===================================================================
--- test/trunk/ooRexx/base/keyword/CALL.testGroup	2007-12-28 22:53:51 UTC (rev 1855)
+++ test/trunk/ooRexx/base/keyword/CALL.testGroup	2007-12-28 23:55:29 UTC (rev 1856)
@@ -356,7 +356,7 @@
       self~assertSame("subTest4-subret", "ADDRESS"(),'')
       Return dff
    gt: Procedure Expose id cnt. self
-      self~assertTrue("subTest4-gt id:" id "TIME('E')>1", arg(1)>arg(2))
+      self~assertTrue("subTest4-gt id:" id "TIME('E')>1", arg(1)>=arg(2))
       cnt.ok=cnt.ok+1
       Return
    lt: Procedure Expose id cnt. self


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