# HG changeset patch
# User Jan Vrany <jan.vrany@fit.cvut.cz>
# Date 1439548109 -3600
# Node ID cc6b765ad420fa45c28242a20a74d35031c41f1e
# Parent  86de1611e013fbe2c2eb36c16dd7cf4dda4e179e
Fix in LLVM C API and C API Extensions mappings: map LLVMBool to #bool FFI type. Correctly map LLVMModuleRef to LLVMModule.

diff -r 86de1611e013 -r cc6b765ad420 Cface__LLVM_C.st
--- a/Cface__LLVM_C.st	Fri Aug 14 11:27:03 2015 +0100
+++ b/Cface__LLVM_C.st	Fri Aug 14 11:28:29 2015 +0100
@@ -48,6 +48,22 @@
 
 !LLVM_C methodsFor:'accessing'!
 
+definitions:definitionFile
+    super definitions:definitionFile.
+
+    "/ A hack to map LLVMBool to #bool FFIT type
+
+    definitionFile definitions do:[:each | 
+        (each isKindOf: CTypedefNode) ifTrue:[
+            each cName = 'LLVMBool' ifTrue:[ 
+                each type: CBoolNode new 
+            ].                                           
+        ]
+    ]
+
+    "Created: / 14-08-2015 / 11:13:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 smalltalkPackage
 
     ^#'jv:llvm_s'
diff -r 86de1611e013 -r cc6b765ad420 Cface__LLVM_C_EXT.st
--- a/Cface__LLVM_C_EXT.st	Fri Aug 14 11:27:03 2015 +0100
+++ b/Cface__LLVM_C_EXT.st	Fri Aug 14 11:28:29 2015 +0100
@@ -61,6 +61,9 @@
             each cName = 'LLVMValueRef' ifTrue:[ 
                 each smalltalkName: #LLVMValue
             ].            
+            each cName = 'LLVMModuleRef' ifTrue:[ 
+                each smalltalkName: #LLVMModule
+            ].            
         ].
     ].