chiark
/
gitweb
/
~ian
/
chiark-tcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
adns wip
[chiark-tcl.git]
/
base
/
idtable.c
diff --git
a/base/idtable.c
b/base/idtable.c
index d2f3e04a59040ea2961d0a7ac6c4a81a503406b5..ed5e5e61287144ecfcce1e0b2c587abd4f731af6 100644
(file)
--- a/
base/idtable.c
+++ b/
base/idtable.c
@@
-110,7
+110,7
@@
static void tabledataid_nt_ustr(Tcl_Obj *o) {
char buf[75];
const char *prefix;
char buf[75];
const char *prefix;
- prefix=
o->internalRep.twoPtrValue.ptr2
;
+ prefix=
((IdDataTable*)o->internalRep.twoPtrValue.ptr1)->prefix
;
snprintf(buf,sizeof(buf), "%lu",
*(unsigned long*)o->internalRep.twoPtrValue.ptr2);
obj_updatestr_vstringls(o,
snprintf(buf,sizeof(buf), "%lu",
*(unsigned long*)o->internalRep.twoPtrValue.ptr2);
obj_updatestr_vstringls(o,