void BSGET(r, s) int *r;
char *s;
{
  register int c;
  unsigned int k, l, m, n;
  {
    k = 2147483647;
    l = 1;
    printf(s);
    c = getchar();
    n = 0;
    while ((c < '0') || (c > '1')) {
      while (c != '\n') {
        c = getchar();
      };
      printf("    Not a Bit String - Re-input: ");
      c = getchar();
    };
    while ((c >= '0') && (c <= '1')) {
      m = c - '0';
      if (n < k) {
        n = 2 * n + m;
        c = getchar();
      } else if (n == k) {
        if (m <= l) {
          n = 2 * n + m;
          c = getchar();
        } else {
          while (c != '\n') {
            c = getchar();
          };
          printf("    Not a Bit String - Re-input: ");
          c = getchar();
          n = 0;
          while ((c < '0') || (c > '1')) {
            while (c != '\n') {
              c = getchar();
            };
            printf("    Not a Bit String - Re-input: ");
            c = getchar();
          };
        };
      } else {
        while (c != '\n') {
          c = getchar();
        };
        printf("    Not a Bit String - Re-input: ");
        c = getchar();
        n = 0;
        while ((c < '0') || (c > '1')) {
          while (c != '\n') {
            c = getchar();
          };
          printf("    Not a Bit String - Re-input: ");
          c = getchar();
        };
      };
    };
    while (c != '\n') {
      c = getchar();
    };
    *r = n;
  };
}


x86 assembly (clang, -O0):
<BSGET>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movl   $0x7fffffff,-0x18(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x10(%rbp),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
movl   $0x0,-0x24(%rbp)
mov    $0x1,%al
cmpl   $0x30,-0x14(%rbp)
mov    %al,-0x25(%rbp)
jl     1173 <BSGET+0x53>
cmpl   $0x31,-0x14(%rbp)
setg   %al
mov    %al,-0x25(%rbp)
mov    -0x25(%rbp),%al
test   $0x1,%al
jne    1183 <BSGET+0x63>
jmp    11be <BSGET+0x9e>
jmp    1188 <BSGET+0x68>
cmpl   $0xa,-0x14(%rbp)
je     11a1 <BSGET+0x81>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    1188 <BSGET+0x68>
lea    0xe58(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    115a <BSGET+0x3a>
jmp    11c3 <BSGET+0xa3>
xor    %eax,%eax
cmpl   $0x30,-0x14(%rbp)
mov    %al,-0x26(%rbp)
jl     11dc <BSGET+0xbc>
cmpl   $0x31,-0x14(%rbp)
setle  %al
mov    %al,-0x26(%rbp)
mov    -0x26(%rbp),%al
test   $0x1,%al
jne    11ec <BSGET+0xcc>
jmp    13aa <BSGET+0x28a>
mov    -0x14(%rbp),%eax
sub    $0x30,%eax
mov    %eax,-0x20(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x18(%rbp),%eax
jae    121c <BSGET+0xfc>
mov    -0x24(%rbp),%eax
shl    $0x1,%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    13a5 <BSGET+0x285>
mov    -0x24(%rbp),%eax
cmp    -0x18(%rbp),%eax
jne    12fa <BSGET+0x1da>
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
ja     124f <BSGET+0x12f>
mov    -0x24(%rbp),%eax
shl    $0x1,%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    12f5 <BSGET+0x1d5>
jmp    1254 <BSGET+0x134>
cmpl   $0xa,-0x14(%rbp)
je     126d <BSGET+0x14d>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    1254 <BSGET+0x134>
lea    0xd8c(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
movl   $0x0,-0x24(%rbp)
mov    $0x1,%al
cmpl   $0x30,-0x14(%rbp)
mov    %al,-0x27(%rbp)
jl     12a5 <BSGET+0x185>
cmpl   $0x31,-0x14(%rbp)
setg   %al
mov    %al,-0x27(%rbp)
mov    -0x27(%rbp),%al
test   $0x1,%al
jne    12b5 <BSGET+0x195>
jmp    12f0 <BSGET+0x1d0>
jmp    12ba <BSGET+0x19a>
cmpl   $0xa,-0x14(%rbp)
je     12d3 <BSGET+0x1b3>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    12ba <BSGET+0x19a>
lea    0xd26(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    128c <BSGET+0x16c>
jmp    12f5 <BSGET+0x1d5>
jmp    13a0 <BSGET+0x280>
jmp    12ff <BSGET+0x1df>
cmpl   $0xa,-0x14(%rbp)
je     1318 <BSGET+0x1f8>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    12ff <BSGET+0x1df>
lea    0xce1(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
movl   $0x0,-0x24(%rbp)
mov    $0x1,%al
cmpl   $0x30,-0x14(%rbp)
mov    %al,-0x28(%rbp)
jl     1350 <BSGET+0x230>
cmpl   $0x31,-0x14(%rbp)
setg   %al
mov    %al,-0x28(%rbp)
mov    -0x28(%rbp),%al
test   $0x1,%al
jne    1360 <BSGET+0x240>
jmp    139b <BSGET+0x27b>
jmp    1365 <BSGET+0x245>
cmpl   $0xa,-0x14(%rbp)
je     137e <BSGET+0x25e>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    1365 <BSGET+0x245>
lea    0xc7b(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    1337 <BSGET+0x217>
jmp    13a0 <BSGET+0x280>
jmp    13a5 <BSGET+0x285>
jmp    11c3 <BSGET+0xa3>
jmp    13af <BSGET+0x28f>
cmpl   $0xa,-0x14(%rbp)
je     13c8 <BSGET+0x2a8>
mov    $0x0,%al
call   1040 <getchar@plt>
mov    %eax,-0x14(%rbp)
jmp    13af <BSGET+0x28f>
mov    -0x24(%rbp),%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<BSGET>:
push   %r15
push   %r14
push   %rbx
mov    %rdi,%r14
xor    %ebx,%ebx
mov    %rsi,%rdi
xor    %eax,%eax
call   1030 <printf@plt>
xor    %eax,%eax
call   1040 <getchar@plt>
mov    %eax,%ecx
add    $0xffffffce,%ecx
cmp    $0xfffffffd,%ecx
ja     117e <BSGET+0x5e>
lea    0xeb4(%rip),%r15
jmp    116b <BSGET+0x4b>
xchg   %ax,%ax
mov    %r15,%rdi
xor    %eax,%eax
call   1030 <printf@plt>
xor    %eax,%eax
call   1040 <getchar@plt>
mov    %eax,%ecx
add    $0xffffffce,%ecx
cmp    $0xfffffffe,%ecx
jae    117e <BSGET+0x5e>
cmp    $0xa,%eax
je     1150 <BSGET+0x30>
xor    %eax,%eax
call   1040 <getchar@plt>
cmp    $0xa,%eax
jne    1170 <BSGET+0x50>
jmp    1150 <BSGET+0x30>
mov    %eax,%ecx
and    $0xfffffffe,%ecx
cmp    $0x30,%ecx
jne    1260 <BSGET+0x140>
lea    0xe6d(%rip),%r15
xor    %ebx,%ebx
jmp    11bb <BSGET+0x9b>
nopw   0x0(%rax,%rax,1)
lea    (%rax,%rbx,2),%ebx
add    $0xffffffd0,%ebx
xor    %eax,%eax
call   1040 <getchar@plt>
mov    %eax,%ecx
and    $0xfffffffe,%ecx
cmp    $0x30,%ecx
jne    124e <BSGET+0x12e>
cmp    $0x7ffffffe,%ebx
jbe    11a0 <BSGET+0x80>
cmp    $0x7fffffff,%ebx
jne    11e0 <BSGET+0xc0>
add    $0xffffffce,%eax
mov    %eax,%ebx
jmp    11a6 <BSGET+0x86>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
xor    %eax,%eax
call   1040 <getchar@plt>
cmp    $0xa,%eax
jne    11e0 <BSGET+0xc0>
xor    %ebx,%ebx
mov    %r15,%rdi
xor    %eax,%eax
call   1030 <printf@plt>
xor    %eax,%eax
call   1040 <getchar@plt>
mov    %eax,%ecx
add    $0xffffffce,%ecx
cmp    $0xfffffffd,%ecx
jbe    122d <BSGET+0x10d>
jmp    11ad <BSGET+0x8d>
nopl   0x0(%rax,%rax,1)
xor    %ebx,%ebx
mov    %r15,%rdi
xor    %eax,%eax
call   1030 <printf@plt>
xor    %eax,%eax
call   1040 <getchar@plt>
mov    %eax,%ecx
add    $0xffffffce,%ecx
cmp    $0xfffffffe,%ecx
jae    11ad <BSGET+0x8d>
cmp    $0xa,%eax
je     1210 <BSGET+0xf0>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
xor    %eax,%eax
call   1040 <getchar@plt>
cmp    $0xa,%eax
jne    1240 <BSGET+0x120>
jmp    1210 <BSGET+0xf0>
cmp    $0xa,%eax
je     126c <BSGET+0x14c>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
xor    %eax,%eax
call   1040 <getchar@plt>
cmp    $0xa,%eax
jne    1260 <BSGET+0x140>
mov    %ebx,(%r14)
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@.str = [34 x i8] c" Not a Bit String - Re-input: \00"
define void @BSGET(i32* %0, i8* %1) {
%3 = alloca i32*
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
store i32* %0, i32** %3
store i8* %1, i8** %4
store i32 2147483647, i32* %6
store i32 1, i32* %7
%10 = load i8*, i8** %4
%11 = call i32 (i8*, ...) @printf(i8* %10)
%12 = call i32 (...) @getchar()
store i32 %12, i32* %5
store i32 0, i32* %9
br label %13
13: ; preds = %27, %2
%14 = load i32, i32* %5
%15 = icmp slt i32 %14, 48
br i1 %15, label %19, label %16
16: ; preds = %13
%17 = load i32, i32* %5
%18 = icmp sgt i32 %17, 49
br label %19
19: ; preds = %16, %13
%20 = phi i1 [ true, %13 ], [ %18, %16 ]
br i1 %20, label %21, label %30
21: ; preds = %19
br label %22
22: ; preds = %25, %21
%23 = load i32, i32* %5
%24 = icmp ne i32 %23, 10
br i1 %24, label %25, label %27
25: ; preds = %22
%26 = call i32 (...) @getchar()
store i32 %26, i32* %5
br label %22
27: ; preds = %22
%28 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%29 = call i32 (...) @getchar()
store i32 %29, i32* %5
br label %13
30: ; preds = %19
br label %31
31: ; preds = %121, %30
%32 = load i32, i32* %5
%33 = icmp sge i32 %32, 48
br i1 %33, label %34, label %37
34: ; preds = %31
%35 = load i32, i32* %5
%36 = icmp sle i32 %35, 49
br label %37
37: ; preds = %34, %31
%38 = phi i1 [ false, %31 ], [ %36, %34 ]
br i1 %38, label %39, label %122
39: ; preds = %37
%40 = load i32, i32* %5
%41 = sub nsw i32 %40, 48
store i32 %41, i32* %8
%42 = load i32, i32* %9
%43 = load i32, i32* %6
%44 = icmp ult i32 %42, %43
br i1 %44, label %45, label %51
45: ; preds = %39
%46 = load i32, i32* %9
%47 = mul i32 2, %46
%48 = load i32, i32* %8
%49 = add i32 %47, %48
store i32 %49, i32* %9
%50 = call i32 (...) @getchar()
store i32 %50, i32* %5
br label %121
51: ; preds = %39
%52 = load i32, i32* %9
%53 = load i32, i32* %6
%54 = icmp eq i32 %52, %53
br i1 %54, label %55, label %93
55: ; preds = %51
%56 = load i32, i32* %8
%57 = load i32, i32* %7
%58 = icmp ule i32 %56, %57
br i1 %58, label %59, label %65
59: ; preds = %55
%60 = load i32, i32* %9
%61 = mul i32 2, %60
%62 = load i32, i32* %8
%63 = add i32 %61, %62
store i32 %63, i32* %9
%64 = call i32 (...) @getchar()
store i32 %64, i32* %5
br label %92
65: ; preds = %55
br label %66
66: ; preds = %69, %65
%67 = load i32, i32* %5
%68 = icmp ne i32 %67, 10
br i1 %68, label %69, label %71
69: ; preds = %66
%70 = call i32 (...) @getchar()
store i32 %70, i32* %5
br label %66
71: ; preds = %66
%72 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%73 = call i32 (...) @getchar()
store i32 %73, i32* %5
store i32 0, i32* %9
br label %74
74: ; preds = %88, %71
%75 = load i32, i32* %5
%76 = icmp slt i32 %75, 48
br i1 %76, label %80, label %77
77: ; preds = %74
%78 = load i32, i32* %5
%79 = icmp sgt i32 %78, 49
br label %80
80: ; preds = %77, %74
%81 = phi i1 [ true, %74 ], [ %79, %77 ]
br i1 %81, label %82, label %91
82: ; preds = %80
br label %83
83: ; preds = %86, %82
%84 = load i32, i32* %5
%85 = icmp ne i32 %84, 10
br i1 %85, label %86, label %88
86: ; preds = %83
%87 = call i32 (...) @getchar()
store i32 %87, i32* %5
br label %83
88: ; preds = %83
%89 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%90 = call i32 (...) @getchar()
store i32 %90, i32* %5
br label %74
91: ; preds = %80
br label %92
92: ; preds = %91, %59
br label %120
93: ; preds = %51
br label %94
94: ; preds = %97, %93
%95 = load i32, i32* %5
%96 = icmp ne i32 %95, 10
br i1 %96, label %97, label %99
97: ; preds = %94
%98 = call i32 (...) @getchar()
store i32 %98, i32* %5
br label %94
99: ; preds = %94
%100 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%101 = call i32 (...) @getchar()
store i32 %101, i32* %5
store i32 0, i32* %9
br label %102
102: ; preds = %116, %99
%103 = load i32, i32* %5
%104 = icmp slt i32 %103, 48
br i1 %104, label %108, label %105
105: ; preds = %102
%106 = load i32, i32* %5
%107 = icmp sgt i32 %106, 49
br label %108
108: ; preds = %105, %102
%109 = phi i1 [ true, %102 ], [ %107, %105 ]
br i1 %109, label %110, label %119
110: ; preds = %108
br label %111
111: ; preds = %114, %110
%112 = load i32, i32* %5
%113 = icmp ne i32 %112, 10
br i1 %113, label %114, label %116
114: ; preds = %111
%115 = call i32 (...) @getchar()
store i32 %115, i32* %5
br label %111
116: ; preds = %111
%117 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%118 = call i32 (...) @getchar()
store i32 %118, i32* %5
br label %102
119: ; preds = %108
br label %120
120: ; preds = %119, %92
br label %121
121: ; preds = %120, %45
br label %31
122: ; preds = %37
br label %123
123: ; preds = %126, %122
%124 = load i32, i32* %5
%125 = icmp ne i32 %124, 10
br i1 %125, label %126, label %128
126: ; preds = %123
%127 = call i32 (...) @getchar()
store i32 %127, i32* %5
br label %123
128: ; preds = %123
%129 = load i32, i32* %9
%130 = load i32*, i32** %3
store i32 %129, i32* %130
ret void
}

LLVM IR (-O2):
@.str = [34 x i8] c" Not a Bit String - Re-input: \00"
define void @BSGET(i32* nocapture writeonly %0, i8* nocapture %1) {
%3 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) %1)
%4 = tail call i32 (...) @getchar()
%5 = add i32 %4, -50
%6 = icmp ult i32 %5, -2
br i1 %6, label %7, label %10
7: ; preds = %2, %17
%8 = phi i32 [ %19, %17 ], [ %4, %2 ]
%9 = icmp eq i32 %8, 10
br i1 %9, label %17, label %14
10: ; preds = %17, %2
%11 = phi i32 [ %4, %2 ], [ %19, %17 ]
%12 = and i32 %11, -2
%13 = icmp eq i32 %12, 48
br i1 %13, label %26, label %24
14: ; preds = %7, %14
%15 = tail call i32 (...) @getchar()
%16 = icmp eq i32 %15, 10
br i1 %16, label %17, label %14
17: ; preds = %14, %7
%18 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%19 = tail call i32 (...) @getchar()
%20 = add i32 %19, -50
%21 = icmp ult i32 %20, -2
br i1 %21, label %7, label %10
22: ; preds = %60
%23 = icmp eq i32 %61, 10
br i1 %23, label %68, label %24
24: ; preds = %10, %22
%25 = phi i32 [ %62, %22 ], [ 0, %10 ]
br label %65
26: ; preds = %10, %60
%27 = phi i32 [ %62, %60 ], [ 0, %10 ]
%28 = phi i32 [ %61, %60 ], [ %11, %10 ]
%29 = icmp ult i32 %27, 2147483647
br i1 %29, label %30, label %34
30: ; preds = %26
%31 = add nsw i32 %28, -48
%32 = shl nuw i32 %27, 1
%33 = add nuw i32 %31, %32
br label %57
34: ; preds = %26
%35 = icmp eq i32 %27, 2147483647
br i1 %35, label %36, label %38
36: ; preds = %34
%37 = add nuw nsw i32 %28, -50
br label %57
38: ; preds = %34, %38
%39 = tail call i32 (...) @getchar()
%40 = icmp eq i32 %39, 10
br i1 %40, label %41, label %38
41: ; preds = %38
%42 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%43 = tail call i32 (...) @getchar()
%44 = add i32 %43, -50
%45 = icmp ult i32 %44, -2
br i1 %45, label %46, label %60
46: ; preds = %41, %52
%47 = phi i32 [ %54, %52 ], [ %43, %41 ]
%48 = icmp eq i32 %47, 10
br i1 %48, label %52, label %49
49: ; preds = %46, %49
%50 = tail call i32 (...) @getchar()
%51 = icmp eq i32 %50, 10
br i1 %51, label %52, label %49
52: ; preds = %49, %46
%53 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0))
%54 = tail call i32 (...) @getchar()
%55 = add i32 %54, -50
%56 = icmp ult i32 %55, -2
br i1 %56, label %46, label %60
57: ; preds = %30, %36
%58 = phi i32 [ %37, %36 ], [ %33, %30 ]
%59 = tail call i32 (...) @getchar()
br label %60
60: ; preds = %52, %57, %41
%61 = phi i32 [ %43, %41 ], [ %59, %57 ], [ %54, %52 ]
%62 = phi i32 [ 0, %41 ], [ %58, %57 ], [ 0, %52 ]
%63 = and i32 %61, -2
%64 = icmp eq i32 %63, 48
br i1 %64, label %26, label %22
65: ; preds = %24, %65
%66 = tail call i32 (...) @getchar()
%67 = icmp eq i32 %66, 10
br i1 %67, label %68, label %65
68: ; preds = %65, %22
%69 = phi i32 [ %62, %22 ], [ %25, %65 ]
store i32 %69, i32* %0
ret void
}