* Fixed spelling mistakes in comments.

* Fixed some OS/2 parameters.
This commit is contained in:
daniel 1998-06-15 13:34:24 +00:00
parent d9445e22e9
commit 58f554b16e

View File

@ -43,25 +43,26 @@ unit systems;
I386_ATT,I386_INTEL,I386_DIRECT I386_ATT,I386_INTEL,I386_DIRECT
{$endif} {$endif}
{$ifdef m68k} {$ifdef m68k}
M68K_MOT M68K_MOT
{$endif} {$endif}
); );
ttarget = ( ttarget = (
{$ifdef i386} {$ifdef i386}
target_GO32V1,target_GO32V2,target_LINUX,target_OS2,target_WIN32 target_GO32V1,target_GO32V2,target_LINUX,target_OS2,target_WIN32
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
target_Amiga,target_Atari,target_Mac68k,target_Linux target_Amiga,target_Atari,target_Mac68k,target_Linux
{$endif} {$endif}
); );
tasm = ( tasm = (
{$ifdef i386} {$ifdef i386}
as_o,as_asw,as_nasmcoff, as_nasmelf, as_nasmobj, as_tasm, as_masm as_o,as_o_aout,as_asw,as_nasmcoff, as_nasmelf, as_nasmobj,
{$endif} as_tasm, as_masm
{$endif}
{$ifdef m68k} {$ifdef m68k}
as_o,as_gas,as_mit,as_mot as_o,as_gas,as_mit,as_mot
{$endif} {$endif}
@ -106,7 +107,7 @@ unit systems;
exeext, exeext,
scriptext : string[4]; scriptext : string[4];
Cprefix : string[2]; Cprefix : string[2];
newline : string[2]; newline : string[2];
endian : tendian; endian : tendian;
use_function_relative_addresses : boolean; use_function_relative_addresses : boolean;
end; end;
@ -151,7 +152,7 @@ unit systems;
unitlibext, unitlibext,
asmext, asmext,
objext, objext,
exeext : string[4]; exeext : string[4];
os : tos; os : tos;
link : tlink; link : tlink;
assem : tasm; assem : tasm;
@ -196,7 +197,7 @@ implementation
newline : #13#10; newline : #13#10;
endian : endian_little; endian : endian_little;
use_function_relative_addresses : true use_function_relative_addresses : true
), ),
( (
name : 'GO32 V2 DOS extender'; name : 'GO32 V2 DOS extender';
sharedlibext : '.DLL'; sharedlibext : '.DLL';
@ -224,162 +225,171 @@ implementation
use_function_relative_addresses : true use_function_relative_addresses : true
), ),
( (
name : 'OS/2 (32bit)'; name : 'OS/2 via EMX';
sharedlibext : '.ao2'; sharedlibext : '.ao2';
staticlibext : '.a'; staticlibext : '.ao2';
sourceext : '.pp'; sourceext : '.pas';
pasext : '.pas'; pasext : '.pp';
exeext : '.exe'; exeext : '.exe';
scriptext : '.cmd'; scriptext : '.cmd';
Cprefix : '_'; Cprefix : '_';
newline : #13#10; newline : #13#10;
endian : endian_little; endian : endian_little;
use_function_relative_addresses : false use_function_relative_addresses : false
), ),
( (
name : 'Win32'; name : 'Win32';
sharedlibext : '.dll'; sharedlibext : '.dll';
staticlibext : '.a'; staticlibext : '.a';
sourceext : '.pp'; sourceext : '.pp';
pasext : '.pas'; pasext : '.pas';
exeext : '.exe'; exeext : '.exe';
scriptext : '.bat'; scriptext : '.bat';
Cprefix : '_'; Cprefix : '_';
newline : #13#10; newline : #13#10;
endian : endian_little; endian : endian_little;
use_function_relative_addresses : true use_function_relative_addresses : true
) )
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
( (
name : 'Commodore Amiga'; name : 'Commodore Amiga';
sharedlibext : '.library'; sharedlibext : '.library';
staticlibext : '.a'; staticlibext : '.a';
sourceext : '.pp'; sourceext : '.pp';
pasext : '.pas'; pasext : '.pas';
exeext : ''; exeext : '';
scriptext : ''; scriptext : '';
Cprefix : ''; Cprefix : '';
newline : #10; newline : #10;
endian : en_big_endian; endian : en_big_endian;
use_function_relative_addresses : false use_function_relative_addresses : false
), ),
( (
name : 'Atari ST/STE'; name : 'Atari ST/STE';
sharedlibext : '.dll'; sharedlibext : '.dll';
staticlibext : '.a'; staticlibext : '.a';
sourceext : '.pp'; sourceext : '.pp';
pasext : '.pas'; pasext : '.pas';
exeext : '.tpp'; exeext : '.tpp';
scriptext : ''; scriptext : '';
Cprefix : ''; Cprefix : '';
newline : #10; newline : #10;
endian : en_big_endian; endian : en_big_endian;
use_function_relative_addresses : false use_function_relative_addresses : false
), ),
( (
name : 'Macintosh m68k'; name : 'Macintosh m68k';
sharedlibext : '.dll'; sharedlibext : '.dll';
staticlibext : '.a'; staticlibext : '.a';
sourceext : '.pp'; sourceext : '.pp';
pasext : '.pas'; pasext : '.pas';
exeext : '.tpp'; exeext : '.tpp';
scriptext : ''; scriptext : '';
Cprefix : ''; Cprefix : '';
newline : #13; newline : #13;
endian : en_big_endian; endian : en_big_endian;
use_function_relative_addresses : false use_function_relative_addresses : false
), ),
( (
name : 'Linux-m68k'; name : 'Linux-m68k';
sharedlibext : '.so'; sharedlibext : '.so';
staticlibext : '.a'; staticlibext : '.a';
sourceext : '.pp'; sourceext : '.pp';
pasext : '.pas'; pasext : '.pas';
exeext : ''; exeext : '';
scriptext : '.sh'; scriptext : '.sh';
Cprefix : ''; Cprefix : '';
newline : #10; newline : #10;
endian : en_big_endian; endian : en_big_endian;
use_function_relative_addresses : true use_function_relative_addresses : true
) )
{$endif m68k} {$endif m68k}
); );
{**************************************************************************** {****************************************************************************
Assembler Info Assembler Info
****************************************************************************} ****************************************************************************}
as_infos : array[tasm] of tasminfo = ( as_infos : array[tasm] of tasminfo = (
{$ifdef i386} {$ifdef i386}
( (
id : as_o; id : as_o;
idtxt : 'O'; idtxt : 'O';
asmbin : 'as'; asmbin : 'as';
asmcmd : '-D -o $OBJ $ASM'; asmcmd : '-D -o $OBJ $ASM';
externals : false; externals : false;
labelprefix : '.L'; labelprefix : '.L';
comment : '# ' comment : '# '
) )
,( ,(
id : as_asw; id : as_o_aout;
idtxt : 'ASW'; idtxt : 'O';
asmbin : 'asw'; asmbin : 'as';
asmcmd : '-D -o $OBJ $ASM'; asmcmd : '-D -o $OBJ $ASM';
externals : false; externals : false;
labelprefix : '.L'; labelprefix : 'L';
comment : '# ' comment : '# '
) )
,( ,(
id : as_nasmcoff; id : as_asw;
idtxt : 'NASMCOFF'; idtxt : 'ASW';
asmbin : 'nasm'; asmbin : 'asw';
asmcmd : '-f coff -o $OBJ $ASM'; asmcmd : '-D -o $OBJ $ASM';
externals : true; externals : false;
labelprefix : 'L'; labelprefix : '.L';
comment : '; ' comment : '# '
) )
,( ,(
id : as_nasmelf; id : as_nasmcoff;
idtxt : 'NASMELF'; idtxt : 'NASMCOFF';
asmbin : 'nasm'; asmbin : 'nasm';
asmcmd : '-f elf -o $OBJ $ASM'; asmcmd : '-f coff -o $OBJ $ASM';
externals : true; externals : true;
labelprefix : 'L'; labelprefix : 'L';
comment : '; ' comment : '; '
) )
,( ,(
id : as_nasmobj; id : as_nasmelf;
idtxt : 'NASMOBJ'; idtxt : 'NASMELF';
asmbin : 'nasm'; asmbin : 'nasm';
asmcmd : '-f obj -o $OBJ $ASM'; asmcmd : '-f elf -o $OBJ $ASM';
externals : true; externals : true;
labelprefix : 'L'; labelprefix : 'L';
comment : '; ' comment : '; '
) )
,( ,(
id : as_tasm; id : as_nasmobj;
idtxt : 'TASM'; idtxt : 'NASMOBJ';
asmbin : 'tasm'; asmbin : 'nasm';
asmcmd : '/m2 $ASM $OBJ'; asmcmd : '-f obj -o $OBJ $ASM';
externals : true; externals : true;
labelprefix : '.L'; labelprefix : 'L';
comment : '; ' comment : '; '
) )
,( ,(
id : as_tasm; id : as_tasm;
idtxt : 'MASM'; idtxt : 'TASM';
asmbin : 'masm'; asmbin : 'tasm';
asmcmd : '$ASM $OBJ'; asmcmd : '/m2 $ASM $OBJ';
externals : true; externals : true;
labelprefix : '.L'; labelprefix : '.L';
comment : '; ' comment : '; '
) )
,(
id : as_tasm;
idtxt : 'MASM';
asmbin : 'masm';
asmcmd : '$ASM $OBJ';
externals : true;
labelprefix : '.L';
comment : '; '
)
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
( (
id : as_o; id : as_o;
idtxt : 'O'; idtxt : 'O';
asmbin : 'as'; asmbin : 'as';
asmcmd : '-D -o $OBJ $ASM'; asmcmd : '-D -o $OBJ $ASM';
externals : false; externals : false;
@ -397,7 +407,7 @@ implementation
) )
,( ,(
id : as_mit; id : as_mit;
idtxt : 'MIT'; idtxt : 'MIT';
asmbin : ''; asmbin : '';
asmcmd : '-o $OBJ $ASM'; asmcmd : '-o $OBJ $ASM';
externals : false; externals : false;
@ -409,7 +419,7 @@ implementation
idtxt : 'MOT'; idtxt : 'MOT';
asmbin : ''; asmbin : '';
asmcmd : '-o $OBJ $ASM'; asmcmd : '-o $OBJ $ASM';
externals : false; externals : false;
labelprefix : '__L'; labelprefix : '__L';
comment : '| ' comment : '| '
) )
@ -417,89 +427,89 @@ implementation
); );
{**************************************************************************** {****************************************************************************
Linker Info Linker Info
****************************************************************************} ****************************************************************************}
link_infos : array[tlink] of tlinkinfo = ( link_infos : array[tlink] of tlinkinfo = (
{$ifdef i386} {$ifdef i386}
( (
linkbin : 'ld'; linkbin : 'ld';
linkcmd : '$OPT -o $EXE $RES'; linkcmd : '$OPT -o $EXE $RES';
bindbin : ''; bindbin : '';
bindcmd : '';
stripopt : '-s';
libpathprefix : 'SEARCH_DIR(';
libpathsuffix : ')';
groupstart : 'GROUP(';
groupend : ')';
inputstart : 'INPUT(';
inputend : ')';
libprefix : '-l'
)
,(
linkbin : 'ld';
linkcmd : '-oformat coff-go32 $OPT -o $EXE @$RES';
bindbin : 'aout2exe';
bindcmd : '$EXE';
stripopt : '-s';
libpathprefix : '-L';
libpathsuffix : '';
groupstart : '-(';
groupend : '-)';
inputstart : '';
inputend : '';
libprefix : '-l'
)
,(
linkbin : 'ld';
linkcmd : '-oformat coff-go32-exe $OPT -o $EXE @$RES';
bindbin : '';
bindcmd : ''; bindcmd : '';
stripopt : '-s'; stripopt : '-s';
libpathprefix : '-L';
libpathsuffix : '';
groupstart : '-(';
groupend : '-)';
inputstart : '';
inputend : '';
libprefix : '-l'
)
,(
linkbin : 'ldw';
linkcmd : '$OPT -o $EXE $RES';
bindbin : '';
bindcmd : '';
stripopt : '-s';
libpathprefix : 'SEARCH_DIR('; libpathprefix : 'SEARCH_DIR(';
libpathsuffix : ')'; libpathsuffix : ')';
groupstart : 'GROUP('; groupstart : 'GROUP(';
groupend : ')'; groupend : ')';
inputstart : 'INPUT('; inputstart : 'INPUT(';
inputend : ')'; inputend : ')';
libprefix : '-l' libprefix : '-l'
) )
,( ,(
linkbin : 'ld'; linkbin : 'ld';
linkcmd : '-oformat coff-go32 $OPT -o $EXE @$RES'; linkcmd : '-o $EXE @$RES';
bindbin : 'aout2exe'; bindbin : 'emxbind';
bindcmd : '$EXE'; bindcmd : '-o $EXE.exe $EXE -k$STACKKB -aim -s$HEAPKB';
stripopt : '-s'; stripopt : '-s';
libpathprefix : '-L'; libpathprefix : '';
libpathsuffix : ''; libpathsuffix : '';
groupstart : '-('; groupstart : '-(';
groupend : '-)'; groupend : '-)';
inputstart : ''; inputstart : '';
inputend : ''; inputend : '';
libprefix : '-l' libprefix : ''
) )
,(
linkbin : 'ld';
linkcmd : '-oformat coff-go32-exe $OPT -o $EXE @$RES';
bindbin : '';
bindcmd : '';
stripopt : '-s';
libpathprefix : '-L';
libpathsuffix : '';
groupstart : '-(';
groupend : '-)';
inputstart : '';
inputend : '';
libprefix : '-l'
)
,(
linkbin : 'ldw';
linkcmd : '$OPT -o $EXE $RES';
bindbin : '';
bindcmd : '';
stripopt : '-s';
libpathprefix : 'SEARCH_DIR(';
libpathsuffix : ')';
groupstart : 'GROUP(';
groupend : ')';
inputstart : 'INPUT(';
inputend : ')';
libprefix : '-l'
)
,(
linkbin : 'ld';
linkcmd : '-o $EXE @$RES';
bindbin : 'emxbind';
bindcmd : '-o $EXE.exe $EXE -k$STACKKB -aim -s$HEAPKB';
stripopt : '-s';
libpathprefix : '-L';
libpathsuffix : '';
groupstart : '-(';
groupend : '-)';
inputstart : '';
inputend : '';
libprefix : ''
)
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
( (
linkbin : 'ld'; linkbin : 'ld';
linkcmd : '$OPT -o $EXE $RES'; linkcmd : '$OPT -o $EXE $RES';
bindbin : ''; bindbin : '';
bindcmd : ''; bindcmd : '';
stripopt : '-s'; stripopt : '-s';
libpathprefix : 'SEARCH_DIR('; libpathprefix : 'SEARCH_DIR(';
libpathsuffix : ')'; libpathsuffix : ')';
groupstart : 'GROUP('; groupstart : 'GROUP(';
groupend : ')'; groupend : ')';
@ -513,72 +523,72 @@ implementation
{**************************************************************************** {****************************************************************************
Ar Info Ar Info
****************************************************************************} ****************************************************************************}
ar_infos : array[tar] of tarinfo = ( ar_infos : array[tar] of tarinfo = (
{$ifdef i386} {$ifdef i386}
( (
arbin : 'ar'; arbin : 'ar';
arcmd : 'rs $LIB $FILES' arcmd : 'rs $LIB $FILES'
), ),
( (
arbin : 'arw'; arbin : 'arw';
arcmd : 'rs $LIB $FILES' arcmd : 'rs $LIB $FILES'
) )
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
( (
arbin : 'ar'; arbin : 'ar';
arcmd : 'rs $LIB $FILES' arcmd : 'rs $LIB $FILES'
) )
{$endif m68k} {$endif m68k}
); );
{**************************************************************************** {****************************************************************************
Targets Info Targets Info
****************************************************************************} ****************************************************************************}
target_infos : array[ttarget] of ttargetinfo = ( target_infos : array[ttarget] of ttargetinfo = (
{$ifdef i386} {$ifdef i386}
( (
target : target_GO32V1; target : target_GO32V1;
short_name : 'GO32V1'; short_name : 'GO32V1';
unit_env : 'GO32V1UNITS'; unit_env : 'GO32V1UNITS';
system_unit : 'SYSTEM'; system_unit : 'SYSTEM';
smartext : '.SL'; smartext : '.SL';
unitext : '.PP1'; unitext : '.PP1';
unitlibext : '.PPL'; unitlibext : '.PPL';
asmext : '.S1'; asmext : '.S1';
objext : '.O1'; objext : '.O1';
exeext : ''; { The linker procedures a.out } exeext : ''; { The linker produces a.out }
os : os_GO32V1; os : os_GO32V1;
link : link_ldgo32v1; link : link_ldgo32v1;
assem : as_o; assem : as_o;
ar : ar_ar ar : ar_ar
), ),
( (
target : target_GO32V2; target : target_GO32V2;
short_name : 'GO32V2'; short_name : 'GO32V2';
unit_env : 'GO32V2UNITS'; unit_env : 'GO32V2UNITS';
system_unit : 'SYSTEM'; system_unit : 'SYSTEM';
{$ifndef UseAnsiString} {$ifndef UseAnsiString}
smartext : '.SL'; smartext : '.SL';
unitext : '.PPU'; unitext : '.PPU';
unitlibext : '.PPL'; unitlibext : '.PPL';
asmext : '.S'; asmext : '.S';
objext : '.O'; objext : '.O';
exeext : '.EXE'; exeext : '.EXE';
{$else UseAnsiString} {$else UseAnsiString}
smartext : '.SL'; smartext : '.SL';
unitext : '.PAU'; unitext : '.PAU';
unitlibext : '.PPL'; unitlibext : '.PPL';
asmext : '.SA'; asmext : '.SA';
objext : '.OA'; objext : '.OA';
exeext : '.EXE'; exeext : '.EXE';
{$endif UseAnsiString} {$endif UseAnsiString}
os : os_GO32V2; os : os_GO32V2;
link : link_ldgo32v2; link : link_ldgo32v2;
assem : as_o; assem : as_o;
ar : ar_ar ar : ar_ar
), ),
( (
target : target_LINUX; target : target_LINUX;
short_name : 'LINUX'; short_name : 'LINUX';
unit_env : 'LINUXUNITS'; unit_env : 'LINUXUNITS';
@ -589,34 +599,34 @@ implementation
asmext : '.s'; asmext : '.s';
objext : '.o'; objext : '.o';
exeext : ''; exeext : '';
os : os_Linux; os : os_Linux;
link : link_ld; link : link_ld;
assem : as_o; assem : as_o;
ar : ar_ar ar : ar_ar
), ),
( (
target : target_OS2; target : target_OS2;
short_name : 'OS2'; short_name : 'OS2';
unit_env : 'OS2UNITS'; unit_env : 'OS2UNITS';
system_unit : 'SYSOS2'; system_unit : 'SYSOS2';
smartext : '.sl'; smartext : '.sl';
unitext : '.ppo'; unitext : '.ppo';
unitlibext : '.ppl'; unitlibext : '.ppl';
asmext : '.so2'; asmext : '.so2';
objext : '.oo2'; objext : '.oo2';
exeext : ''; { The linker procedures a.out } exeext : ''; { The linker produces a.out }
os : os_OS2; os : os_OS2;
link : link_ldos2; link : link_ldos2;
assem : as_o; assem : as_o_aout;
ar : ar_ar ar : ar_ar
), ),
( (
target : target_WIN32; target : target_WIN32;
short_name : 'WIN32'; short_name : 'WIN32';
unit_env : 'WIN32UNITS'; unit_env : 'WIN32UNITS';
system_unit : 'SYSWIN32'; system_unit : 'SYSWIN32';
smartext : '.sl'; smartext : '.sl';
unitext : '.ppw'; unitext : '.ppw';
unitlibext : '.ppl'; unitlibext : '.ppl';
asmext : '.s'; asmext : '.s';
objext : '.o'; objext : '.o';
@ -634,7 +644,7 @@ implementation
unit_env : ''; unit_env : '';
system_unit : 'sysamiga'; system_unit : 'sysamiga';
smartext : '.sl'; smartext : '.sl';
unitext : '.ppa'; unitext : '.ppa';
unitlibext : '.ppl'; unitlibext : '.ppl';
asmext : '.asm'; asmext : '.asm';
objext : '.o'; objext : '.o';
@ -643,12 +653,12 @@ implementation
link : link_ld; link : link_ld;
assem : as_o; assem : as_o;
ar : ar_ar ar : ar_ar
), ),
( (
target : target_Atari; target : target_Atari;
short_name : 'ATARI'; short_name : 'ATARI';
unit_env : ''; unit_env : '';
system_unit : 'SYSATARI'; system_unit : 'SYSATARI';
smartext : '.sl'; smartext : '.sl';
unitext : '.ppt'; unitext : '.ppt';
unitlibext : '.ppl'; unitlibext : '.ppl';
@ -661,7 +671,7 @@ implementation
ar : ar_ar ar : ar_ar
), ),
( (
target : target_Mac68k; target : target_Mac68k;
short_name : 'MACOS'; short_name : 'MACOS';
unit_env : ''; unit_env : '';
system_unit : 'sysmac'; system_unit : 'sysmac';
@ -679,7 +689,7 @@ implementation
( (
target : target_Linux; target : target_Linux;
short_name : 'LINUX'; short_name : 'LINUX';
unit_env : 'LINUXUNITS'; unit_env : 'LINUXUNITS';
system_unit : 'syslinux'; system_unit : 'syslinux';
smartext : '.sl'; smartext : '.sl';
unitext : '.ppu'; unitext : '.ppu';
@ -693,7 +703,7 @@ implementation
ar : ar_ar ar : ar_ar
) )
{$endif m68k} {$endif m68k}
); );
{**************************************************************************** {****************************************************************************
AsmModeInfo AsmModeInfo
@ -706,7 +716,7 @@ implementation
), ),
( (
id : I386_INTEL; id : I386_INTEL;
idtxt : 'INTEL' idtxt : 'INTEL'
), ),
( (
id : I386_ATT; id : I386_ATT;
@ -834,7 +844,13 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.18 1998-06-08 22:59:54 peter Revision 1.19 1998-06-15 13:34:24 daniel
* Fixed spelling mistakes in comments.
* Fixed some OS/2 parameters.
Revision 1.18 1998/06/08 22:59:54 peter
* smartlinking works for win32 * smartlinking works for win32
* some defines to exclude some compiler parts * some defines to exclude some compiler parts
@ -859,7 +875,7 @@ end.
* fixed dynamiclinker option which was added at the wrong place * fixed dynamiclinker option which was added at the wrong place
Revision 1.12 1998/05/23 01:21:32 peter Revision 1.12 1998/05/23 01:21:32 peter
+ aktasmmode, aktoptprocessor, aktoutputformat + aktasmmode, aktoptprocessor, aktoutputformat
+ smartlink per module $SMARTLINK-/+ (like MMX) and moved to aktswitches + smartlink per module $SMARTLINK-/+ (like MMX) and moved to aktswitches
+ $LIBNAME to set the library name where the unit will be put in + $LIBNAME to set the library name where the unit will be put in
* splitted cgi386 a bit (codeseg to large for bp7) * splitted cgi386 a bit (codeseg to large for bp7)
@ -904,7 +920,7 @@ end.
Revision 1.4 1998/04/27 15:45:20 peter Revision 1.4 1998/04/27 15:45:20 peter
+ -Xl for smartlink + -Xl for smartlink
+ target_info.arext = .a + target_info.arext = .a
Revision 1.3 1998/04/16 10:50:45 daniel Revision 1.3 1998/04/16 10:50:45 daniel
* Fixed some things that were broken for OS/2. * Fixed some things that were broken for OS/2.