#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */
typedef scalar_t__ uint8_t;

/* Variables and functions */
int write_petscii_digits(uint8_t *pet, int value, size_t len) {
  int digits;
  uint8_t *p = pet;
  while (value != 0 && (size_t)(p - pet) < len) {
    *p++ = (uint8_t)(value % 10 + '0');
    value /= 10;
  }
  digits = (int)(p - pet);
  p--;
  while (p > pet) {
    uint8_t b = *pet;
    *pet = *p;
    *p = b;
    pet++;
    p--;
  }
  return digits;
}


x86 assembly (clang, -O0):
<write_petscii_digits>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x28(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0xc(%rbp)
mov    %al,-0x31(%rbp)
je     113f <write_petscii_digits+0x3f>
mov    -0x28(%rbp),%rax
mov    -0x8(%rbp),%rcx
sub    %rcx,%rax
sar    $0x3,%rax
cmp    -0x18(%rbp),%rax
setb   %al
mov    %al,-0x31(%rbp)
mov    -0x31(%rbp),%al
test   $0x1,%al
jne    114f <write_petscii_digits+0x4f>
jmp    1185 <write_petscii_digits+0x85>
mov    -0xc(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
add    $0x30,%edx
movslq %edx,%rcx
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x8,%rdx
mov    %rdx,-0x28(%rbp)
mov    %rcx,(%rax)
mov    -0xc(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    %eax,-0xc(%rbp)
jmp    1117 <write_petscii_digits+0x17>
mov    -0x28(%rbp),%rax
mov    -0x8(%rbp),%rcx
sub    %rcx,%rax
sar    $0x3,%rax
mov    %eax,-0x1c(%rbp)
mov    -0x28(%rbp),%rax
add    $0xfffffffffffffff8,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x8(%rbp),%rax
jbe    11f2 <write_petscii_digits+0xf2>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
mov    (%rax),%rcx
mov    -0x8(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x30(%rbp),%rcx
mov    -0x28(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x8(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x8(%rbp)
mov    -0x28(%rbp),%rax
add    $0xfffffffffffffff8,%rax
mov    %rax,-0x28(%rbp)
jmp    11a3 <write_petscii_digits+0xa3>
mov    -0x1c(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<write_petscii_digits>:
mov    %rdi,%rax
test   %esi,%esi
je     115a <write_petscii_digits+0x5a>
xor    %eax,%eax
nopl   0x0(%rax)
mov    %rax,%rcx
sar    $0x3,%rcx
cmp    %rdx,%rcx
jae    1157 <write_petscii_digits+0x57>
movslq %esi,%r8
imul   $0x66666667,%r8,%r10
mov    %r10,%r9
shr    $0x3f,%r9
sar    $0x22,%r10
add    %r9d,%r10d
lea    (%r10,%r10,1),%ecx
lea    (%rcx,%rcx,4),%ecx
neg    %ecx
add    %esi,%ecx
add    $0x30,%ecx
mov    %rcx,(%rdi,%rax,1)
add    $0x9,%r8d
add    $0x8,%rax
mov    %r10d,%esi
cmp    $0x12,%r8d
ja     1110 <write_petscii_digits+0x10>
add    %rdi,%rax
lea    -0x8(%rax),%rcx
cmp    %rdi,%rcx
jbe    118e <write_petscii_digits+0x8e>
lea    0x8(%rdi),%rdx
nopw   0x0(%rax,%rax,1)
mov    -0x8(%rdx),%r8
mov    (%rcx),%rsi
mov    %rsi,-0x8(%rdx)
mov    %r8,(%rcx)
add    $0xfffffffffffffff8,%rcx
lea    0x8(%rdx),%rsi
cmp    %rdx,%rcx
mov    %rsi,%rdx
ja     1170 <write_petscii_digits+0x70>
sub    %rdi,%rax
shr    $0x3,%rax
ret

LLVM IR (-O0):
define i32 @write_petscii_digits(i64* %0, i32 %1, i64 %2) {
%4 = alloca i64*
%5 = alloca i32
%6 = alloca i64
%7 = alloca i32
%8 = alloca i64*
%9 = alloca i64
store i64* %0, i64** %4
store i32 %1, i32* %5
store i64 %2, i64* %6
%10 = load i64*, i64** %4
store i64* %10, i64** %8
br label %11
11: ; preds = %25, %3
%12 = load i32, i32* %5
%13 = icmp ne i32 %12, 0
br i1 %13, label %14, label %23
14: ; preds = %11
%15 = load i64*, i64** %8
%16 = load i64*, i64** %4
%17 = ptrtoint i64* %15 to i64
%18 = ptrtoint i64* %16 to i64
%19 = sub i64 %17, %18
%20 = sdiv exact i64 %19, 8
%21 = load i64, i64* %6
%22 = icmp ult i64 %20, %21
br label %23
23: ; preds = %14, %11
%24 = phi i1 [ false, %11 ], [ %22, %14 ]
br i1 %24, label %25, label %34
25: ; preds = %23
%26 = load i32, i32* %5
%27 = srem i32 %26, 10
%28 = add nsw i32 %27, 48
%29 = sext i32 %28 to i64
%30 = load i64*, i64** %8
%31 = getelementptr inbounds i64, i64* %30, i32 1
store i64* %31, i64** %8
store i64 %29, i64* %30
%32 = load i32, i32* %5
%33 = sdiv i32 %32, 10
store i32 %33, i32* %5
br label %11
34: ; preds = %23
%35 = load i64*, i64** %8
%36 = load i64*, i64** %4
%37 = ptrtoint i64* %35 to i64
%38 = ptrtoint i64* %36 to i64
%39 = sub i64 %37, %38
%40 = sdiv exact i64 %39, 8
%41 = trunc i64 %40 to i32
store i32 %41, i32* %7
%42 = load i64*, i64** %8
%43 = getelementptr inbounds i64, i64* %42, i32 -1
store i64* %43, i64** %8
br label %44
44: ; preds = %48, %34
%45 = load i64*, i64** %8
%46 = load i64*, i64** %4
%47 = icmp ugt i64* %45, %46
br i1 %47, label %48, label %60
48: ; preds = %44
%49 = load i64*, i64** %4
%50 = load i64, i64* %49
store i64 %50, i64* %9
%51 = load i64*, i64** %8
%52 = load i64, i64* %51
%53 = load i64*, i64** %4
store i64 %52, i64* %53
%54 = load i64, i64* %9
%55 = load i64*, i64** %8
store i64 %54, i64* %55
%56 = load i64*, i64** %4
%57 = getelementptr inbounds i64, i64* %56, i32 1
store i64* %57, i64** %4
%58 = load i64*, i64** %8
%59 = getelementptr inbounds i64, i64* %58, i32 -1
store i64* %59, i64** %8
br label %44
60: ; preds = %44
%61 = load i32, i32* %7
ret i32 %61
}

LLVM IR (-O2):
define i32 @write_petscii_digits(i64* %0, i32 %1, i64 %2) {
%4 = icmp eq i32 %1, 0
br i1 %4, label %22, label %5
5: ; preds = %3
%6 = ptrtoint i64* %0 to i64
br label %7
7: ; preds = %5, %14
%8 = phi i64* [ %0, %5 ], [ %18, %14 ]
%9 = phi i32 [ %1, %5 ], [ %19, %14 ]
%10 = ptrtoint i64* %8 to i64
%11 = sub i64 %10, %6
%12 = ashr exact i64 %11, 3
%13 = icmp ult i64 %12, %2
br i1 %13, label %14, label %22
14: ; preds = %7
%15 = srem i32 %9, 10
%16 = add nsw i32 %15, 48
%17 = zext i32 %16 to i64
%18 = getelementptr inbounds i64, i64* %8, i64 1
store i64 %17, i64* %8
%19 = sdiv i32 %9, 10
%20 = add i32 %9, 9
%21 = icmp ult i32 %20, 19
br i1 %21, label %22, label %7
22: ; preds = %7, %14, %3
%23 = phi i64* [ %0, %3 ], [ %18, %14 ], [ %8, %7 ]
%24 = getelementptr inbounds i64, i64* %23, i64 -1
%25 = icmp ugt i64* %24, %0
br i1 %25, label %26, label %34
26: ; preds = %22, %26
%27 = phi i64* [ %32, %26 ], [ %24, %22 ]
%28 = phi i64* [ %31, %26 ], [ %0, %22 ]
%29 = load i64, i64* %28
%30 = load i64, i64* %27
store i64 %30, i64* %28
store i64 %29, i64* %27
%31 = getelementptr inbounds i64, i64* %28, i64 1
%32 = getelementptr inbounds i64, i64* %27, i64 -1
%33 = icmp ugt i64* %32, %31
br i1 %33, label %26, label %34
34: ; preds = %26, %22
%35 = ptrtoint i64* %23 to i64
%36 = ptrtoint i64* %0 to i64
%37 = sub i64 %35, %36
%38 = lshr exact i64 %37, 3
%39 = trunc i64 %38 to i32
ret i32 %39
}