|
@@ -28,6 +28,7 @@ var s : string;
|
|
|
array[0..max_regcount-1] of string[63];
|
|
|
regnumber_index,std_regname_index,int_regname_index,att_regname_index,
|
|
|
nasm_regname_index:array[0..max_regcount-1] of byte;
|
|
|
+ i8086 : boolean;
|
|
|
x86_64 : boolean;
|
|
|
fileprefix : string;
|
|
|
|
|
@@ -404,16 +405,18 @@ begin
|
|
|
writeln('Register Table Converter Version ',Version);
|
|
|
if paramcount=0 then
|
|
|
begin
|
|
|
+ i8086:=false;
|
|
|
x86_64:=false;
|
|
|
end
|
|
|
else
|
|
|
begin
|
|
|
+ i8086:=paramstr(1)='i8086';
|
|
|
x86_64:=paramstr(1)='x86_64';
|
|
|
if (paramcount<>1) or
|
|
|
- ((paramstr(1)<>'i386') and (paramstr(1)<>'x86_64')) then
|
|
|
+ ((paramstr(1)<>'i8086') and (paramstr(1)<>'i386') and (paramstr(1)<>'x86_64')) then
|
|
|
begin
|
|
|
writeln('Usage: ',paramstr(0));
|
|
|
- writeln('Only one optional parameter is allowed: i386 or x86_64');
|
|
|
+ writeln('Only one optional parameter is allowed: i8086, i386 or x86_64');
|
|
|
halt(1);
|
|
|
end;
|
|
|
end;
|
|
@@ -422,6 +425,11 @@ begin
|
|
|
fileprefix:='r8664';
|
|
|
writeln('Processing for CPU x86_64');
|
|
|
end
|
|
|
+ else if i8086 then
|
|
|
+ begin
|
|
|
+ fileprefix:='r8086';
|
|
|
+ writeln('Processing for CPU i8086');
|
|
|
+ end
|
|
|
else
|
|
|
begin
|
|
|
fileprefix:='r386';
|