- {$IFDEF FPC}
- {$IFDEF CPU386}
- const
- Default8087CW: Word = $1332;
- pad0:word=$0;//<--ein word extra korrigiert das alignment wieder auf 4 und somit können auch die sehr strikten dynlib loader wieder ihren dienst machen
- procedure Set8087CW(NewCW: Word); assembler;
- asm
- MOV Default8087CW, AX
- end;
- {$ENDIF}
- {$ENDIF}
- initialization