diff options
author | antirez <antirez> | 2005-03-04 11:54:51 +0000 |
---|---|---|
committer | antirez <antirez> | 2005-03-04 11:54:51 +0000 |
commit | b503c0ce39965cb68fe8bbdee4f4fffe8c39b81f (patch) | |
tree | 639987e1dd074b6651f934838ea5583382c9cbb9 /jim-win32com.c | |
parent | 71b54a34aefa47861f9d82102f898a3dc18ba798 (diff) | |
download | jimtcl-b503c0ce39965cb68fe8bbdee4f4fffe8c39b81f.zip jimtcl-b503c0ce39965cb68fe8bbdee4f4fffe8c39b81f.tar.gz jimtcl-b503c0ce39965cb68fe8bbdee4f4fffe8c39b81f.tar.bz2 |
Added JIM_NOTUSED macro. Macro used where appropriate.
Diffstat (limited to 'jim-win32com.c')
-rw-r--r-- | jim-win32com.c | 45 |
1 files changed, 27 insertions, 18 deletions
diff --git a/jim-win32com.c b/jim-win32com.c index 6b97aaa..34ff17a 100644 --- a/jim-win32com.c +++ b/jim-win32com.c @@ -147,9 +147,11 @@ OLE2A(LPCOLESTR wsz) void UnicodeFreeInternalRep(Jim_Interp *interp, Jim_Obj *objPtr) { - JIM_TRACE("UnicodeFreeInternalRep 0x%08x\n", (DWORD)objPtr); - Jim_Free(objPtr->internalRep.binaryValue.data); - objPtr->internalRep.binaryValue.data = NULL; + JIM_NOTUSED(interp); + + JIM_TRACE("UnicodeFreeInternalRep 0x%08x\n", (DWORD)objPtr); + Jim_Free(objPtr->internalRep.binaryValue.data); + objPtr->internalRep.binaryValue.data = NULL; objPtr->internalRep.binaryValue.len = 0; objPtr->typePtr = NULL; } @@ -247,6 +249,8 @@ Jim_ObjType ole32ObjType = { void Ole32FreeInternalRep(Jim_Interp *interp, Jim_Obj *objPtr) { + JIM_NOTUSED(interp); + IDispatch *p = Ole32_DispatchPtr(objPtr); ITypeInfo *t = Ole32_TypeInfoPtr(objPtr); JIM_TRACE("free ole32 object 0x%08x\n", (unsigned long)p); @@ -259,6 +263,8 @@ Ole32FreeInternalRep(Jim_Interp *interp, Jim_Obj *objPtr) void Ole32DupInternalRep(Jim_Interp *interp, Jim_Obj *srcPtr, Jim_Obj *dupPtr) { + JIM_NOTUSED(interp); + IDispatch *p = Ole32_DispatchPtr(srcPtr); JIM_TRACE("dup ole32 object 0x%08x from 0x%08x to 0x%08x\n", p, srcPtr, dupPtr); Ole32_DispatchPtr(dupPtr) = p; @@ -326,21 +332,24 @@ static int Jim_GetIndexFromObj(Jim_Interp *interp, Jim_Obj *objPtr, const char **tablePtr, const char *msg, int flags, int *indexPtr) { - const char **entryPtr = NULL; - const char *p1, *p2; - const char *key = Jim_GetString(objPtr, NULL); - int i; - *indexPtr = -1; - for (entryPtr = tablePtr, i = 0; *entryPtr != NULL; entryPtr++, i++) { - for (p1 = key, p2 = *entryPtr; *p1 == *p2; p1++, p2++) { - if (*p1 == '\0') { - *indexPtr = i; - return JIM_OK; - } - } - } - Jim_SetResultString(interp, "needs a better message", -1); - return JIM_ERR; + JIM_NOTUSED(msg); + JIM_NOTUSED(flags); + + const char **entryPtr = NULL; + const char *p1, *p2; + const char *key = Jim_GetString(objPtr, NULL); + int i; + *indexPtr = -1; + for (entryPtr = tablePtr, i = 0; *entryPtr != NULL; entryPtr++, i++) { + for (p1 = key, p2 = *entryPtr; *p1 == *p2; p1++, p2++) { + if (*p1 == '\0') { + *indexPtr = i; + return JIM_OK; + } + } + } + Jim_SetResultString(interp, "needs a better message", -1); + return JIM_ERR; } /* $object method|prop ?args...? */ |