diff options
author | antirez <antirez> | 2005-03-04 15:37:54 +0000 |
---|---|---|
committer | antirez <antirez> | 2005-03-04 15:37:54 +0000 |
commit | 8c274cd82000026b9c1ad0e0e9ad5378f2c0d800 (patch) | |
tree | c7d96ca9f8f655811ec192feee0eed75d18ee608 | |
parent | 5817ec309eec01ffedc66cbc58cbcaf461b230da (diff) | |
download | jimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.zip jimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.tar.gz jimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.tar.bz2 |
JIM_NOTUSED moved after var declarations blocks.
-rw-r--r-- | jim-posix.c | 4 | ||||
-rw-r--r-- | jim-win32.c | 8 | ||||
-rw-r--r-- | jim-win32com.c | 14 | ||||
-rw-r--r-- | jim.c | 8 |
4 files changed, 17 insertions, 17 deletions
diff --git a/jim-posix.c b/jim-posix.c index 3e27408..76129c7 100644 --- a/jim-posix.c +++ b/jim-posix.c @@ -1,7 +1,7 @@ /* Jim - POSIX extension * Copyright 2005 Salvatore Sanfilippo <antirez@invece.org> * - * $Id: jim-posix.c,v 1.8 2005/03/04 12:32:21 antirez Exp $ + * $Id: jim-posix.c,v 1.9 2005/03/04 15:37:54 antirez Exp $ * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. @@ -37,8 +37,8 @@ static void Jim_PosixSetError(Jim_Interp *interp) static int Jim_PosixForkCommand(Jim_Interp *interp, int argc, Jim_Obj *const *argv) { - JIM_NOTUSED(argv); pid_t pid; + JIM_NOTUSED(argv); if (argc != 1) { Jim_WrongNumArgs(interp, 1, argv, ""); diff --git a/jim-win32.c b/jim-win32.c index 600b4e7..4080b86 100644 --- a/jim-win32.c +++ b/jim-win32.c @@ -2,7 +2,7 @@ * * Copyright (C) 2005 Pat Thoyts <patthoyts@users.sourceforge.net> * - * $Id: jim-win32.c,v 1.15 2005/03/04 12:32:21 antirez Exp $ + * $Id: jim-win32.c,v 1.16 2005/03/04 15:37:54 antirez Exp $ * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. @@ -324,12 +324,12 @@ Win32_GetTickCount(Jim_Interp *interp, int objc, Jim_Obj *const *objv) static int Win32_GetSystemTime(Jim_Interp *interp, int objc, Jim_Obj *const *objv) { - JIM_NOTUSED(objc); - JIM_NOTUSED(objv); - Jim_Obj *a[16]; size_t n = 0; SYSTEMTIME t; + JIM_NOTUSED(objc); + JIM_NOTUSED(objv); + GetSystemTime(&t); #define JIMADD(name) \ diff --git a/jim-win32com.c b/jim-win32com.c index 338792f..dda504d 100644 --- a/jim-win32com.c +++ b/jim-win32com.c @@ -2,7 +2,7 @@ * * Windows COM extension. * - * $Id: jim-win32com.c,v 1.13 2005/03/04 12:32:21 antirez Exp $ + * $Id: jim-win32com.c,v 1.14 2005/03/04 15:37:54 antirez Exp $ * * Example: * load jim-win32com @@ -251,10 +251,10 @@ 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_NOTUSED(interp); + JIM_TRACE("free ole32 object 0x%08x\n", (unsigned long)p); p->lpVtbl->Release(p), p = NULL; if (t != NULL) @@ -265,9 +265,9 @@ Ole32FreeInternalRep(Jim_Interp *interp, Jim_Obj *objPtr) void Ole32DupInternalRep(Jim_Interp *interp, Jim_Obj *srcPtr, Jim_Obj *dupPtr) { + IDispatch *p = Ole32_DispatchPtr(srcPtr); 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; p->lpVtbl->AddRef(p); @@ -334,13 +334,13 @@ static int Jim_GetIndexFromObj(Jim_Interp *interp, Jim_Obj *objPtr, const char **tablePtr, const char *msg, int flags, int *indexPtr) { - JIM_NOTUSED(msg); - JIM_NOTUSED(flags); - const char **entryPtr = NULL; const char *p1, *p2; const char *key = Jim_GetString(objPtr, NULL); int i; + JIM_NOTUSED(msg); + JIM_NOTUSED(flags); + *indexPtr = -1; for (entryPtr = tablePtr, i = 0; *entryPtr != NULL; entryPtr++, i++) { for (p1 = key, p2 = *entryPtr; *p1 == *p2; p1++, p2++) { @@ -1,7 +1,7 @@ /* Jim - A small embeddable Tcl interpreter * Copyright 2005 Salvatore Sanfilippo <antirez@invece.org> * - * $Id: jim.c,v 1.54 2005/03/04 15:33:09 antirez Exp $ + * $Id: jim.c,v 1.55 2005/03/04 15:37:54 antirez Exp $ * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. @@ -847,9 +847,9 @@ static unsigned int JimStringCopyHTHashFunction(const void *key) static const void *JimStringCopyHTKeyDup(void *privdata, const void *key) { - JIM_NOTUSED(privdata); int len = strlen(key); char *copy = Jim_Alloc(len+1); + JIM_NOTUSED(privdata); memcpy(copy, key, len); copy[len] = '\0'; @@ -3291,8 +3291,8 @@ unsigned int JimReferencesHTDoubleHashFunction(const void *key) const void *JimReferencesHTKeyDup(void *privdata, const void *key) { - JIM_NOTUSED(privdata); void *copy = Jim_Alloc(sizeof(jim_wide)); + JIM_NOTUSED(privdata); memcpy(copy, key, sizeof(jim_wide)); return copy; @@ -4106,8 +4106,8 @@ void FreeListInternalRep(Jim_Interp *interp, Jim_Obj *objPtr) void DupListInternalRep(Jim_Interp *interp, Jim_Obj *srcPtr, Jim_Obj *dupPtr) { - JIM_NOTUSED(interp); int i; + JIM_NOTUSED(interp); dupPtr->internalRep.listValue.len = srcPtr->internalRep.listValue.len; dupPtr->internalRep.listValue.maxLen = |