Paste: locals and no-locals

Author: yuuki
Mode: factor
Date: Tue, 23 Jun 2009 05:11:19
Plain Text |
: (greater) ( keyl l keyi i -- keyl/keyi l/i )
    [ pick over after=? ] dip swap
    [ 2drop ] [ [ 2drop ] 2dip ] if ;

:: (greater)2 ( keyl l keyi i -- keyl/keyi l/i )
    keyl keyi after=? [ keyl l ] [ keyi i ] if ;

Annotation: disassembled

Author: yuuki
Mode: assembly-x86
Date: Tue, 23 Jun 2009 05:13:34
Plain Text |
(greater)
06cc54d0: 6810000000    push dword 0x10
06cc54d5: 68d054cc06    push dword 0x6cc54d0
06cc54da: 83ec04        sub esp, 0x4
06cc54dd: 83c704        add edi, 0x4
06cc54e0: 83c604        add esi, 0x4
06cc54e3: 8b56fc        mov edx, [esi-0x4]
06cc54e6: 8b4ef0        mov ecx, [esi-0x10]
06cc54e9: 8b46f8        mov eax, [esi-0x8]
06cc54ec: 8906          mov [esi], eax
06cc54ee: 894efc        mov [esi-0x4], ecx
06cc54f1: 8917          mov [edi], edx
06cc54f3: e878c50300    call 0x6d01a70
06cc54f8: 83ef04        sub edi, 0x4
06cc54fb: 8b5704        mov edx, [edi+0x4]
06cc54fe: 8b0e          mov ecx, [esi]
06cc5500: 8916          mov [esi], edx
06cc5502: 83f905        cmp ecx, 0x5
06cc5505: 0f8407000000  jz dword 0x6cc5512
06cc550b: 83ee08        sub esi, 0x8
06cc550e: 83c40c        add esp, 0xc
06cc5511: c3            ret 
06cc5512: 83ee08        sub esi, 0x8
06cc5515: 8b5604        mov edx, [esi+0x4]
06cc5518: 8b4e08        mov ecx, [esi+0x8]
06cc551b: 890e          mov [esi], ecx
06cc551d: 8956fc        mov [esi-0x4], edx
06cc5520: 83c40c        add esp, 0xc
06cc5523: c3            ret 

(greater)2
06d4c4f0: 6810000000    push dword 0x10
06d4c4f5: 68f0c4d406    push dword 0x6d4c4f0
06d4c4fa: 83ec04        sub esp, 0x4
06d4c4fd: 83c710        add edi, 0x10
06d4c500: 83ee08        sub esi, 0x8
06d4c503: 8b56fc        mov edx, [esi-0x4]
06d4c506: 8b0e          mov ecx, [esi]
06d4c508: 8b4604        mov eax, [esi+0x4]
06d4c50b: 8b5e08        mov ebx, [esi+0x8]
06d4c50e: 891f          mov [edi], ebx
06d4c510: 8906          mov [esi], eax
06d4c512: 8957f4        mov [edi-0xc], edx
06d4c515: 8947fc        mov [edi-0x4], eax
06d4c518: 894ff8        mov [edi-0x8], ecx
06d4c51b: e83050fbff    call 0x6d01550
06d4c520: 83ef10        sub edi, 0x10
06d4c523: 83c60c        add esi, 0xc
06d4c526: 8b5704        mov edx, [edi+0x4]
06d4c529: 8b4f08        mov ecx, [edi+0x8]
06d4c52c: 8b470c        mov eax, [edi+0xc]
06d4c52f: 8b5f10        mov ebx, [edi+0x10]
06d4c532: 8b6ef4        mov ebp, [esi-0xc]
06d4c535: 8946fc        mov [esi-0x4], eax
06d4c538: 894ef8        mov [esi-0x8], ecx
06d4c53b: 891e          mov [esi], ebx
06d4c53d: 8956f4        mov [esi-0xc], edx
06d4c540: 83fd05        cmp ebp, 0x5
06d4c543: 0f8407000000  jz dword 0x6d4c550
06d4c549: 83ee08        sub esi, 0x8
06d4c54c: 83c40c        add esp, 0xc
06d4c54f: c3            ret 
06d4c550: 83ee08        sub esi, 0x8
06d4c553: 8b5604        mov edx, [esi+0x4]
06d4c556: 8b4e08        mov ecx, [esi+0x8]
06d4c559: 890e          mov [esi], ecx
06d4c55b: 8956fc        mov [esi-0x4], edx
06d4c55e: 83c40c        add esp, 0xc
06d4c561: c3            ret

New Annotation

Summary:
Author:
Mode:
Body: