diff options
author | Steve Bennett <steveb@workware.net.au> | 2011-12-03 15:14:32 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2011-12-08 12:48:34 +1000 |
commit | 36f3914f03a1330895df1f3a35873768fc50891a (patch) | |
tree | 08a80f4ca416a03c0d6aed3d802b9d068bf6ca08 | |
parent | b61d3b0f8f60992e4e2733061573e3c7c3c3d40e (diff) | |
download | jimtcl-36f3914f03a1330895df1f3a35873768fc50891a.zip jimtcl-36f3914f03a1330895df1f3a35873768fc50891a.tar.gz jimtcl-36f3914f03a1330895df1f3a35873768fc50891a.tar.bz2 |
Fix a bug in Jim_ListAppendList()
Need to ensure that value to be appended is in list form
Signed-off-by: Steve Bennett <steveb@workware.net.au>
-rw-r--r-- | jim.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -6217,6 +6217,7 @@ void Jim_ListAppendList(Jim_Interp *interp, Jim_Obj *listPtr, Jim_Obj *appendLis { JimPanic((Jim_IsShared(listPtr), "Jim_ListAppendList called with shared object")); SetListFromAny(interp, listPtr); + SetListFromAny(interp, appendListPtr); Jim_InvalidateStringRep(listPtr); ListAppendList(listPtr, appendListPtr); } |