Parent Directory | Revision Log | Patch
revision 1.206 by rms, Sat Jul 17 14:54:56 2004 UTC | revision 1.207 by kfstorm, Fri Nov 5 22:46:17 2004 UTC | |
---|---|---|
# | Line 2085 print_object (obj, printcharfun, escapef | Line 2085 print_object (obj, printcharfun, escapef |
2085 | PRINTCHAR ('>'); | PRINTCHAR ('>'); |
2086 | break; | break; |
2087 | ||
2088 | case Lisp_Misc_Save_Value: | |
2089 | strout ("#<save_value ", -1, -1, printcharfun, 0); | |
2090 | sprintf(buf, "ptr=0x%08x int=%d", | |
2091 | (unsigned long) XSAVE_VALUE (obj)->pointer, | |
2092 | XSAVE_VALUE (obj)->integer); | |
2093 | strout (buf, -1, -1, printcharfun, 0); | |
2094 | PRINTCHAR ('>'); | |
2095 | break; | |
2096 | ||
2097 | default: | default: |
2098 | goto badtype; | goto badtype; |
2099 | } | } |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |