equal
deleted
inserted
replaced
299 |
299 |
300 ^ super inspectorExtraAttributes |
300 ^ super inspectorExtraAttributes |
301 add:'-hexstring' -> [ self hexPrintString "WithSeparator:Character space" ]; |
301 add:'-hexstring' -> [ self hexPrintString "WithSeparator:Character space" ]; |
302 add:'-hexadecimal' -> [ basePrinter value:self value:16 ]; |
302 add:'-hexadecimal' -> [ basePrinter value:self value:16 ]; |
303 add:'-binary' -> [ basePrinter value:self value:2 ]; |
303 add:'-binary' -> [ basePrinter value:self value:2 ]; |
|
304 add:'-asciiString' -> [ self asString ]; |
304 yourself |
305 yourself |
305 ! ! |
306 ! ! |
306 |
307 |
307 !Change methodsFor:'private'! |
308 !Change methodsFor:'private'! |
308 |
309 |