[Oorexx-svn] SF.net SVN: oorexx-code-0:[9345] main/branches/4.1/trunk/interpreter/ classes/ObjectClass.cpp

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

Revision: 9345
          http://sourceforge.net/p/oorexx/code-0/9345
Author:   miesfeld
Date:     2013-07-06 17:46:16 +0000 (Sat, 06 Jul 2013)
Log Message:
-----------
Port Rainer's change  to 4.1.3 to 4.1 fixes

Modified Paths:
--------------
    main/branches/4.1/trunk/interpreter/classes/ObjectClass.cpp

Modified: main/branches/4.1/trunk/interpreter/classes/ObjectClass.cpp
===================================================================
--- main/branches/4.1/trunk/interpreter/classes/ObjectClass.cpp	2013-07-05 04:04:32 UTC (rev 9344)
+++ main/branches/4.1/trunk/interpreter/classes/ObjectClass.cpp	2013-07-06 17:46:16 UTC (rev 9345)
@@ -1165,10 +1165,10 @@
             // keeps the interpreter from crashing, there's a good chance the
             // program will run.  Frankly, there's something seriously wrong
             // if this error ever gets issued.
-            if (string_value == OREF_NULL)
+            if (((RexxObject *)string_value) == OREF_NULL)
             {
                 string_value = RexxObject::stringValue();
-                if (string_value == OREF_NULL)
+                if (((RexxObject *)string_value) == OREF_NULL)
                 {
                     reportException(Error_No_result_object_message, OREF_STRINGSYM);
                 }