[Oorexx-svn] SF.net SVN: oorexx: [2143] sandbox/mark/ooTest/ooRexx/base/keyword

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

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

Log Message:
-----------
merge commit 2142 from 3.2.0

Modified Paths:
--------------
    sandbox/mark/ooTest/ooRexx/base/keyword/CALL.testGroup
    sandbox/mark/ooTest/ooRexx/base/keyword/SIGNAL.testGroup

Modified: sandbox/mark/ooTest/ooRexx/base/keyword/CALL.testGroup
===================================================================
--- sandbox/mark/ooTest/ooRexx/base/keyword/CALL.testGroup	2008-01-10 16:47:44 UTC (rev 2142)
+++ sandbox/mark/ooTest/ooRexx/base/keyword/CALL.testGroup	2008-01-10 16:48:44 UTC (rev 2143)
@@ -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(caught, "Error should be caught")
    return
 

Modified: sandbox/mark/ooTest/ooRexx/base/keyword/SIGNAL.testGroup
===================================================================
--- sandbox/mark/ooTest/ooRexx/base/keyword/SIGNAL.testGroup	2008-01-10 16:47:44 UTC (rev 2142)
+++ sandbox/mark/ooTest/ooRexx/base/keyword/SIGNAL.testGroup	2008-01-10 16:48:44 UTC (rev 2143)
@@ -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(0)
    return
 


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