cmDspValue.h/c : Added the 'ptr' type to represent void*.

dsp/cmDspValue.c

 bool cmDsvIsDouble(    const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kDoubleDsvFl);             }
 bool cmDsvIsSample(    const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kSampleDsvFl);             }
 bool cmDsvIsReal(      const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kRealDsvFl);               }
+bool cmDsvIsPtr(       const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kPtrDsvFl);                }
 bool cmDsvIsStrz(      const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kStrzDsvFl);               }
 bool cmDsvIsStrcz(     const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kStrzDsvFl | kConstDsvFl); }
 bool cmDsvIsSymbol(    const cmDspValue_t* vp ){ vp=_vcptr(vp); return  cmAllFlags(vp->flags,kSymDsvFl);                }
     case kDoubleDsvFl: cmDsvSetDouble( vp, va_arg(vl,double        )); break;
     case kSampleDsvFl: cmDsvSetSample( vp, va_arg(vl,double        )); break;
     case kRealDsvFl:   cmDsvSetReal(   vp, va_arg(vl,double        )); break;
+    case kPtrDsvFl:    cmDsvSetPtr(    vp, va_arg(vl,void*         )); break;
     case kStrzDsvFl:   cmDsvSetStrz(   vp, va_arg(vl,cmChar_t*     )); break;
     default:
       return false;
 void cmDsvSetDouble( cmDspValue_t* vp, double v )         { vp->flags = kDoubleDsvFl; vp->u.d = v;  }
 void cmDsvSetSample( cmDspValue_t* vp, cmSample_t v )     { vp->flags = kSampleDsvFl; vp->u.a = v;  }
 void cmDsvSetReal(   cmDspValue_t* vp, cmReal_t v )       { vp->flags = kRealDsvFl;   vp->u.r = v;  }
+void cmDsvSetPtr(    cmDspValue_t* vp, void* v )          { vp->flags = kPtrDsvFl;    vp->u.vp = v;  }
 void cmDsvSetSymbol( cmDspValue_t* vp, unsigned v )       { vp->flags = kSymDsvFl;    vp->u.u = v;  }  
 void cmDsvSetStrz(   cmDspValue_t* vp, cmChar_t* v )      { vp->flags = kStrzDsvFl;   vp->u.z = v;  }  
 void cmDsvSetStrcz(  cmDspValue_t* vp, const cmChar_t* v ){ vp->flags = kStrzDsvFl | kConstDsvFl; vp->u.cz = v; }
 double         cmDsvDouble( const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kDoubleDsvFl)) return vp->u.d;  assert(0); return 0; }
 cmSample_t     cmDsvSample( const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kSampleDsvFl)) return vp->u.a;  assert(0); return 0; }
 cmReal_t       cmDsvReal(   const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kRealDsvFl))   return vp->u.r;  assert(0); return 0; } 
+void*          cmDsvPtr(    const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kPtrDsvFl))    return vp->u.vp; assert(0); return 0; } 
 unsigned int   cmDsvSymbol( const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kSymDsvFl))    return vp->u.u;  assert(0); return cmInvalidId; } 
 cmJsonNode_t*  cmDsvJson(   const cmDspValue_t* vp ) { vp=_vcptr(vp); if(cmIsFlag((vp->flags & kTypeDsvMask),kJsonDsvFl))   return vp->u.j;  assert(0); return NULL; }
 
   return 0;
 } 
 
+void*       cmDsvGetPtr(   const cmDspValue_t* vp  )
+{
+  vp = _vcptr(vp);
+
+
+  if( (vp->flags & kTypeDsvMask) == kPtrDsvFl )
+    return vp->u.vp;
+
+  return NULL;
+} 
+
 unsigned int   cmDsvGetSymbol(   const cmDspValue_t* vp ) 
 {
   vp = _vcptr(vp);
       case kDoubleDsvFl:
       case kSampleDsvFl:
       case kRealDsvFl:
+      case kPtrDsvFl:
       case kSymDsvFl:
         // these types are stored as part of the type record
         // and therefore don't need any extra storage
       case kDoubleDsvFl:
       case kSampleDsvFl:
       case kRealDsvFl:
+      case kPtrDsvFl:
       case kSymDsvFl:
         // these types are stored as part of the type record
         // and therefore don't need any extra storage
       case kDoubleDsvFl: cmRptPrintf(rpt,"%s%f ",lbl,vp->u.d);  break;
       case kSampleDsvFl: cmRptPrintf(rpt,"%s%f ",lbl,vp->u.a);  break;
       case kRealDsvFl:   cmRptPrintf(rpt,"%s%f ",lbl,vp->u.r);  break;
+      case kPtrDsvFl:    cmRptPrintf(rpt,"%s%p ",lbl,vp->u.vp); break;
       case kStrzDsvFl:   cmRptPrintf(rpt,"%s%s ",lbl,vp->u.z);  break;
       case kSymDsvFl:    cmRptPrintf(rpt,"%s%i ",lbl,vp->u.u); break;
       case kJsonDsvFl:   cmJsonPrintTree(vp->u.j,rpt);   break;    

dsp/cmDspValue.h

     kDoubleDsvFl   = 0x00000400,
     kSampleDsvFl   = 0x00000800,
     kRealDsvFl     = 0x00001000,
-    kStrzDsvFl     = 0x00002000,
-    kSymDsvFl      = 0x00004000,
-    kJsonDsvFl     = 0x00008000,
-    kMtxDsvFl      = 0x00010000,
-    kTypeDsvMask   = 0x0001ffff,
-    kProxyDsvFl    = 0x00020000,
+    kPtrDsvFl      = 0x00002000,
+    kStrzDsvFl     = 0x00004000,
+    kSymDsvFl      = 0x00008000,
+    kJsonDsvFl     = 0x00010000,
+    kMtxDsvFl      = 0x00020000,
+    kTypeDsvMask   = 0x0003ffff,
+    kProxyDsvFl    = 0x00040000,
 
     // Auxilliary Flags
     kInDsvFl       = 0x00100000,  // parameter which is input to the instance (represented by an input port)
   void cmDsvSetDouble( cmDspValue_t* vp, double v );
   void cmDsvSetSample( cmDspValue_t* vp, cmSample_t v );
   void cmDsvSetReal(   cmDspValue_t* vp, cmReal_t v );
+  void cmDsvSetPtr(    cmDspValue_t* vp, void* v );
   void cmDsvSetSymbol( cmDspValue_t* vp, unsigned int v );
   void cmDsvSetStrz(   cmDspValue_t* vp, cmChar_t* v );  
   void cmDsvSetStrcz(  cmDspValue_t* vp, const cmChar_t* v );  
   double         cmDsvDouble( const cmDspValue_t* vp );
   cmSample_t     cmDsvSample( const cmDspValue_t* vp );
   cmReal_t       cmDsvReal(   const cmDspValue_t* vp );
+  void*          cmDsvPtr(    const cmDspValue_t* vp );
   unsigned int   cmDsvSymbol( const cmDspValue_t* vp );
   cmChar_t*      cmDsvStrz(   const cmDspValue_t* vp );
   const cmChar_t*cmDsvStrcz(  const cmDspValue_t* vp );
   double         cmDsvGetDouble( const cmDspValue_t* vp );
   cmSample_t     cmDsvGetSample( const cmDspValue_t* vp );
   cmReal_t       cmDsvGetReal(   const cmDspValue_t* vp );
+  void*          cmDsvGetPtr(    const cmDspValue_t* vp );
   unsigned       cmDsvGetSymbol( const cmDspValue_t* vp );
   cmChar_t*      cmDsvGetStrz(   const cmDspValue_t* vp );
   const cmChar_t*cmDsvGetStrcz(  const cmDspValue_t* vp );