36 lines
789 B
Plaintext
36 lines
789 B
Plaintext
/* Set 68881/2 floating point rounding precision */
|
|
/* Reference: MC68881/MC68882 Floating-Point Coprocessor */
|
|
/* User's Manual, Motorola, Prentice-Hall, 1987 (First Edition) */
|
|
/* Pages 1-14, 2-3, 4-68. */
|
|
/* FPcr code $80 sets the 68882 coprocessor to */
|
|
/* rounding precision = 53 bits */
|
|
/* rounding mode = nearest or even */
|
|
/* all exceptions (bits 8-15) disabled */
|
|
/* The instruction is */
|
|
/* FMOVE.L #$80,Fcr */
|
|
/* if the assembler will understand it. */
|
|
|
|
.align 2
|
|
.text
|
|
|
|
/* set to single precision */
|
|
.globl _sprec
|
|
_sprec
|
|
.word 0xf23c,0x9000,0x0000,0x0040
|
|
rts
|
|
|
|
/* set to double precision */
|
|
.globl _dprec
|
|
|
|
_dprec:
|
|
.word 0xf23c,0x9000,0x0000,0x0080
|
|
rts
|
|
|
|
/* set to extended (long double) precision */
|
|
.globl _ldprec
|
|
|
|
_ldprec:
|
|
.word 0xf23c,0x9000,0x0000,0x0000
|
|
rts
|
|
|