[Oorexx-svn] SF.net SVN: oorexx:[3411] main/trunk/interpreter/classes/WeakReferenceClass .cpp

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

Revision: 3411
          http://oorexx.svn.sourceforge.net/oorexx/?rev=3411&view=rev
Author:   bigrixx
Date:     2008-09-28 17:37:19 +0000 (Sun, 28 Sep 2008)

Log Message:
-----------
fix problem with .WeakReference NEW method

Modified Paths:
--------------
    main/trunk/interpreter/classes/WeakReferenceClass.cpp

Modified: main/trunk/interpreter/classes/WeakReferenceClass.cpp
===================================================================
--- main/trunk/interpreter/classes/WeakReferenceClass.cpp	2008-09-28 15:35:53 UTC (rev 3410)
+++ main/trunk/interpreter/classes/WeakReferenceClass.cpp	2008-09-28 17:37:19 UTC (rev 3411)
@@ -192,6 +192,8 @@
 
                                        /* break up the arguments            */
   RexxClass::processNewArgs(init_args, argCount, &init_args, &argCount, 1, &refObj, NULL);
+  // must have a value
+  required_arg(refObj, ONE);
   // create a new weakReference
   RexxObject *newObj = new WeakReference(refObj);
   // override the behaviour in case this is a subclass


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