You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by ma...@apache.org on 2011/02/28 21:20:50 UTC

[lucy-commits] svn commit: r1075513 - in /incubator/lucy/trunk/clownfish: lib/Clownfish.xs lib/Clownfish/Class.pm src/CFCClass.c src/CFCClass.h

Author: marvin
Date: Mon Feb 28 20:20:50 2011
New Revision: 1075513

URL: http://svn.apache.org/viewvc?rev=1075513&view=rev
Log:
Rename CFCClass C-level constructors from "new" and "init" to "create" and
"do_create".

Modified:
    incubator/lucy/trunk/clownfish/lib/Clownfish.xs
    incubator/lucy/trunk/clownfish/lib/Clownfish/Class.pm
    incubator/lucy/trunk/clownfish/src/CFCClass.c
    incubator/lucy/trunk/clownfish/src/CFCClass.h

Modified: incubator/lucy/trunk/clownfish/lib/Clownfish.xs
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/clownfish/lib/Clownfish.xs?rev=1075513&r1=1075512&r2=1075513&view=diff
==============================================================================
--- incubator/lucy/trunk/clownfish/lib/Clownfish.xs (original)
+++ incubator/lucy/trunk/clownfish/lib/Clownfish.xs Mon Feb 28 20:20:50 2011
@@ -100,7 +100,7 @@ PPCODE:
 MODULE = Clownfish    PACKAGE = Clownfish::Class
 
 SV*
-_new(klass, parcel, exposure, class_name_sv, class_cnick_sv, micro_sym_sv, docucomment, source_class_sv, parent_class_name_sv, is_final, is_inert)
+_create(klass, parcel, exposure, class_name_sv, class_cnick_sv, micro_sym_sv, docucomment, source_class_sv, parent_class_name_sv, is_final, is_inert)
     const char *klass;
     CFCParcel *parcel;
     const char *exposure;
@@ -123,7 +123,7 @@ CODE:
                             ? SvPV_nolen(source_class_sv) : NULL;
     const char *parent_class_name = SvOK(parent_class_name_sv) 
                                   ? SvPV_nolen(parent_class_name_sv) : NULL;
-    CFCClass *self = CFCClass_new(parcel, exposure, class_name, class_cnick,
+    CFCClass *self = CFCClass_create(parcel, exposure, class_name, class_cnick,
         micro_sym, docucomment, source_class, parent_class_name, is_final, 
         is_inert);
     RETVAL = newRV(CFCBase_get_perl_obj((CFCBase*)self));

Modified: incubator/lucy/trunk/clownfish/lib/Clownfish/Class.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/clownfish/lib/Clownfish/Class.pm?rev=1075513&r1=1075512&r2=1075513&view=diff
==============================================================================
--- incubator/lucy/trunk/clownfish/lib/Clownfish/Class.pm (original)
+++ incubator/lucy/trunk/clownfish/lib/Clownfish/Class.pm Mon Feb 28 20:20:50 2011
@@ -83,7 +83,7 @@ sub create {
     $args{parcel} = Clownfish::Parcel->acquire( $args{parcel} );
     $args{exposure}  ||= 'parcel';
     $args{micro_sym} ||= 'class';
-    my $self = $either->_new(
+    my $self = $either->_create(
         @args{qw( parcel exposure class_name class_cnick micro_sym
         docucomment source_class parent_class_name final inert )} );
 

Modified: incubator/lucy/trunk/clownfish/src/CFCClass.c
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/clownfish/src/CFCClass.c?rev=1075513&r1=1075512&r2=1075513&view=diff
==============================================================================
--- incubator/lucy/trunk/clownfish/src/CFCClass.c (original)
+++ incubator/lucy/trunk/clownfish/src/CFCClass.c Mon Feb 28 20:20:50 2011
@@ -104,25 +104,25 @@ static void
 S_bequeath_methods(CFCClass *self);
 
 CFCClass*
-CFCClass_new(struct CFCParcel *parcel, const char *exposure, 
-              const char *class_name, const char *class_cnick, 
-              const char *micro_sym, CFCDocuComment *docucomment, 
-              const char *source_class, const char *parent_class_name, 
-              int is_final, int is_inert)
+CFCClass_create(struct CFCParcel *parcel, const char *exposure, 
+                const char *class_name, const char *class_cnick, 
+                const char *micro_sym, CFCDocuComment *docucomment, 
+                const char *source_class, const char *parent_class_name, 
+                int is_final, int is_inert)
 {
     CFCClass *self = (CFCClass*)CFCBase_allocate(sizeof(CFCClass),
         "Clownfish::Class");
-    return CFCClass_init(self, parcel, exposure, class_name, class_cnick,
+    return CFCClass_do_create(self, parcel, exposure, class_name, class_cnick,
         micro_sym, docucomment, source_class, parent_class_name, is_final, 
         is_inert);
 }
 
 CFCClass*
-CFCClass_init(CFCClass *self, struct CFCParcel *parcel, 
-               const char *exposure, const char *class_name, 
-               const char *class_cnick, const char *micro_sym, 
-               CFCDocuComment *docucomment, const char *source_class, 
-               const char *parent_class_name, int is_final, int is_inert)
+CFCClass_do_create(CFCClass *self, struct CFCParcel *parcel, 
+                   const char *exposure, const char *class_name, 
+                   const char *class_cnick, const char *micro_sym, 
+                   CFCDocuComment *docucomment, const char *source_class, 
+                   const char *parent_class_name, int is_final, int is_inert)
 {
     CFCSymbol_init((CFCSymbol*)self, parcel, exposure, class_name, 
         class_cnick, micro_sym);

Modified: incubator/lucy/trunk/clownfish/src/CFCClass.h
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/clownfish/src/CFCClass.h?rev=1075513&r1=1075512&r2=1075513&view=diff
==============================================================================
--- incubator/lucy/trunk/clownfish/src/CFCClass.h (original)
+++ incubator/lucy/trunk/clownfish/src/CFCClass.h Mon Feb 28 20:20:50 2011
@@ -25,19 +25,19 @@ struct CFCMethod;
 struct CFCVariable;
 
 CFCClass*
-CFCClass_new(struct CFCParcel *parcel, const char *exposure, 
-              const char *class_name, const char *class_cnick, 
-              const char *micro_sym, struct CFCDocuComment *docucomment,
-              const char *source_class, const char *parent_class_name, 
-              int is_final, int is_inert);
+CFCClass_create(struct CFCParcel *parcel, const char *exposure, 
+                const char *class_name, const char *class_cnick, 
+                const char *micro_sym, struct CFCDocuComment *docucomment,
+                const char *source_class, const char *parent_class_name, 
+                int is_final, int is_inert);
 
 CFCClass*
-CFCClass_init(CFCClass *self, struct CFCParcel *parcel, 
-               const char *exposure, const char *class_name, 
-               const char *class_cnick, const char *micro_sym,
-               struct CFCDocuComment *docucomment, 
-               const char *source_class, const char *parent_class_name, 
-               int is_final, int is_inert);
+CFCClass_do_create(CFCClass *self, struct CFCParcel *parcel, 
+                   const char *exposure, const char *class_name, 
+                   const char *class_cnick, const char *micro_sym,
+                   struct CFCDocuComment *docucomment, 
+                   const char *source_class, const char *parent_class_name, 
+                   int is_final, int is_inert);
 
 void
 CFCClass_destroy(CFCClass *self);