diff options
author | Steve Bennett <steveb@workware.net.au> | 2011-06-14 10:02:05 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2011-07-07 21:29:45 +1000 |
commit | c9e7972f4149bff92c53d26fa408370cac6f39be (patch) | |
tree | 577e59ebfe7aefcddb143281b83b22e99282b0cc | |
parent | a9abe53c6e9fce27248126b6475467b26493150e (diff) | |
download | jimtcl-c9e7972f4149bff92c53d26fa408370cac6f39be.zip jimtcl-c9e7972f4149bff92c53d26fa408370cac6f39be.tar.gz jimtcl-c9e7972f4149bff92c53d26fa408370cac6f39be.tar.bz2 |
Use memset() when creating a new interp
Signed-off-by: Steve Bennett <steveb@workware.net.au>
-rw-r--r-- | jim.c | 22 |
1 files changed, 2 insertions, 20 deletions
@@ -4853,33 +4853,16 @@ Jim_Interp *Jim_CreateInterp(void) { Jim_Interp *i = Jim_Alloc(sizeof(*i)); - i->errorLine = 0; + memset(i, 0, sizeof(*i)); + i->errorFileName = Jim_StrDup(""); - i->addStackTrace = 0; i->maxNestingDepth = JIM_MAX_NESTING_DEPTH; - i->returnCode = JIM_OK; - i->returnLevel = 0; - i->exitCode = 0; - i->procEpoch = 0; - i->callFrameEpoch = 0; - i->liveList = i->freeList = NULL; - i->referenceNextId = 0; - i->lastCollectId = 0; i->lastCollectTime = time(NULL); - i->freeFramesList = NULL; - i->prngState = NULL; - i->id = 0; - i->sigmask = 0; - i->signal_level = 0; - i->signal_set_result = NULL; - i->localProcs = NULL; - i->loadHandles = NULL; /* Note that we can create objects only after the * interpreter liveList and freeList pointers are * initialized to NULL. */ Jim_InitHashTable(&i->commands, &JimCommandsHashTableType, i); - i->local = 0; #ifdef JIM_REFERENCES Jim_InitHashTable(&i->references, &JimReferencesHashTableType, i); #endif @@ -4893,7 +4876,6 @@ Jim_Interp *Jim_CreateInterp(void) i->result = i->emptyObj; i->stackTrace = Jim_NewListObj(i, NULL, 0); i->unknown = Jim_NewStringObj(i, "unknown", -1); - i->unknown_called = 0; i->errorProc = i->emptyObj; i->currentScriptObj = Jim_NewEmptyStringObj(i); Jim_IncrRefCount(i->emptyObj); |