1 1.2 cgd * $NetBSD: DYADIC.R3V6,v 1.2 1994/10/26 07:48:31 cgd Exp $ 2 1.2 cgd 3 1.1 mycroft * MOTOROLA MICROPROCESSOR & MEMORY TECHNOLOGY GROUP 4 1.1 mycroft * M68000 Hi-Performance Microprocessor Division 5 1.1 mycroft * M68040 Software Package 6 1.1 mycroft * 7 1.1 mycroft * M68040 Software Package Copyright (c) 1993, 1994 Motorola Inc. 8 1.1 mycroft * All rights reserved. 9 1.1 mycroft * 10 1.1 mycroft * THE SOFTWARE is provided on an "AS IS" basis and without warranty. 11 1.1 mycroft * To the maximum extent permitted by applicable law, 12 1.1 mycroft * MOTOROLA DISCLAIMS ALL WARRANTIES WHETHER EXPRESS OR IMPLIED, 13 1.1 mycroft * INCLUDING IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS FOR A 14 1.1 mycroft * PARTICULAR PURPOSE and any warranty against infringement with 15 1.1 mycroft * regard to the SOFTWARE (INCLUDING ANY MODIFIED VERSIONS THEREOF) 16 1.1 mycroft * and any accompanying written materials. 17 1.1 mycroft * 18 1.1 mycroft * To the maximum extent permitted by applicable law, 19 1.1 mycroft * IN NO EVENT SHALL MOTOROLA BE LIABLE FOR ANY DAMAGES WHATSOEVER 20 1.1 mycroft * (INCLUDING WITHOUT LIMITATION, DAMAGES FOR LOSS OF BUSINESS 21 1.1 mycroft * PROFITS, BUSINESS INTERRUPTION, LOSS OF BUSINESS INFORMATION, OR 22 1.1 mycroft * OTHER PECUNIARY LOSS) ARISING OF THE USE OR INABILITY TO USE THE 23 1.1 mycroft * SOFTWARE. Motorola assumes no responsibility for the maintenance 24 1.1 mycroft * and support of the SOFTWARE. 25 1.1 mycroft * 26 1.1 mycroft * You are hereby granted a copyright license to use, modify, and 27 1.1 mycroft * distribute the SOFTWARE so long as this entire notice is retained 28 1.1 mycroft * without alteration in any modified and/or redistributed versions, 29 1.1 mycroft * and that such modified versions are clearly identified as such. 30 1.1 mycroft * No licenses are granted by implication, estoppel or otherwise 31 1.1 mycroft * under any patents or trademarks of Motorola, Inc. 32 1.1 mycroft 33 1.1 mycroft * 34 1.1 mycroft * DYADIC.R3V6 1.2 4/30/91 35 1.1 mycroft * 36 1.1 mycroft * DYADIC.R3V6 --- DYADIC template for MCD R3V6 native C compiler 37 1.1 mycroft * 38 1.1 mycroft * The MCD compiler is old. It returns float and double values 39 1.1 mycroft * as a double stored in d0/d1. There is no support for single or extended 40 1.1 mycroft * precision operations. It's not clear whether the float registers 41 1.1 mycroft * should be preserved, so for speed they're not. 42 1.1 mycroft * 43 1.1 mycroft 44 1.1 mycroft xref _OPa_ 45 1.1 mycroft xref tag 46 1.1 mycroft 47 1.1 mycroft xdef _OPd_ 48 1.1 mycroft _OPd_: 49 1.1 mycroft link a6,#-LOCAL_SIZE 50 1.1 mycroft fmovem.l fpsr/fpcr,USER_FPSR(a6) ; user's rounding mode/precision 51 1.1 mycroft fmove.l #0,fpcr ; force rounding mode/prec to extended,rn 52 1.1 mycroft * 53 1.1 mycroft * copy and convert arguments to ETEMP, FPTEMP. 54 1.1 mycroft * 55 1.1 mycroft fmove.d 8(a6),fp0 56 1.1 mycroft fmove.x fp0,FPTEMP(a6) 57 1.1 mycroft lea FPTEMP(a6),a0 58 1.1 mycroft bsr tag 59 1.1 mycroft move.b d0,DTAG(a6) 60 1.1 mycroft 61 1.1 mycroft fmove.d 16(a6),fp0 62 1.1 mycroft fmove.x fp0,ETEMP(a6) 63 1.1 mycroft lea ETEMP(a6),a0 64 1.1 mycroft bsr tag 65 1.1 mycroft move.b d0,STAG(a6) 66 1.1 mycroft 67 1.1 mycroft bsr _OPa_ 68 1.1 mycroft 69 1.1 mycroft fmove.d fp0,USER_D0(a6) ; result goes into d0/d1 pair 70 1.1 mycroft movem.l USER_D0(a6),d0-d1 71 1.1 mycroft unlk a6 72 1.1 mycroft rts 73
Indexes created Sun Nov 02 07:10:05 GMT 2025