[Oorexx-svn] SF.net SVN: oorexx:[5662] test/branches/4.0.1/external/API/orxclassic.cpp

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

Revision: 5662
          http://oorexx.svn.sourceforge.net/oorexx/?rev=5662&view=rev
Author:   bigrixx
Date:     2010-02-28 22:13:30 +0000 (Sun, 28 Feb 2010)

Log Message:
-----------
Fix error in queue tests

Modified Paths:
--------------
    test/branches/4.0.1/external/API/orxclassic.cpp

Modified: test/branches/4.0.1/external/API/orxclassic.cpp
===================================================================
--- test/branches/4.0.1/external/API/orxclassic.cpp	2010-02-28 21:18:58 UTC (rev 5661)
+++ test/branches/4.0.1/external/API/orxclassic.cpp	2010-02-28 22:13:30 UTC (rev 5662)
@@ -118,6 +118,8 @@
     RXSTRING data;
     RexxQueueTime timestamp;
 
+    MAKERXSTRING(data, NULL, 0);
+
     RexxReturnCode rc = RexxPullFromQueue(qname, &data, &timestamp, 0);
     context->SetObjectVariable("RETC", context->Int32ToObject(rc));
     context->SetObjectVariable("FLAG", context->NewStringFromAsciiz(data.strptr));


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