paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-18 23:51:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ generate also i386nop.inc containing the number of opcodes

Browse Source
This commit is contained in:
pierre 2000-05-09 06:39:17 +00:00
parent bf20aa47d9
commit d4df420802
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/utils/nasmconv.pp
View File

@ -203,7 +203,8 @@ var
maxinfolen, maxinfolen,
code : byte; code : byte;
insns : longint; insns : longint;
attsuffile,propfile,opfile,attfile,intfile, attsuffile,propfile,opfile,
nopfile,attfile,intfile,
infile,insfile : text; infile,insfile : text;
{ instruction fields } { instruction fields }
last, last,
@ -224,6 +225,9 @@ begin
{ create inc files } { create inc files }
openinc(insfile,'i386tab.inc'); openinc(insfile,'i386tab.inc');
openinc(opfile,'i386op.inc'); openinc(opfile,'i386op.inc');
assign(nopfile,'i386nop.inc');
rewrite(nopfile);
writeln(nopfile,'{ don''t edit, this file is generated from i386ins.dat }');
openinc(attfile,'i386att.inc'); openinc(attfile,'i386att.inc');
openinc(attsuffile,'i386atts.inc'); openinc(attsuffile,'i386atts.inc');
openinc(intfile,'i386int.inc'); openinc(intfile,'i386int.inc');
@ -418,12 +422,17 @@ begin
closeinc(attfile); closeinc(attfile);
closeinc(attsuffile); closeinc(attsuffile);
closeinc(opfile); closeinc(opfile);
writeln(nopfile,insns,';');
close(nopfile);
closeinc(propfile); closeinc(propfile);
writeln(insns,' nodes procesed (maxinfolen=',maxinfolen,')'); writeln(insns,' nodes procesed (maxinfolen=',maxinfolen,')');
end. end.
{ {
$Log$ $Log$
Revision 1.9 2000-04-04 13:44:03 pierre Revision 1.10 2000-05-09 06:39:17 pierre
+ generate also i386nop.inc containing the number of opcodes
Revision 1.9 2000/04/04 13:44:03 pierre
+ R suffix for integer FPU operations + R suffix for integer FPU operations
Revision 1.8 2000/02/09 13:23:11 peter Revision 1.8 2000/02/09 13:23:11 peter