Squeak
  links to this page:    
View this PageEdit this PageUploads to this PageHistory of this PageTop of the SwikiRecent ChangesSearch the SwikiHelp Guide
UTF16TextConverter
Last updated at 8:57 pm UTC on 11 December 2015


UTF16TextConverter
testByteOrders
	|converter originalText bytes decodedText |
	originalText := 'test'.
	converter := UTF16TextConverter new.
	
	"Default (ie useLittleEndian instvar nil)"
	bytes := (originalText convertToWithConverter: converter).
	decodedText := bytes convertFromWithConverter: converter.
	
	self assert: originalText equals: decodedText.
	
	"Little-endian"
	converter useLittleEndian: true.

	bytes := (originalText convertToWithConverter: converter).
	decodedText := bytes convertFromWithConverter: converter.
	
	self assert: originalText equals: decodedText.
	
	"Big-endian"
	converter useLittleEndian: false.

	bytes := (originalText convertToWithConverter: converter).
	decodedText := bytes convertFromWithConverter: converter.
	
	self assert: originalText equals: decodedText.