rail, 605 bytes

Result

WA

Code [DL]

$ ':'
 \
  \-(!a!)(a)(a)#

$ 'pop'
 \
  \-(!a!)#


$ 'getb'
 \                          -i{pop}(r)#
  \-8--(!r!)---{:}0g-------<
    /                      |
    |   /-0-               | 
    \-a--   >-q[0]im2(r)s1-/
        \-1-


$ 'isok'
 \                                -(r)-#
  \-2m(!q!)[0](!r!)55m--{:}01sg--<
                      /           |
 @-------------------/            |
   \           \                  |
   |           >-q(q)ma1{:}{:}s1--/
   \-(!r!)[1]-/

$ 'f'
 \
  \--{getb}{isok}o-#

$ 'main' 
 |
 5
 9
 m
 5
 a           #
 \-------:g-<
   /        |
   |        |
   \-{f}s1--/

stdin

11000101
00000001
00001111
10011001
00110010
00110111
11101100
01000010
00001001
00001111
00100111
01100000
10010110
00101101
10101011
10111110
10001000
10001111
00100100
01011011
01110111
01111000
01001110
00010101
01101110
00000110
00000011
11100101
00011100
11100111
11001100
11111101
00001011
00011101
00001010
11000001
10101011
11100000
11010010
10010000
10101111
01101001
01110110
10101101
10010111
10100100
10010011
11111010
00000000
10001110

stdout

stderr

Crash: Stack underflow

strace