home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 21 / AACD 21.iso / AACD / Programming / amigatalk / prelude / ByteArray.p < prev    next >
Encoding:
Text File  |  2001-02-28  |  1.0 KB  |  34 lines
  1. pTempVar <- <primitive 110 6 >
  2. <primitive 112 pTempVar 1  " new: " \
  3.   #( #[ 16r21 16rFA 16r01 16r74 16rF3 16rF5] \
  4.     #(  )) >
  5.  
  6. <primitive 112 pTempVar 2  " size " \
  7.   #( #[ 16r20 16rFA 16r01 16r75 16rF3 16rF5] \
  8.     #(  )) >
  9.  
  10. <primitive 112 pTempVar 3  " displayBytes: " \
  11.   #( #[ 16r05 16r16 16r20 16r21 16rFA 16r03 16rE5 16rF2 16rF5] \
  12.     #(  )) >
  13.  
  14. <primitive 112 pTempVar 4  " printString " \
  15.   #( #[ 16r30 16r71 16r51 16r20 16rA3 16rB2 16rE1 16r02 16r0D 16r21 16r20 \
  16.         16r22 16rB1 16rA9 16r0B 16r12 16r31 16r0B 16r12 16rF1 16r71 \
  17.         16rF3 16rB3 16rF2 16r21 16r32 16r0B 16r12 16rF3 16rF5] \
  18.     #( '#[ ' ' ' ']'  )) >
  19.  
  20. <primitive 112 pTempVar 5  " at:put: " \
  21.   #( #[ 16r20 16r21 16r22 16rFA 16r03 16r77 16rF2 16rF5] \
  22.     #(  )) >
  23.  
  24. <primitive 112 pTempVar 6  " at: " \
  25.   #( #[ 16r20 16r21 16rFA 16r02 16r76 16rF3 16rF5] \
  26.     #(  )) >
  27.  
  28. <primitive 98 #ByteArray \
  29.   <primitive 97 #ByteArray #ArrayedCollection #AmigaTalk:General/ByteArray.st \
  30.    #(  ) \
  31.    #( #new: #size #displayBytes: #printString #at:put: #at:  ) \
  32.   pTempVar 3 6 >>
  33.  
  34.