extensions.st
changeset 22 789a35bd30ac
parent 16 23e82cf19788
child 24 7e7ddd55174c
--- a/extensions.st	Fri Aug 07 14:10:48 2015 +0100
+++ b/extensions.st	Sat Aug 08 04:43:00 2015 +0100
@@ -1,5 +1,49 @@
 "{ Package: 'jv:llvm_s' }"!
 
+!Object methodsFor:'converting'!
+
+asLLVMValue
+    "Return representation of the receiver as LLVMValue."
+
+    "Raise an error - arbitrary object cannot be represented
+     as LLVM value"
+    self error: 'cannot be converted to an LLVM value'
+
+    "Created: / 08-08-2015 / 02:11:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!Object methodsFor:'converting'!
+
+asLLVMValueOfType: anLLVMType
+    "Return representation of the receiver as LLVMValue with given LLVMType. 
+     If the object cannot be converted to the balue of requested type, 
+     raise an error."
+
+    self error: 'cannot be converted to an LLVM value'
+
+    "Created: / 08-08-2015 / 02:27:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!Object methodsFor:'testing'!
+
+isLLVMType
+    "Return true, if receiver represents an LLVM type"
+
+    ^ false
+
+    "Created: / 08-08-2015 / 02:45:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!Object methodsFor:'testing'!
+
+isLLVMValue
+    "Return true, if receiver represents an LLVM value"
+
+    ^ false
+
+    "Created: / 08-08-2015 / 02:21:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !SequenceableCollection methodsFor:'converting'!
 
 asLLVMObjectArray