Add local unnamed address kinds

Author: CodaFi

Sources/LLVM/IRGlobal.swift

@@ -34,8 +34,8 @@ extension IRGlobal {
 
   /// Retrieves an indicator for the significance of a global value's address.
   public var unnamedAddressKind: UnnamedAddressKind {
-    get { return UnnamedAddressKind(llvm: LLVMHasUnnamedAddr(asLLVM()))  }
-    set { LLVMSetUnnamedAddr(asLLVM(), newValue.llvm) }
+    get { return UnnamedAddressKind(llvm: LLVMGetUnnamedAddress(asLLVM()))  }
+    set { LLVMSetUnnamedAddress(asLLVM(), newValue.llvm) }
   }
 
   /// Retrieves the COMDAT section for this global, if it exists.

Sources/LLVM/Linkage.swift

@@ -237,28 +237,29 @@ public enum UnnamedAddressKind {
   /// current module but it may or may not be significant to another module;
   /// only the content of the value is known to be significant within the
   /// current module.
-//  case local
+  case local
 
   /// Indicates that the address of this global value is not significant to the
   /// current module or any other module; only the content of the value
   /// is significant globally.
   case global
 
-  private static let unnamedAddressMapping: [UnnamedAddressKind: LLVMBool] = [
-    .none: LLVMBool(0),
-//    .local: LLVMBool(1),
-    .global: LLVMBool(1),
-    ]
+  private static let unnamedAddressMapping: [UnnamedAddressKind: LLVMUnnamedAddr] = [
+    .none: LLVMNoUnnamedAddr,
+    .local: LLVMLocalUnnamedAddr,
+    .global: LLVMGlobalUnnamedAddr,
+  ]
 
-  internal init(llvm: LLVMBool) {
+  internal init(llvm: LLVMUnnamedAddr) {
     switch llvm {
-    case 0: self = .none
-    case 1: self = .global
+    case LLVMNoUnnamedAddr: self = .none
+    case LLVMLocalUnnamedAddr: self = .local
+    case LLVMGlobalUnnamedAddr: self = .global
     default: fatalError("unknown unnamed address kind \(llvm)")
     }
   }
 
-  internal var llvm: LLVMBool {
+  internal var llvm: LLVMUnnamedAddr {
     return UnnamedAddressKind.unnamedAddressMapping[self]!
   }
 }