putlong(fd, l) long *l;
{
  char buf[4];
  buf[3] = *l >> 24;
  buf[2] = *l >> 16;
  buf[1] = *l >> 8;
  buf[0] = *l;
  if (write(fd, buf, 4) < 4)
    return -1;
  return 0;
}


x86 assembly (clang, -O0):
<putlong>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
sar    $0x18,%rax
mov    %al,-0x11(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
sar    $0x10,%rax
mov    %al,-0x12(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
sar    $0x8,%rax
mov    %al,-0x13(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %al,-0x14(%rbp)
mov    -0x8(%rbp),%edi
lea    -0x14(%rbp),%rsi
mov    $0x4,%edx
mov    $0x0,%al
call   1030 <write@plt>
cmp    $0x4,%eax
jge    117b <putlong+0x6b>
movl   $0xffffffff,-0x4(%rbp)
jmp    1182 <putlong+0x72>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<putlong>:
push   %rax
mov    (%rsi),%eax
mov    %eax,0x4(%rsp)
lea    0x4(%rsp),%rsi
mov    $0x4,%edx
xor    %eax,%eax
call   1030 <write@plt>
xor    %ecx,%ecx
cmp    $0x4,%eax
setl   %cl
neg    %ecx
mov    %ecx,%eax
pop    %rcx
ret

LLVM IR (-O0):
define i32 @putlong(i32 %0, i64* %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i64*
%6 = alloca [4 x i8]
store i32 %0, i32* %4
store i64* %1, i64** %5
%7 = load i64*, i64** %5
%8 = load i64, i64* %7
%9 = ashr i64 %8, 24
%10 = trunc i64 %9 to i8
%11 = getelementptr inbounds [4 x i8], [4 x i8]* %6, i64 0, i64 3
store i8 %10, i8* %11
%12 = load i64*, i64** %5
%13 = load i64, i64* %12
%14 = ashr i64 %13, 16
%15 = trunc i64 %14 to i8
%16 = getelementptr inbounds [4 x i8], [4 x i8]* %6, i64 0, i64 2
store i8 %15, i8* %16
%17 = load i64*, i64** %5
%18 = load i64, i64* %17
%19 = ashr i64 %18, 8
%20 = trunc i64 %19 to i8
%21 = getelementptr inbounds [4 x i8], [4 x i8]* %6, i64 0, i64 1
store i8 %20, i8* %21
%22 = load i64*, i64** %5
%23 = load i64, i64* %22
%24 = trunc i64 %23 to i8
%25 = getelementptr inbounds [4 x i8], [4 x i8]* %6, i64 0, i64 0
store i8 %24, i8* %25
%26 = load i32, i32* %4
%27 = getelementptr inbounds [4 x i8], [4 x i8]* %6, i64 0, i64 0
%28 = call i32 (i32, i8*, i32, ...) bitcast (i32 (...)* @write to i32 (i32, i8*, i32, ...)*)(i32 %26, i8* %27, i32 4)
%29 = icmp slt i32 %28, 4
br i1 %29, label %30, label %31
30: ; preds = %2
store i32 -1, i32* %3
br label %32
31: ; preds = %2
store i32 0, i32* %3
br label %32
32: ; preds = %31, %30
%33 = load i32, i32* %3
ret i32 %33
}

LLVM IR (-O2):
define i32 @putlong(i32 %0, i64* nocapture %1) {
%3 = alloca [4 x i8]
%4 = getelementptr inbounds [4 x i8], [4 x i8]* %3, i64 0, i64 0
%5 = load i64, i64* %1
%6 = lshr i64 %5, 24
%7 = trunc i64 %6 to i8
%8 = getelementptr inbounds [4 x i8], [4 x i8]* %3, i64 0, i64 3
store i8 %7, i8* %8
%9 = lshr i64 %5, 16
%10 = trunc i64 %9 to i8
%11 = getelementptr inbounds [4 x i8], [4 x i8]* %3, i64 0, i64 2
store i8 %10, i8* %11
%12 = lshr i64 %5, 8
%13 = trunc i64 %12 to i8
%14 = getelementptr inbounds [4 x i8], [4 x i8]* %3, i64 0, i64 1
store i8 %13, i8* %14
%15 = trunc i64 %5 to i8
store i8 %15, i8* %4
%16 = call i32 (i32, i8*, i32, ...) bitcast (i32 (...)* @write to i32 (i32, i8*, i32, ...)*)(i32 %0, i8* %4, i32 4)
%17 = icmp slt i32 %16, 4
%18 = sext i1 %17 to i32
ret i32 %18
}