.data
A: .int 0

.text
.global main
.global A

main:
    movl $0, %eax
    loop:
      addl A, %eax
      jno  NOT_OF
        movl A, %eax
        shrl $31, %eax
        addl $0x7FFFFFFF, %eax
        movl %eax, A
        jmp done
      NOT_OF:
      movl %eax, A
      call readi32
      jnc  loop
    done:
    movl A, %eax
    call writei32
    call nl
    call finish
    ret