mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 06:08:55 +02:00
* removed initfpu
git-svn-id: trunk@5296 -
This commit is contained in:
parent
13f359aa80
commit
5e860919f8
@ -233,14 +233,6 @@ end;
|
||||
Thread Handling
|
||||
*****************************************************************************}
|
||||
|
||||
procedure InitFPU;assembler;
|
||||
|
||||
asm
|
||||
fninit
|
||||
fldcw fpucw
|
||||
end;
|
||||
|
||||
|
||||
{ if return-value is <> 0, netware shows the message
|
||||
Unload Anyway ?
|
||||
To Disable unload at all, SetNLMDontUnloadFlag can be used on
|
||||
|
@ -216,14 +216,6 @@ end;
|
||||
Thread Handling
|
||||
*****************************************************************************}
|
||||
|
||||
procedure InitFPU;assembler;
|
||||
|
||||
asm
|
||||
fninit
|
||||
fldcw fpucw
|
||||
end;
|
||||
|
||||
|
||||
{ if return-value is <> 0, netware shows the message
|
||||
Unload Anyway ?
|
||||
To Disable unload at all, SetNLMDontUnloadFlag can be used on
|
||||
|
Loading…
Reference in New Issue
Block a user