Changeset 326 for trunk/nom/class_c/nomcls.c

Timestamp:

Apr 9, 2008, 10:22:08 PM (17 years ago)

Author:

cinc

Message:

Portability patches for Windows, Linux, Darwin by Bird.

File:

• trunk/nom/class_c/nomcls.c (modified) (13 diffs)

trunk/nom/class_c/nomcls.c

@@ -40 +40 @@
 #endif
 
-#define INCL_DOS
-#include <os2.h>
+#ifdef __OS2__
+# define INCL_DOS
+# include <os2.h>
+#endif /* __OS2__ */
+
 #include <string.h>
 #include <stdlib.h>
-#include <gtk/gtk.h>
+#ifdef NOM_WITH_GTK
+# include <gtk/gtk.h>
+#endif 
 
 
@@ -64 +69 @@
   if(nomIsObj(nObj)){
     //nomPrintf("Finalizing 0x%x: %s \n", nObj, nObj->mtab->nomClassName);
-    _nomUnInit(nObj, NULLHANDLE);
+    _nomUnInit(nObj, NULL);
   }
   //else
@@ -80 +85 @@
 
   if(!_ncpObject)
-    return NULLHANDLE;
+    return NULL;
 
   ncp=(NOMClassPriv*)_ncpObject;
@@ -86 +91 @@
   /* Allocate memory big enough to hold an object. This means the size is that of the
      mtab pointer and all instance variables. */
-  if((nObj=_nomAllocate(nomSelf, ncp->mtab->ulInstanceSize, NULLHANDLE))==NULLHANDLE)
-    return NULLHANDLE;
+  if((nObj=_nomAllocate(nomSelf, ncp->mtab->ulInstanceSize, NULL))==NULL)
+    return NULL;
 
   /* _nomInit() is called in _nomRenew() */
-  return _nomRenew(nomSelf, (CORBA_Object)nObj, NULLHANDLE); /* This will also init the object */
+  return _nomRenew(nomSelf, (CORBA_Object)nObj, NULL); /* This will also init the object */
 }
 
@@ -135 +140 @@
   tempEnv.fFlags=NOMENV_FLG_DONT_CHECK_OBJECT;
 #endif
-  _nomRenewNoInit(nomSelf, nomObj, NULLHANDLE);
+  _nomRenewNoInit(nomSelf, nomObj, NULL);
 
   /* And now give the object the possibility to initialize... */
   /* Make sure the object is not checked. */
   //_nomInit((NOMObject*)nomObj, &tempEnv);
-  _nomInit((NOMObject*)nomObj, NULLHANDLE);
+  _nomInit((NOMObject*)nomObj, NULL);
 
   return nomObj;
@@ -165 +170 @@
 
   /* The private struct characterizing the objects this meta class can create. */
-  ncp=_nomGetObjectCreateInfo(nomSelf, NULLHANDLE);
+  ncp=_nomGetObjectCreateInfo(nomSelf, NULL);
 
   if(!ncp)
@@ -231 +236 @@
       
       //The following was used before changing nomGetname()
-      //if(!_nomFindClassFromName(NOMClassMgrObject, _nomGetName(nomSelf, NULLHANDLE),
-      //                        0, 0, NULLHANDLE))
+      //if(!_nomFindClassFromName(NOMClassMgrObject, _nomGetName(nomSelf, NULL),
+      //                        0, 0, NULL))
       if(!_nomFindClassFromName(NOMClassMgrObject, _nomGetClassName(nomSelf, &tempEnv),
                               0, 0, &tempEnv))
@@ -246 +251 @@
           //ncPriv->ulIsMetaClass=1; /* Mark that we are a metaclass */
           ncPriv->ulClassFlags|=NOM_FLG_IS_METACLASS; /* Mark that we are a metaclass */
-          _nomRegisterClass(NOMClassMgrObject, nomSelf->mtab, NULLHANDLE);
+          _nomRegisterClass(NOMClassMgrObject, nomSelf->mtab, NULL);
           /* Register all the methods this class introduces */
           ulNumIntroducedMethods=ncPriv->sci->ulNumStaticMethods;
@@ -253 +258 @@
               if(*ncPriv->sci->nomSMethods[a].chrMethodDescriptor)
                 _nomRegisterMethod(NOMClassMgrObject, nomSelf->mtab,
-                                   *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULLHANDLE);
+                                   *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULL);
             }
           /* Metaclass is registered. Register the object class this
              metaclass may create. */
-          ncPriv=(NOMClassPriv*)_nomGetObjectCreateInfo(nomSelf, NULLHANDLE);//nomSelf->mtab->nomClsInfo;
+          ncPriv=(NOMClassPriv*)_nomGetObjectCreateInfo(nomSelf, NULL);//nomSelf->mtab->nomClsInfo;
           if(ncPriv){
+#ifndef _MSC_VER
 #warning !!!!! NOMClass does not have this pointer, this is a bug !!!!!
+#endif
             //ncPriv->ulIsMetaClass=0; /* Mark that we are not a metaclass (should be 0 already) */
             ncPriv->ulClassFlags&=~NOM_FLG_IS_METACLASS; /* Mark that we are not a metaclass (should be 0 already) */
-            _nomRegisterClass(NOMClassMgrObject, ncPriv->mtab, NULLHANDLE);
+            _nomRegisterClass(NOMClassMgrObject, ncPriv->mtab, NULL);
 
             /* Register all the methods this class introduces */
@@ -270 +277 @@
                 if(*ncPriv->sci->nomSMethods[a].chrMethodDescriptor)
                   _nomRegisterMethod(NOMClassMgrObject, ncPriv->mtab,
-                                     *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULLHANDLE);
+                                     *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULL);
               }/* for(a) */
           }/* ncPriv */
@@ -281 +288 @@
         nomPrintf("%s: Metaclass already registered, registering normal object class now.\n", __FUNCTION__);
 
-        ncPriv=(NOMClassPriv*)_nomGetObjectCreateInfo(nomSelf, NULLHANDLE);//nomSelf->mtab->nomClsInfo;
+        ncPriv=(NOMClassPriv*)_nomGetObjectCreateInfo(nomSelf, NULL);//nomSelf->mtab->nomClsInfo;
         // ncPriv->ulIsMetaClass=0; /* Mark that we are not a metaclass (should be 0 already) */
         ncPriv->ulClassFlags&=~NOM_FLG_IS_METACLASS; /* Mark that we are not a metaclass (should be 0 already) */
@@ -292 +299 @@
               if(*ncPriv->sci->nomSMethods[a].chrMethodDescriptor)
                 _nomRegisterMethod(NOMClassMgrObject, ncPriv->mtab,
-                                   *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULLHANDLE);
+                                   *ncPriv->sci->nomSMethods[a].chrMethodDescriptor, NULL);
             }
           //nomPrintf("%s %s \n", nomSelf->mtab->nomClassName, ncPriv->mtab->nomClassName);
-          _nomRegisterClass(NOMClassMgrObject, ncPriv->mtab, NULLHANDLE);
+          _nomRegisterClass(NOMClassMgrObject, ncPriv->mtab, NULL);
         }
       }
@@ -316 +323 @@
   /* Don't check object pointer. We are just created but not yet registered as a class. */
   //  NOMClass_nomInit_parent(nomSelf,  &tempEnv);
-  NOMClass_nomInit_parent(nomSelf, NULLHANDLE);
-}
-
-
-
-
+  NOMClass_nomInit_parent(nomSelf, NULL);
+}
+
+
+
+