char *idris_utf8_advance(char *str, int i) {
  while (i > 0 && *str != '\0') {
    if ((*str & 0xc0) != 0x80) {
      i--;
    }
    str++;
  }
  while ((*str & 0xc0) == 0x80) {
    str++;
  }
  return str;
}


x86 assembly (clang, -O0):
<idris_utf8_advance>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0xc(%rbp)
mov    %al,-0xd(%rbp)
jle    112a <idris_utf8_advance+0x2a>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0xd(%rbp)
mov    -0xd(%rbp),%al
test   $0x1,%al
jne    113a <idris_utf8_advance+0x3a>
jmp    116b <idris_utf8_advance+0x6b>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
and    $0xc0,%eax
cmp    $0x80,%eax
je     115a <idris_utf8_advance+0x5a>
mov    -0xc(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0xc(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    110b <idris_utf8_advance+0xb>
jmp    1170 <idris_utf8_advance+0x70>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
and    $0xc0,%eax
cmp    $0x80,%eax
jne    1198 <idris_utf8_advance+0x98>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1170 <idris_utf8_advance+0x70>
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<idris_utf8_advance>:
mov    %rdi,%rax
test   %esi,%esi
jle    112a <idris_utf8_advance+0x2a>
nopw   0x0(%rax,%rax,1)
movzbl (%rax),%ecx
test   %cl,%cl
je     112a <idris_utf8_advance+0x2a>
and    $0xc0,%cl
xor    %edx,%edx
cmp    $0x80,%cl
setne  %dl
add    $0x1,%rax
sub    %edx,%esi
jne    1110 <idris_utf8_advance+0x10>
add    $0xffffffffffffffff,%rax
xchg   %ax,%ax
movzbl 0x1(%rax),%ecx
add    $0x1,%rax
and    $0xc0,%cl
cmp    $0x80,%cl
je     1130 <idris_utf8_advance+0x30>
ret

LLVM IR (-O0):
define i8* @idris_utf8_advance(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
br label %5
5: ; preds = %24, %2
%6 = load i32, i32* %4
%7 = icmp sgt i32 %6, 0
br i1 %7, label %8, label %13
8: ; preds = %5
%9 = load i8*, i8** %3
%10 = load i8, i8* %9
%11 = sext i8 %10 to i32
%12 = icmp ne i32 %11, 0
br label %13
13: ; preds = %8, %5
%14 = phi i1 [ false, %5 ], [ %12, %8 ]
br i1 %14, label %15, label %27
15: ; preds = %13
%16 = load i8*, i8** %3
%17 = load i8, i8* %16
%18 = sext i8 %17 to i32
%19 = and i32 %18, 192
%20 = icmp ne i32 %19, 128
br i1 %20, label %21, label %24
21: ; preds = %15
%22 = load i32, i32* %4
%23 = add nsw i32 %22, -1
store i32 %23, i32* %4
br label %24
24: ; preds = %21, %15
%25 = load i8*, i8** %3
%26 = getelementptr inbounds i8, i8* %25, i32 1
store i8* %26, i8** %3
br label %5
27: ; preds = %13
br label %28
28: ; preds = %34, %27
%29 = load i8*, i8** %3
%30 = load i8, i8* %29
%31 = sext i8 %30 to i32
%32 = and i32 %31, 192
%33 = icmp eq i32 %32, 128
br i1 %33, label %34, label %37
34: ; preds = %28
%35 = load i8*, i8** %3
%36 = getelementptr inbounds i8, i8* %35, i32 1
store i8* %36, i8** %3
br label %28
37: ; preds = %28
%38 = load i8*, i8** %3
ret i8* %38
}

LLVM IR (-O2):
define i8* @idris_utf8_advance(i8* %0, i32 %1) {
%3 = icmp sgt i32 %1, 0
br i1 %3, label %4, label %16
4: ; preds = %2, %9
%5 = phi i32 [ %14, %9 ], [ %1, %2 ]
%6 = phi i8* [ %12, %9 ], [ %0, %2 ]
%7 = load i8, i8* %6
%8 = icmp eq i8 %7, 0
br i1 %8, label %16, label %9
9: ; preds = %4
%10 = and i8 %7, -64
%11 = icmp ne i8 %10, -128
%12 = getelementptr inbounds i8, i8* %6, i64 1
%13 = sext i1 %11 to i32
%14 = add nsw i32 %5, %13
%15 = icmp eq i32 %14, 0
br i1 %15, label %16, label %4
16: ; preds = %4, %9, %2
%17 = phi i8* [ %0, %2 ], [ %6, %4 ], [ %12, %9 ]
br label %18
18: ; preds = %16, %18
%19 = phi i8* [ %23, %18 ], [ %17, %16 ]
%20 = load i8, i8* %19
%21 = and i8 %20, -64
%22 = icmp eq i8 %21, -128
%23 = getelementptr inbounds i8, i8* %19, i64 1
br i1 %22, label %18, label %24
24: ; preds = %18
ret i8* %19
}