LLVMMetadata.st
changeset 33 feabf14b6c1d
parent 29 6ea02617c9ab
child 41 e4cbc8e75207
equal deleted inserted replaced
32:1378060fadd6 33:feabf14b6c1d
    13 "
    13 "
    14 "{ Package: 'jv:llvm_s' }"
    14 "{ Package: 'jv:llvm_s' }"
    15 
    15 
    16 "{ NameSpace: Smalltalk }"
    16 "{ NameSpace: Smalltalk }"
    17 
    17 
    18 ExternalAddress subclass:#LLVMMetadata
    18 LLVMObject subclass:#LLVMMetadata
    19 	instanceVariableNames:''
    19 	instanceVariableNames:''
    20 	classVariableNames:''
    20 	classVariableNames:''
    21 	poolDictionaries:''
    21 	poolDictionaries:''
    22 	category:'LLVM-S-Core'
    22 	category:'LLVM-S-Core'
    23 !
    23 !
    38     This license is provisional and may (will) change in
    38     This license is provisional and may (will) change in
    39     a future.
    39     a future.
    40 "
    40 "
    41 ! !
    41 ! !
    42 
    42 
       
    43 !LLVMMetadata methodsFor:'converting'!
       
    44 
       
    45 asLLVMMetadata
       
    46     ^ self
       
    47 
       
    48     "Created: / 15-08-2015 / 06:41:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    49 !
       
    50 
       
    51 asLLVMValue
       
    52     ^ LLVMCEXT MetadataAsValue: self.
       
    53 
       
    54     "Created: / 14-08-2015 / 16:35:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    55 ! !
       
    56 
       
    57 !LLVMMetadata methodsFor:'testing'!
       
    58 
       
    59 isLLVMMetadata
       
    60     ^ true
       
    61 
       
    62     "Created: / 14-08-2015 / 08:51:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
    63 ! !
       
    64