Artifact 839f3c33c6c025dfdd0c817118556467b32837f4ab4c0dfb9a1cc275cc339d46:
- Executable file
r37/lisp/csl/cslbase/igcc386.s
— part of check-in
[f2fda60abd]
at
2011-09-02 18:13:33
on branch master
— Some historical releases purely for archival purposes
git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/trunk/historical@1375 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 927) [annotate] [blame] [check-ins using] [more...]
.file "igcc386.s" gcc2_compiled.: ___gnu_compiled_c: .text .align 2 .globl _Imultiply _Imultiply: pushl %ebp movl %esp, %ebp movl 16(%ebp), %eax mull 12(%ebp) movl 8(%ebp), %ecx addl 20(%ebp), %eax adcl $0, %edx addl %eax, %eax adcl %edx, %edx shrl $1, %eax movl %eax, 0(%ecx) movl %edx, %eax leave ret .align 2 .globl _Idiv10_9 _Idiv10_9: pushl %ebp movl %esp, %ebp movl 12(%ebp), %edx movl 16(%ebp), %eax shll $1, %eax shrl $1, %edx rcrl $1, %eax movl $1000000000, %ecx divl %ecx movl 8(%ebp), %ecx movl %eax, 0(%ecx) movl %edx, %eax leave ret .align 2 .globl _Idivide _Idivide: pushl %ebp movl %esp, %ebp movl 12(%ebp), %edx movl 16(%ebp), %eax shll $1, %eax shrl $1, %edx rcrl $1, %eax movl 20(%ebp), %ecx divl %ecx movl 8(%ebp), %ecx movl %eax, 0(%ecx) movl %edx, %eax leave ret .align 2