Changeset 197 for trunk/ORBit2-2.14.0/src

Timestamp:

Jan 18, 2007, 9:42:53 PM (19 years ago)

Author:

cinc

Message:

Explicit metaclasses not output into *.ih file

File:

• trunk/ORBit2-2.14.0/src/idl-compiler/orbit-idl-c-skelimpl.c (modified) (3 diffs)

trunk/ORBit2-2.14.0/src/idl-compiler/orbit-idl-c-skelimpl.c

@@ -344 +344 @@
 
 #if 0
-      printf("%s %s %s, %s %d\n",
+      printf(" %d --- > %s %s %s, %s %d\n", __LINE__,
              id, IDL_IDENT(ident).str, IDL_IDENT(IDL_INTERFACE(intf).ident).str,
              passnames[ski->pass], IDL_NODE_TYPE(IDL_CONST_DCL(ski->tree).const_exp));
@@ -356 +356 @@
               gsMetaClassName[ulCurInterface]=g_string_new(NULL);
               g_string_printf(gsMetaClassName[ulCurInterface], "%s", IDL_STRING(IDL_CONST_DCL(ski->tree).const_exp).value);
+              //    printf(" %d    --- > %s %s (%x)\n",
+              //     __LINE__, id, IDL_STRING(IDL_CONST_DCL(ski->tree).const_exp).value, gsMetaClassName[ulCurInterface]);
             }
         }
@@ -1318 +1320 @@
     case PASS_VOYAGER_METACLASS:
       {
-        gsMetaClassName[ulCurInterface]=(void*)0;
+        //   gsMetaClassName[ulCurInterface]=(void*)0;
                 subski.tree = IDL_INTERFACE(ski->tree).body;
         cbe_ski_do_list(&subski);
                 IDL_tree_traverse_parents(ski->tree, (GFunc)&cbe_ski_do_inherited_methods, ski);
 
-        printf("%d: --->%d\n", __LINE__, ulCurInterface);        
         if(NULL!=gsMetaClassName[ulCurInterface])
           {
             /* Metaclass id */
-            fprintf(ski->of, "/* The meta class this class is using */\n");
+            fprintf(ski->of, "/* The meta class this class is using (line %d %s) */\n", __LINE__, __FILE__);
             fprintf(ski->of, "static char * nomIdStringMetaClass_%s = \"%s\";\n\n",  id, gsMetaClassName[ulCurInterface]->str);
           }