Minor tweak to remove warnings

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4773 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2003-05-07 18:58:36 +00:00
commit 3e2ff820a4
2 changed files with 2 additions and 2 deletions

View file

@ -94,7 +94,7 @@ DohStr(const DOH *obj) {
if (objinfo->doh_str) { if (objinfo->doh_str) {
return (objinfo->doh_str)(b); return (objinfo->doh_str)(b);
} }
sprintf(buffer,"<Object '%s' at %x>", objinfo->objname, (unsigned int)b); sprintf(buffer,"<Object '%s' at %p>", objinfo->objname, b);
return NewString(buffer); return NewString(buffer);
} else { } else {
return NewString(obj); return NewString(obj);

View file

@ -187,7 +187,7 @@ public:
// Following is a silly hack. It works around the limitation of // Following is a silly hack. It works around the limitation of
// DOH's hash tables that only work with string keys! // DOH's hash tables that only work with string keys!
char address[16]; char address[16];
sprintf(address, "%x%c", (unsigned int)obj, list_p ? 'L' : 'O'); sprintf(address, "%x%c", (unsigned long)obj, list_p ? 'L' : 'O');
DOH *placeholder = Getattr(print_circle_hash, address); DOH *placeholder = Getattr(print_circle_hash, address);
if (placeholder) { if (placeholder) {
Printv(out, placeholder, NIL); Printv(out, placeholder, NIL);