[lucy-commits] svn commit: r1183766 - /incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c

[ma...@apache.org]

Author: marvin
Date: Sat Oct 15 23:23:17 2011
New Revision: 1183766

URL: http://svn.apache.org/viewvc?rev=1183766&view=rev
Log:
Adapt C code regarding "parcel" argument to CFCType_new_object() for more or
less the same behavior as the Perl code it was ported from.

Modified:
    incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c

Modified: incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c
URL: http://svn.apache.org/viewvc/incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c?rev=1183766&r1=1183765&r2=1183766&view=diff
==============================================================================
--- incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c (original)
+++ incubator/lucy/branches/clownfish_lemon/clownfish/src/CFCType.c Sat Oct 15 23:23:17 2011
@@ -182,8 +182,10 @@ CFCType_new_object(int flags, CFCParcel 
     if ((flags & CFCTYPE_INCREMENTED) && (flags & CFCTYPE_DECREMENTED)) {
         croak("Can't be both incremented and decremented");
     }
+
+    // Use default parcel if none supplied.
     if (!parcel) {
-        croak("Missing required param 'parcel'");
+        parcel = CFCParcel_singleton(NULL, NULL);
     }
 
     // Add flags.