Set up coprocessor emulation.
Source position: emu387.pp line 20
procedure npxsetup( |
prog_name: string |
); |
npxsetup checks whether a coprocessor is found. If not, it loads the file wmemu387.dxe into memory and initializes the code in it.
If the environment variable 387 is set to N, then the emulation will be loaded, even if there is a coprocessor present. If the variable doesn't exist, or is set to any other value, the unit will try to detect the presence of a coprocessor unit.
The function searches the file wmemu387.dxe in the following way:
It should never be necessary to call this function, because the initialization code of the unit contains a call to the function with as an argument paramstr(0). This means that you should deliver the file wmemu387.dxe together with your program.
If there is an error, an error message is printed to standard error, and the program is halted, since any floating-point code is bound to fail anyhow.