equal
deleted
inserted
replaced
1557 "report an error that some unicode-codePoint cannot be represented by this encoder" |
1557 "report an error that some unicode-codePoint cannot be represented by this encoder" |
1558 |
1558 |
1559 |badCodePoint sender| |
1559 |badCodePoint sender| |
1560 |
1560 |
1561 sender := thisContext sender. |
1561 sender := thisContext sender. |
1562 ((sender selector == #encode:) or:[sender selector == #decode:]) ifFalse:[ |
1562 ((sender selector == #encode:) or:[sender selector == #decode:]) ifTrue:[ |
1563 badCodePoint := sender methodHome argAt:1 |
1563 badCodePoint := sender methodHome argAt:1 |
1564 ]. |
1564 ]. |
1565 ^ (EncodingError new) |
1565 ^ (EncodingError new) |
1566 defaultValue:(self defaultEncoderValue); |
1566 defaultValue:(self defaultEncoderValue); |
1567 parameter:badCodePoint; |
1567 parameter:badCodePoint; |
1568 messageText:'unrepresentable code (some character cannot be represented)'; |
1568 messageText:'unrepresentable code (some character cannot be represented)'; |
1569 suspendedContext:sender; |
1569 suspendedContext:sender; |
1570 raiseRequest |
1570 raiseRequest |
1571 |
1571 |
1572 "Modified: / 12-07-2012 / 20:36:37 / cg" |
1572 "Modified: / 12-07-2012 / 20:36:37 / cg" |
|
1573 "Modified: / 10-01-2020 / 15:31:46 / Stefan Vogel" |
1573 ! ! |
1574 ! ! |
1574 |
1575 |
1575 !CharacterEncoder methodsFor:'printing'! |
1576 !CharacterEncoder methodsFor:'printing'! |
1576 |
1577 |
1577 printOn:aStream |
1578 printOn:aStream |