diff options
author | Steve Bennett <steveb@workware.net.au> | 2010-01-24 10:26:24 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2010-10-15 11:02:38 +1000 |
commit | 1df9b19429212012b245a88b08ab37caef564d1c (patch) | |
tree | e48d6153d5cde43723f2729d92e0b75d7e848ea1 /jim.h | |
parent | c4ec906079ac99fe52e8c4b27036ca0f2495848f (diff) | |
download | jimtcl-1df9b19429212012b245a88b08ab37caef564d1c.zip jimtcl-1df9b19429212012b245a88b08ab37caef564d1c.tar.gz jimtcl-1df9b19429212012b245a88b08ab37caef564d1c.tar.bz2 |
Implement some new features
Implement 'lreplace'
Implement 'string last'
Implement 'pid'
Implement 'info procs'
Implement 'info script'
Implement 'info patchlevel' as an alias for 'info version'
Implement syslog extensions for jim
Fix return code display in jim-interactive.c
Make jim more compatible if JIM_TCL_COMPAT is set
*: Use tcl_interactive rather than jim_interactive
*: Use auto_path rather than jim_libpath
Add "." to the lib search path, not "./"
Fix a couple of files with CRLF line endings
Diffstat (limited to 'jim.h')
-rw-r--r-- | jim.h | 10 |
1 files changed, 9 insertions, 1 deletions
@@ -175,6 +175,14 @@ extern "C" { #define JIM_NL "\n" #endif +#ifdef JIM_TCL_COMPAT +#define JIM_LIBPATH "auto_path" +#define JIM_INTERACTIVE "tcl_interactive" +#else +#define JIM_LIBPATH "jim_libpath" +#define JIM_INTERACTIVE "jim_interactive" +#endif + /* ----------------------------------------------------------------------------- * Stack * ---------------------------------------------------------------------------*/ @@ -495,7 +503,7 @@ typedef struct Jim_Interp { structure. */ Jim_Obj *liveList; /* Linked list of all the live objects. */ Jim_Obj *freeList; /* Linked list of all the unused objects. */ - const char *scriptFileName; /* File name of the script currently in execution. */ + Jim_Obj *currentScriptObj; /* Script currently in execution. */ Jim_Obj *emptyObj; /* Shared empty string object. */ unsigned jim_wide referenceNextId; /* Next id for reference. */ struct Jim_HashTable references; /* References hash table. */ |