mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 06:09:11 +02:00
+ added enum TNewExeTargetOS
git-svn-id: trunk@42187 -
This commit is contained in:
parent
471cb73c5f
commit
ded3dec22a
@ -346,6 +346,16 @@ interface
|
|||||||
nehfIsDLL); { bit 15 }
|
nehfIsDLL); { bit 15 }
|
||||||
TNewExeHeaderFlags = set of TNewExeHeaderFlag;
|
TNewExeHeaderFlags = set of TNewExeHeaderFlag;
|
||||||
|
|
||||||
|
TNewExeTargetOS = (
|
||||||
|
netoUnknown = $00,
|
||||||
|
netoOS2 = $01,
|
||||||
|
netoWindows = $02,
|
||||||
|
netoMultitaskingMsDos4 = $03,
|
||||||
|
netoWindows386 = $04,
|
||||||
|
netoBorlandOperatingSystemServices = $05,
|
||||||
|
netoPharLap286DosExtenderOS2 = $81,
|
||||||
|
netoPharLap286DosExtenderWindows = $82);
|
||||||
|
|
||||||
TOmfAssembler = class(tinternalassembler)
|
TOmfAssembler = class(tinternalassembler)
|
||||||
constructor create(info: pasminfo; smart:boolean);override;
|
constructor create(info: pasminfo; smart:boolean);override;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user