[Oorexx-svn] SF.net SVN: oorexx: [2142] test/branches/test.3.2.0/ooRexx/base/keyword

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

Revision: 2142
          http://oorexx.svn.sourceforge.net/oorexx/?rev=2142&view=rev
Author:   miesfeld
Date:     2008-01-10 08:47:44 -0800 (Thu, 10 Jan 2008)

Log Message:
-----------
ooRexxUnit - back port commit 2138 from trunk to 3.2.0 branch.

Fix signal/call on failure tests

Modified Paths:
--------------
    test/branches/test.3.2.0/ooRexx/base/keyword/CALL.testGroup
    test/branches/test.3.2.0/ooRexx/base/keyword/SIGNAL.testGroup

Modified: test/branches/test.3.2.0/ooRexx/base/keyword/CALL.testGroup
===================================================================
--- test/branches/test.3.2.0/ooRexx/base/keyword/CALL.testGroup	2008-01-10 15:41:05 UTC (rev 2141)
+++ test/branches/test.3.2.0/ooRexx/base/keyword/CALL.testGroup	2008-01-10 16:47:44 UTC (rev 2142)
@@ -779,16 +779,8 @@
 ::method "test_13"
    call on failure
    trace off
-
-   -- Prevent error messages from the shell printing on the console.
-   select
-     when .ooRexxUnit.OSName == "WINDOWS"then toNull = '1>nul 2>&1'
-     when .ooRexxUnit.OSName == "LINUX"then toNull = '>/dev/null 2>&1'
-     otherwise toNull = "" -- Not sure what works on other OSes
-   end
-
    caught = .false
-   'zxyabc' toNull    -- deliberate failure, this command should not be found!
+   address xyzzy 'grue'  -- this is a deliberate unknown command
    self~assertTrue("Error should be caught", caught)
    return
 

Modified: test/branches/test.3.2.0/ooRexx/base/keyword/SIGNAL.testGroup
===================================================================
--- test/branches/test.3.2.0/ooRexx/base/keyword/SIGNAL.testGroup	2008-01-10 15:41:05 UTC (rev 2141)
+++ test/branches/test.3.2.0/ooRexx/base/keyword/SIGNAL.testGroup	2008-01-10 16:47:44 UTC (rev 2142)
@@ -232,14 +232,7 @@
    signal on failure
    trace off
 
-   -- Prevent error messages from the shell printing on the console.
-   select
-     when .ooRexxUnit.OSName == "WINDOWS"then toNull = '1>nul 2>&1'
-     when .ooRexxUnit.OSName == "LINUX"then toNull = '>/dev/null 2>&1'
-     otherwise toNull = "" -- Not sure what works on other OSes
-   end
-
-   'zxyabc' toNull -- deliberate failure, this command should not be found!
+   address xyzzy 'grue'  -- this is a deliberate unknown command
    self~assertTrue("subTest_5", 0)
    return
 


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