compiler/TConstantBinding.st
changeset 7 7556e3d41d80
parent 6 0c806a7f1888
child 10 2b9beeac547e
equal deleted inserted replaced
6:0c806a7f1888 7:7556e3d41d80
    20 
    20 
    21 !TConstantBinding methodsFor:'accessing'!
    21 !TConstantBinding methodsFor:'accessing'!
    22 
    22 
    23 value
    23 value
    24     ^ value
    24     ^ value
       
    25 ! !
       
    26 
       
    27 !TConstantBinding methodsFor:'converting'!
       
    28 
       
    29 asLLVMValueInModule: aLLVMModule
       
    30     value isInteger ifTrue:[ 
       
    31         ^ LLVMConstant sint: value type: (type asLLVMTypeInModule: aLLVMModule ).
       
    32     ].
       
    33     ^ self notYetImplemented
       
    34 
       
    35     "Created: / 03-09-2015 / 07:07:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    25 ! !
    36 ! !
    26 
    37 
    27 !TConstantBinding methodsFor:'initialization'!
    38 !TConstantBinding methodsFor:'initialization'!
    28 
    39 
    29 initializeWithValue: anObject
    40 initializeWithValue: anObject