Rosetta:gray code : asm code for ada

    .file   "gray_5.adb"
.globl _gray_5_E
    .data
_gray_5_E:
    .space 1
    .text
    .align 2
.globl _gray_5__encode
    .def    _gray_5__encode;    .scl    2;  .type   32; .endef
_gray_5__encode:
LFB4:
    subl    $4, %esp
LCFI0:
    movl    8(%esp), %eax
    movb    %al, (%esp)
    movzbl  (%esp), %eax
    shrb    %al
    xorb    (%esp), %al
    nop
    addl    $4, %esp
    ret
LFE4:
    .align 2
.globl _gray_5__decode
    .def    _gray_5__decode;    .scl    2;  .type   32; .endef
_gray_5__decode:
LFB5:
    subl    $20, %esp
LCFI1:
    movl    24(%esp), %eax
    movb    %al, (%esp)
    movb    $16, 15(%esp)
    movzbl  (%esp), %eax
    andl    $16, %eax
    movb    %al, 14(%esp)
    movzbl  14(%esp), %eax
    movb    %al, 13(%esp)
    movl    $2, 16(%esp)
L6:
    cmpl    $5, 16(%esp)
    jg  L5
    shrb    14(%esp)
    shrb    15(%esp)
    movzbl  15(%esp), %edx
    movzbl  (%esp), %eax
    andl    %edx, %eax
    xorb    %al, 14(%esp)
    movzbl  14(%esp), %eax
    addb    %al, 13(%esp)
    addl    $1, 16(%esp)
    jmp L6
L5:
    movzbl  13(%esp), %eax
    addl    $20, %esp
    ret
LFE5:
    .section    .eh_frame,"w"
Lframe1:
    .long   LECIE1-LSCIE1
LSCIE1:
    .long   0x0
    .byte   0x1
    .def    ___gnat_eh_personality; .scl    2;  .type   32; .endef
    .ascii "zP\0"
    .uleb128 0x1
    .sleb128 -4
    .byte   0x8
    .uleb128 0x5
    .byte   0x0
    .long   ___gnat_eh_personality
    .byte   0xc
    .uleb128 0x4
    .uleb128 0x4
    .byte   0x88
    .uleb128 0x1
    .align 4
LECIE1:
LSFDE1:
    .long   LEFDE1-LASFDE1
LASFDE1:
    .long   LASFDE1-Lframe1
    .long   LFB4
    .long   LFE4-LFB4
    .uleb128 0x0
    .byte   0x4
    .long   LCFI0-LFB4
    .byte   0xe
    .uleb128 0x8
    .align 4
LEFDE1:
LSFDE3:
    .long   LEFDE3-LASFDE3
LASFDE3:
    .long   LASFDE3-Lframe1
    .long   LFB5
    .long   LFE5-LFB5
    .uleb128 0x0
    .byte   0x4
    .long   LCFI1-LFB5
    .byte   0xe
    .uleb128 0x18
    .align 4
LEFDE3: