home *** CD-ROM | disk | FTP | other *** search
/ Vectronix 2 / VECTRONIX2.iso / FILES_01 / P_FOTRAN.LZH / 68881 / FPUMAC.LIB < prev    next >
Text File  |  1987-12-31  |  1KB  |  35 lines
  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;
  3. ;  FPUMAC.LIB    Macro-Library for MC68881 support for ATARI ST
  4. ;
  5. ;                Copyright (C) 1988 Prospero Software Ltd
  6. ;                by F. Pluennecke
  7. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  8. ;
  9.           nolist
  10. ;        
  11. ;    68881 CIR addresses, see 68881 manual section 5
  12. ;
  13. fp881     equ  $0ffffa40      ; Floating point Basisadresse
  14. response  equ  fp881+$00      ; Response-Register          (read only ) 
  15. control   equ  fp881+$02      ; Control-Register           (do not use)
  16. command   equ  fp881+$0a      ; Command CIR                (write only)
  17. operand   equ  fp881+$10      ; Operand CIR                (read/write)
  18. ;
  19. ;
  20. ; macro-definitions for FPU-access
  21. ;
  22.  
  23. wrsp      macro
  24. rr[.l]    tst.w     response
  25.           bmi.s     rr[.l]
  26.           endm
  27.  
  28. sopr      macro     src
  29.           move.l    [src],operand
  30.           wrsp
  31.           endm
  32.  
  33.           list
  34.  
  35.