mirror of
https://github.com/QuantumLeaps/qpc.git
synced 2025-01-21 06:53:11 +08:00
77 lines
2.6 KiB
NASM
77 lines
2.6 KiB
NASM
;*****************************************************************************
|
|
; Purpose: FPU_save() and FPU_restore() implementation for x86/x87
|
|
; Last Updated for Version: 4.0.00
|
|
; Date of the Last Update: Feb 18, 2008
|
|
;
|
|
; Q u a n t u m L e a P s
|
|
; ---------------------------
|
|
; innovating embedded systems
|
|
;
|
|
; Copyright (C) 2002-2008 Quantum Leaps, LLC. All rights reserved.
|
|
;
|
|
; This software may be distributed and modified under the terms of the GNU
|
|
; General Public License version 2 (GPL) as published by the Free Software
|
|
; Foundation and appearing in the file GPL.TXT included in the packaging of
|
|
; this file. Please note that GPL Section 2[b] requires that all works based
|
|
; on this software must also be made publicly available under the terms of
|
|
; the GPL ("Copyleft").
|
|
;
|
|
; Alternatively, this software may be distributed and modified under the
|
|
; terms of Quantum Leaps commercial licenses, which expressly supersede
|
|
; the GPL and are specifically designed for licensees interested in
|
|
; retaining the proprietary status of their code.
|
|
;
|
|
; Contact information:
|
|
; Quantum Leaps Web site: http://www.quantum-leaps.com
|
|
; e-mail: info@quantum-leaps.com
|
|
;*****************************************************************************
|
|
|
|
PUBLIC _FPU_save
|
|
PUBLIC _FPU_restore
|
|
|
|
.MODEL LARGE
|
|
.CODE
|
|
.386
|
|
|
|
;*****************************************************************************
|
|
; void FPU_save(FPU_context *ctx);
|
|
|
|
_FPU_save PROC FAR
|
|
PUSH BP ; Save work registers
|
|
MOV BP,SP
|
|
PUSH ES
|
|
PUSH BX
|
|
;
|
|
LES BX, DWORD PTR [BP+6] ; Point to FPU context memory
|
|
;
|
|
FSAVE ES:[BX] ; Save FPU context
|
|
;
|
|
POP BX ; Restore work registers
|
|
POP ES
|
|
POP BP
|
|
;
|
|
RET ; Return to caller
|
|
_FPU_save ENDP
|
|
|
|
;*****************************************************************************
|
|
; void FPU_restore(FPU_context *ctx);
|
|
|
|
_FPU_restore PROC FAR
|
|
PUSH BP ; Save work registers
|
|
MOV BP,SP
|
|
PUSH ES
|
|
PUSH BX
|
|
;
|
|
LES BX, DWORD PTR [BP+6] ; Point to FPU context memory
|
|
;
|
|
FRSTOR ES:[BX] ; Restore FPU context
|
|
;
|
|
POP BX ; Restore work registers
|
|
POP ES
|
|
POP BP
|
|
;
|
|
RET ; Return to caller
|
|
_FPU_restore ENDP
|
|
|
|
END
|