diff options
author | antirez <antirez> | 2005-02-26 22:43:49 +0000 |
---|---|---|
committer | antirez <antirez> | 2005-02-26 22:43:49 +0000 |
commit | f7de4cb2a817aa17615cc31199a0a5abd621ad9d (patch) | |
tree | 2c4063ae4a8e5a6eccfb425e3883a638c27d4d10 | |
parent | 0e9b259b069b4eaa2bf214a11e5a7462159a1378 (diff) | |
download | jimtcl-f7de4cb2a817aa17615cc31199a0a5abd621ad9d.zip jimtcl-f7de4cb2a817aa17615cc31199a0a5abd621ad9d.tar.gz jimtcl-f7de4cb2a817aa17615cc31199a0a5abd621ad9d.tar.bz2 |
Pat's patch about callframe id type, strtoll casting and errno applied.
-rw-r--r-- | README | 9 | ||||
-rw-r--r-- | jim.c | 4 | ||||
-rw-r--r-- | jim.h | 2 |
3 files changed, 6 insertions, 9 deletions
@@ -7,13 +7,12 @@ Copyright (C) 2005 Salvatore Sanfilippo All Rights Reserved This software is under the APACHE 2.0 LICENSE -CREDITS +CREDITS (people that contributed source code/patches/ideas) -- Pat Thoyts that contributed WIN32/MVC portablity fixes. -- Clemens Hintze for fixes, suggestions, a better implementation - of the [if] command. +- Pat Thoyts +- Clemens Hintze -THANKS +ALSO THANKS TO: - Many people on the Tclers Chat that helped me to explore issues about the use and the implementation of the Tcl programming language. @@ -27,8 +27,6 @@ #include <errno.h> #include <time.h> -extern int errno; - #include "jim.h" #ifdef HAVE_BACKTRACE @@ -117,7 +115,7 @@ static jim_wide Jim_Strtoll(const char *nptr, char **endptr, register int base) qbase = (unsigned)base; cutoff = neg ? (unsigned jim_wide)-(LLONG_MIN + LLONG_MAX) + LLONG_MAX : LLONG_MAX; - cutlim = cutoff % qbase; + cutlim = (int)(cutoff % qbase); cutoff /= qbase; for (acc = 0, any = 0;; c = *s++) { if (!isascii(c)) @@ -292,7 +292,7 @@ typedef struct Jim_ObjType { /* Call frame */ typedef struct Jim_CallFrame { - unsigned int id; /* Call Frame ID. Used for caching. */ + unsigned jim_wide id; /* Call Frame ID. Used for caching. */ struct Jim_HashTable vars; struct Jim_CallFrame *parentCallFrame; Jim_Obj **argv; /* object vector of the current procedure call. */ |