asm/AJData.st
changeset 23 d2d9a2d4d6bf
parent 3 483729eb4432
equal deleted inserted replaced
22:9ee423bb2e37 23:d2d9a2d4d6bf
       
     1 "
       
     2     Copyright (c) 2012-2016 Igor Stasenko
       
     3                             Martin McClure
       
     4                             Damien Pollet
       
     5                             Camillo Bruni
       
     6                             Guido Chari
       
     7                    2016-now Jan Vrany <jan.vrany [at] fit . cvut . cz>
       
     8 
       
     9     Permission is hereby granted, free of charge, to any person obtaining a copy
       
    10     of this software and associated documentation files (the 'Software'), to deal
       
    11     in the Software without restriction, including without limitation the rights
       
    12     to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
       
    13     copies of the Software, and to permit persons to whom the Software is
       
    14     furnished to do so, subject to the following conditions:
       
    15 
       
    16     The above copyright notice and this permission notice shall be included in all
       
    17     copies or substantial portions of the Software.
       
    18 
       
    19     THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
       
    20     IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
       
    21     FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
       
    22     AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
       
    23     LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
       
    24     OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
       
    25     SOFTWARE.
       
    26 "
     1 "{ Package: 'jv:dragonfly/asm' }"
    27 "{ Package: 'jv:dragonfly/asm' }"
     2 
    28 
     3 "{ NameSpace: Smalltalk }"
    29 "{ NameSpace: Smalltalk }"
     4 
    30 
     5 AJInstruction subclass:#AJData
    31 AJInstruction subclass:#AJData
    24 	asm dw: #[16r78 16r56 16r34 16r12].
    50 	asm dw: #[16r78 16r56 16r34 16r12].
    25 	
    51 	
    26 	"add a arbitrary sized data section with a byteArray"
    52 	"add a arbitrary sized data section with a byteArray"
    27 	asm data: #[1 2 3 4 5 6 7 8 9 10 11 12 ].'
    53 	asm data: #[1 2 3 4 5 6 7 8 9 10 11 12 ].'
    28 !
    54 !
       
    55 
       
    56 !AJData class methodsFor:'documentation'!
       
    57 
       
    58 copyright
       
    59 "
       
    60     Copyright (c) 2012-2016 Igor Stasenko
       
    61                             Martin McClure
       
    62                             Damien Pollet
       
    63                             Camillo Bruni
       
    64                             Guido Chari
       
    65                    2016-now Jan Vrany <jan.vrany [at] fit . cvut . cz>
       
    66 
       
    67     Permission is hereby granted, free of charge, to any person obtaining a copy
       
    68     of this software and associated documentation files (the 'Software'), to deal
       
    69     in the Software without restriction, including without limitation the rights
       
    70     to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
       
    71     copies of the Software, and to permit persons to whom the Software is
       
    72     furnished to do so, subject to the following conditions:
       
    73 
       
    74     The above copyright notice and this permission notice shall be included in all
       
    75     copies or substantial portions of the Software.
       
    76 
       
    77     THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
       
    78     IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
       
    79     FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
       
    80     AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
       
    81     LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
       
    82     OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
       
    83     SOFTWARE.
       
    84 
       
    85 "
       
    86 ! !
    29 
    87 
    30 !AJData class methodsFor:'instance creation'!
    88 !AJData class methodsFor:'instance creation'!
    31 
    89 
    32 byte: aByteValue
    90 byte: aByteValue
    33     ^ self data: (ByteArray with: aByteValue)
    91     ^ self data: (ByteArray with: aByteValue)
    98 
   156 
    99 accept: anObject
   157 accept: anObject
   100     anObject instructionData: self
   158     anObject instructionData: self
   101 ! !
   159 ! !
   102 
   160 
       
   161 !AJData class methodsFor:'documentation'!
       
   162 
       
   163 version_HG
       
   164 
       
   165     ^ '$Changeset: <not expanded> $'
       
   166 ! !
       
   167