Smalltalk interchangeVersion: '1.0'! ByteArray classMethod! createInstanceOf: aClass withSixxElement: sixxElement | col | col := Array readFrom: (ReadStream on: (SixxXmlUtil characterDataFrom: sixxElement)). ^self withAll: col! Annotation key: 'category' value: 'instance creation-sixx'! Annotation key: 'stamp' value: 'mu 6/24/2003 21:29'!