Return to sys_dosa.s CVS log

Up to [Quake II] / quake2 / linux

Annotation of quake2/linux/sys_dosa.s, revision 1.1

1.1     ! root        1: //
        !             2: // sys_dosa.s
        !             3: // x86 assembly-language DOS-dependent routines.
        !             4: 
        !             5: #include "qasm.h"
        !             6: 
        !             7: 
        !             8:        .data
        !             9: 
        !            10:        .align  4
        !            11: fpenv:
        !            12:        .long   0, 0, 0, 0, 0, 0, 0, 0
        !            13: 
        !            14:        .text
        !            15: 
        !            16: .globl C(MaskExceptions)
        !            17: C(MaskExceptions):
        !            18:        fnstenv fpenv
        !            19:        orl             $0x3F,fpenv
        !            20:        fldenv  fpenv
        !            21: 
        !            22:        ret
        !            23: 
        !            24: #if 0
        !            25: .globl C(unmaskexceptions)
        !            26: C(unmaskexceptions):
        !            27:        fnstenv fpenv
        !            28:        andl            $0xFFFFFFE0,fpenv
        !            29:        fldenv  fpenv
        !            30: 
        !            31:        ret
        !            32: #endif
        !            33: 
        !            34:        .data
        !            35: 
        !            36:        .align  4
        !            37: .globl ceil_cw, single_cw, full_cw, cw, pushed_cw
        !            38: ceil_cw:       .long   0
        !            39: single_cw:     .long   0
        !            40: full_cw:       .long   0
        !            41: cw:                    .long   0
        !            42: pushed_cw:     .long   0
        !            43: 
        !            44:        .text
        !            45: 
        !            46: .globl C(Sys_LowFPPrecision)
        !            47: C(Sys_LowFPPrecision):
        !            48:        fldcw   single_cw
        !            49: 
        !            50:        ret
        !            51: 
        !            52: .globl C(Sys_HighFPPrecision)
        !            53: C(Sys_HighFPPrecision):
        !            54:        fldcw   full_cw
        !            55: 
        !            56:        ret
        !            57: 
        !            58: .globl C(Sys_PushFPCW_SetHigh)
        !            59: C(Sys_PushFPCW_SetHigh):
        !            60:        fnstcw  pushed_cw
        !            61:        fldcw   full_cw
        !            62: 
        !            63:        ret
        !            64: 
        !            65: .globl C(Sys_PopFPCW)
        !            66: C(Sys_PopFPCW):
        !            67:        fldcw   pushed_cw
        !            68: 
        !            69:        ret
        !            70: 
        !            71: .globl C(Sys_SetFPCW)
        !            72: C(Sys_SetFPCW):
        !            73:        fnstcw  cw
        !            74:        movl    cw,%eax
        !            75: #if    id386
        !            76:        andb    $0xF0,%ah
        !            77:        orb             $0x03,%ah       // round mode, 64-bit precision
        !            78: #endif
        !            79:        movl    %eax,full_cw
        !            80: 
        !            81: #if    id386
        !            82:        andb    $0xF0,%ah
        !            83:        orb             $0x0C,%ah       // chop mode, single precision
        !            84: #endif
        !            85:        movl    %eax,single_cw
        !            86: 
        !            87: #if    id386
        !            88:        andb    $0xF0,%ah
        !            89:        orb             $0x08,%ah       // ceil mode, single precision
        !            90: #endif
        !            91:        movl    %eax,ceil_cw
        !            92: 
        !            93:        ret
        !            94: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.