aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorantirez <antirez>2005-03-04 15:37:54 +0000
committerantirez <antirez>2005-03-04 15:37:54 +0000
commit8c274cd82000026b9c1ad0e0e9ad5378f2c0d800 (patch)
treec7d96ca9f8f655811ec192feee0eed75d18ee608
parent5817ec309eec01ffedc66cbc58cbcaf461b230da (diff)
downloadjimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.zip
jimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.tar.gz
jimtcl-8c274cd82000026b9c1ad0e0e9ad5378f2c0d800.tar.bz2
JIM_NOTUSED moved after var declarations blocks.
-rw-r--r--jim-posix.c4
-rw-r--r--jim-win32.c8
-rw-r--r--jim-win32com.c14
-rw-r--r--jim.c8
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++) {
diff --git a/jim.c b/jim.c
index 4f007a5..9077330 100644
--- a/jim.c
+++ b/jim.c
@@ -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 =