14 lines
180 B
Smalltalk
14 lines
180 B
Smalltalk
|
#class(#byte) ByteArray(Collection)
|
||
|
|
{
|
||
|
|
#method at: anInteger
|
||
|
|
{
|
||
|
|
^self basicAt: anInteger.
|
||
|
|
}
|
||
|
|
|
||
|
|
#method at: anInteger put: aValue
|
||
|
|
{
|
||
|
|
^self basicAt: anInteger put: aValue.
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|