Return to asmiw-27.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / engine-27

Annotation of OpenXM_contrib2/asir2000/engine-27/asmiw-27.c, Revision 1.1.1.1

1.1       noro        1: /* $OpenXM: OpenXM/src/asir99/engine-27/asmiw-27.c,v 1.1.1.1 1999/11/10 08:12:27 noro Exp $ */
                      2: unsigned int dm_27(a1,a2,u)
                      3: unsigned int a1,a2,*u;
                      4: {
                      5:        __asm
                      6:        {
                      7:        mov             eax,a1
                      8:        mul             a2
                      9:        shl             edx,5
                     10:        mov             ecx,eax
                     11:        shr             ecx,27
                     12:        or              edx,ecx
                     13:        and             eax,134217727
                     14:        mov     ebx,u
                     15:        mov     DWORD PTR [ebx],edx
                     16:        }
                     17: }
                     18:
                     19: unsigned int dma_27(a1,a2,a3,u)
                     20: unsigned int a1,a2,a3,*u;
                     21: {
                     22:        __asm
                     23:        {
                     24:        mov             eax,a1
                     25:        mul             a2
                     26:        add             eax,a3
                     27:        adc             edx,0
                     28:        shl             edx,5
                     29:        mov             ecx,eax
                     30:        shr             ecx,27
                     31:        or              edx,ecx
                     32:        and             eax,134217727
                     33:        mov     ebx,u
                     34:        mov     DWORD PTR [ebx],edx
                     35:        }
                     36: }