| 0,0 → 1,59 |
|---|
| ;***************************************************************************** |
| ;* |
| ;* Open Watcom Project |
| ;* |
| ;* Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved. |
| ;* |
| ;* ======================================================================== |
| ;* |
| ;* This file contains Original Code and/or Modifications of Original |
| ;* Code as defined in and that are subject to the Sybase Open Watcom |
| ;* Public License version 1.0 (the 'License'). You may not use this file |
| ;* except in compliance with the License. BY USING THIS FILE YOU AGREE TO |
| ;* ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is |
| ;* provided with the Original Code and Modifications, and is also |
| ;* available at www.sybase.com/developer/opensource. |
| ;* |
| ;* The Original Code and all software distributed under the License are |
| ;* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER |
| ;* EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM |
| ;* ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF |
| ;* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR |
| ;* NON-INFRINGEMENT. Please see the License for the specific language |
| ;* governing rights and limitations under the License. |
| ;* |
| ;* ======================================================================== |
| ;* |
| ;* Description: WHEN YOU FIGURE OUT WHAT THIS FILE DOES, PLEASE |
| ;* DESCRIBE IT HERE! |
| ;* |
| ;***************************************************************************** |
| |
| |
| ;======================================================================== |
| ;== Name: FDN == |
| ;== Operation: Floating double negate == |
| ;== Inputs: EDX high word of float == |
| ;== Outputs: EDX new high word of float == |
| ;== Volatile: none == |
| ;======================================================================== |
| include mdef.inc |
| include struct.inc |
| |
| modstart fdn386 |
| |
| xdefp __FDN |
| |
| defpe __FDN |
| test EDX,EDX ; if non zero number then |
| _if e |
| test EAX,EAX |
| _endif |
| _if ne ; ... |
| xor EDX,80000000h ; - flip the sign bit |
| _endif ; endif |
| ret ; and return!!! |
| endproc __FDN |
| |
| endmod |
| end |