home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / SCALE.S < prev    next >
Encoding:
Text File  |  1995-02-12  |  293 b   |  15 lines
  1. / $Source: /home/harp/1/proto/monoBANK/winnt/scale.s,v $ 
  2. / $Revision: 1.1 $ $Date: 95/02/12 10:22:57 $ $Author: mg $ 
  3.     .file    "scale.s"
  4. gcc2_compile.:
  5. .text
  6. .globl _scale
  7. _scale:
  8.         movl 4(%esp),%eax
  9.     imull 8(%esp)
  10.         shrdl $16,%edx,%eax
  11.     ret
  12. .data
  13.     .align 2
  14.     .long  0
  15.