equal
deleted
inserted
replaced
31 type := aTType |
31 type := aTType |
32 |
32 |
33 "Created: / 31-08-2015 / 11:49:14 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
33 "Created: / 31-08-2015 / 11:49:14 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
34 ! ! |
34 ! ! |
35 |
35 |
|
36 !TValueBinding methodsFor:'accesssing - llvm'! |
|
37 |
|
38 llvmValue |
|
39 ^ self propertyAt: #llvmValue ifAbsent:[ nil ] |
|
40 |
|
41 "Created: / 23-09-2015 / 21:14:27 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
42 ! |
|
43 |
|
44 llvmValue: anLLVMValue |
|
45 self propertyAt: #llvmValue put: anLLVMValue |
|
46 |
|
47 "Created: / 23-09-2015 / 21:14:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
48 ! ! |
|
49 |