2 |       x_unimp.sa 3.3 7/1/91
 
   4 |       fpsp_unimp --- FPSP handler for unimplemented instruction
 
   7 | Invoked when the user program encounters a floating-point
 
   8 | op-code that hardware does not support.  Trap vector# 11
 
   9 | (See table 8-1 MC68030 User's Manual).
 
  12 | Note: An fsave for an unimplemented inst. will create a short
 
  15 |  Input: 1. Six word stack frame for unimplemented inst, four word
 
  17 |            (See table 8-7 MC68030 User's Manual).
 
  18 |         2. Unimp (short) fsave state frame created here by fsave
 
  22 |               Copyright (C) Motorola, Inc. 1990
 
  25 |       THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF MOTOROLA
 
  26 |       The copyright notice above does not evidence any
 
  27 |       actual or intended publication of such source code.
 
  29 X_UNIMP:        |idnt    2,1 | Motorola 040 Floating Point Software Package
 
  47         moveml          %d0-%d1/%a0-%a1,USER_DA(%a6)
 
  48         fmovemx %fp0-%fp3,USER_FP0(%a6)
 
  49         fmoveml %fpcr/%fpsr/%fpiar,USER_FPCR(%a6)
 
  50         moveb           (%a7),%d0               |test for valid version num
 
  51         andib           #0xf0,%d0               |test for $4x
 
  52         cmpib           #VER_4,%d0      |must be $4x or exit
 
  56 |       The following lines are used to ensure that the FPSR
 
  57 |       exception byte and condition codes are clear before proceeding
 
  59         movel           USER_FPSR(%a6),%d0
 
  60         andl            #0xFF00FF,%d0   |clear all but accrued exceptions
 
  61         movel           %d0,USER_FPSR(%a6)
 
  62         fmovel          #0,%FPSR |clear all user bits
 
  63         fmovel          #0,%FPCR        |clear all user exceptions for FPSP
 
  65         clrb            UFLG_TMP(%a6)   |clr flag for unsupp data
 
  67         bsrl            get_op          |go get operand(s)
 
  69         bsrl            do_func         |do the function
 
  70         fsave           -(%a7)          |capture possible exc state
 
  72         bnes            no_store        |if STORE_FLG is set, no store
 
  73         bsrl            sto_res         |store the result in user space
 
  75         bral            gen_except      |post any exceptions and return