unsigned long insert_fxm(unsigned long insn, long value, int dialect,
                         const char **errmsg) {
  if ((insn & (1 << 20)) != 0) {
    if (value == 0 || (value & -value) != value) {
      *errmsg = "invalid mask field";
      value = 0;
    }
  } else if (value == 0)
    ;
  else if ((value & -value) == value &&
           ((dialect & 0x4000) != 0 ||
            ((dialect & 0x80) != 0 && (insn & (0x3ff << 1)) == 19 << 1)))
    insn |= 1 << 20;
  else if ((insn & (0x3ff << 1)) == 19 << 1) {
    *errmsg = "ignoring invalid mfcr mask";
    value = 0;
  }
  return insn | ((value & 0xff) << 12);
}


x86 assembly (clang, -O0):
<insert_fxm>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
and    $0x100000,%rax
cmp    $0x0,%rax
je     1164 <insert_fxm+0x64>
cmpq   $0x0,-0x10(%rbp)
je     1149 <insert_fxm+0x49>
mov    -0x10(%rbp),%rax
xor    %ecx,%ecx
sub    -0x10(%rbp),%rcx
and    %rcx,%rax
cmp    -0x10(%rbp),%rax
je     115f <insert_fxm+0x5f>
mov    -0x20(%rbp),%rax
lea    0xeac(%rip),%rcx
mov    %rcx,(%rax)
movq   $0x0,-0x10(%rbp)
jmp    120d <insert_fxm+0x10d>
cmpq   $0x0,-0x10(%rbp)
jne    1174 <insert_fxm+0x74>
jmp    1208 <insert_fxm+0x108>
mov    -0x10(%rbp),%rax
xor    %ecx,%ecx
sub    -0x10(%rbp),%rcx
and    %rcx,%rax
cmp    -0x10(%rbp),%rax
jne    11d4 <insert_fxm+0xd4>
mov    -0x14(%rbp),%eax
and    $0x4000,%eax
cmp    $0x0,%eax
jne    11c1 <insert_fxm+0xc1>
mov    -0x14(%rbp),%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     11d4 <insert_fxm+0xd4>
mov    -0x8(%rbp),%rax
and    $0x7fe,%rax
cmp    $0x26,%rax
jne    11d4 <insert_fxm+0xd4>
mov    -0x8(%rbp),%rax
or     $0x100000,%rax
mov    %rax,-0x8(%rbp)
jmp    1203 <insert_fxm+0x103>
mov    -0x8(%rbp),%rax
and    $0x7fe,%rax
cmp    $0x26,%rax
jne    11fe <insert_fxm+0xfe>
mov    -0x20(%rbp),%rax
lea    0xe20(%rip),%rcx
mov    %rcx,(%rax)
movq   $0x0,-0x10(%rbp)
jmp    1203 <insert_fxm+0x103>
jmp    1208 <insert_fxm+0x108>
jmp    120d <insert_fxm+0x10d>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
and    $0xff,%rcx
shl    $0xc,%rcx
or     %rcx,%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<insert_fxm>:
test   $0x100000,%edi
jne    113c <insert_fxm+0x3c>
test   %rsi,%rsi
je     116f <insert_fxm+0x6f>
lea    -0x1(%rsi),%rax
test   %rax,%rsi
jne    1159 <insert_fxm+0x59>
test   $0x4000,%edx
jne    1133 <insert_fxm+0x33>
mov    %edi,%eax
and    $0x7fe,%eax
cmp    $0x26,%rax
jne    1160 <insert_fxm+0x60>
and    $0x80,%edx
je     1160 <insert_fxm+0x60>
or     $0x100000,%rdi
jmp    1171 <insert_fxm+0x71>
lea    -0x1(%rsi),%rax
test   %rax,%rsi
sete   %al
test   %rsi,%rsi
setne  %dl
test   %al,%dl
jne    1171 <insert_fxm+0x71>
lea    0xea9(%rip),%rax
jmp    116c <insert_fxm+0x6c>
mov    %edi,%eax
and    $0x7fe,%eax
cmp    $0x26,%eax
jne    1171 <insert_fxm+0x71>
lea    0xea7(%rip),%rax
mov    %rax,(%rcx)
xor    %esi,%esi
movzbl %sil,%eax
shl    $0xc,%rax
or     %rdi,%rax
ret

LLVM IR (-O0):
@.str = [19 x i8] c"invalid mask field\00"
@.str.1 = [27 x i8] c"ignoring invalid mfcr mask\00"
define i64 @insert_fxm(i64 %0, i64 %1, i32 %2, i8** %3) {
%5 = alloca i64
%6 = alloca i64
%7 = alloca i32
%8 = alloca i8**
store i64 %0, i64* %5
store i64 %1, i64* %6
store i32 %2, i32* %7
store i8** %3, i8*** %8
%9 = load i64, i64* %5
%10 = and i64 %9, 1048576
%11 = icmp ne i64 %10, 0
br i1 %11, label %12, label %25
12: ; preds = %4
%13 = load i64, i64* %6
%14 = icmp eq i64 %13, 0
br i1 %14, label %22, label %15
15: ; preds = %12
%16 = load i64, i64* %6
%17 = load i64, i64* %6
%18 = sub nsw i64 0, %17
%19 = and i64 %16, %18
%20 = load i64, i64* %6
%21 = icmp ne i64 %19, %20
br i1 %21, label %22, label %24
22: ; preds = %15, %12
%23 = load i8**, i8*** %8
store i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0), i8** %23
store i64 0, i64* %6
br label %24
24: ; preds = %22, %15
br label %60
25: ; preds = %4
%26 = load i64, i64* %6
%27 = icmp eq i64 %26, 0
br i1 %27, label %28, label %29
28: ; preds = %25
br label %59
29: ; preds = %25
%30 = load i64, i64* %6
%31 = load i64, i64* %6
%32 = sub nsw i64 0, %31
%33 = and i64 %30, %32
%34 = load i64, i64* %6
%35 = icmp eq i64 %33, %34
br i1 %35, label %36, label %51
36: ; preds = %29
%37 = load i32, i32* %7
%38 = and i32 %37, 16384
%39 = icmp ne i32 %38, 0
br i1 %39, label %48, label %40
40: ; preds = %36
%41 = load i32, i32* %7
%42 = and i32 %41, 128
%43 = icmp ne i32 %42, 0
br i1 %43, label %44, label %51
44: ; preds = %40
%45 = load i64, i64* %5
%46 = and i64 %45, 2046
%47 = icmp eq i64 %46, 38
br i1 %47, label %48, label %51
48: ; preds = %44, %36
%49 = load i64, i64* %5
%50 = or i64 %49, 1048576
store i64 %50, i64* %5
br label %58
51: ; preds = %44, %40, %29
%52 = load i64, i64* %5
%53 = and i64 %52, 2046
%54 = icmp eq i64 %53, 38
br i1 %54, label %55, label %57
55: ; preds = %51
%56 = load i8**, i8*** %8
store i8* getelementptr inbounds ([27 x i8], [27 x i8]* @.str.1, i64 0, i64 0), i8** %56
store i64 0, i64* %6
br label %57
57: ; preds = %55, %51
br label %58
58: ; preds = %57, %48
br label %59
59: ; preds = %58, %28
br label %60
60: ; preds = %59, %24
%61 = load i64, i64* %5
%62 = load i64, i64* %6
%63 = and i64 %62, 255
%64 = shl i64 %63, 12
%65 = or i64 %61, %64
ret i64 %65
}

LLVM IR (-O2):
@.str = [19 x i8] c"invalid mask field\00"
@.str.1 = [27 x i8] c"ignoring invalid mfcr mask\00"
define i64 @insert_fxm(i64 %0, i64 %1, i32 %2, i8** nocapture writeonly %3) {
%5 = and i64 %0, 1048576
%6 = icmp eq i64 %5, 0
br i1 %6, label %11, label %7
7: ; preds = %4
%8 = tail call i64 @llvm.ctpop.i64(i64 %1)
%9 = icmp eq i64 %8, 1
br i1 %9, label %33, label %10
10: ; preds = %7
store i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0), i8** %3
br label %33
11: ; preds = %4
%12 = icmp eq i64 %1, 0
br i1 %12, label %33, label %13
13: ; preds = %11
%14 = tail call i64 @llvm.ctpop.i64(i64 %1)
%15 = icmp ult i64 %14, 2
br i1 %15, label %18, label %16
16: ; preds = %13
%17 = and i64 %0, 2046
br label %29
18: ; preds = %13
%19 = and i32 %2, 16384
%20 = icmp eq i32 %19, 0
br i1 %20, label %21, label %27
21: ; preds = %18
%22 = and i32 %2, 128
%23 = icmp ne i32 %22, 0
%24 = and i64 %0, 2046
%25 = icmp eq i64 %24, 38
%26 = and i1 %25, %23
br i1 %26, label %27, label %29
27: ; preds = %21, %18
%28 = or i64 %0, 1048576
br label %33
29: ; preds = %16, %21
%30 = phi i64 [ %17, %16 ], [ %24, %21 ]
%31 = icmp eq i64 %30, 38
br i1 %31, label %32, label %33
32: ; preds = %29
store i8* getelementptr inbounds ([27 x i8], [27 x i8]* @.str.1, i64 0, i64 0), i8** %3
br label %33
33: ; preds = %7, %11, %29, %32, %27, %10
%34 = phi i64 [ 0, %10 ], [ 0, %11 ], [ %1, %27 ], [ 0, %32 ], [ %1, %29 ], [ %1, %7 ]
%35 = phi i64 [ %0, %10 ], [ %0, %11 ], [ %28, %27 ], [ %0, %32 ], [ %0, %29 ], [ %0, %7 ]
%36 = shl i64 %34, 12
%37 = and i64 %36, 1044480
%38 = or i64 %37, %35
ret i64 %38
}