paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 10:49:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

Allow more than 255 registers.

Browse Source
This commit is contained in:
Margers 2025-06-02 18:28:25 +00:00 committed by FPK
parent 8720ab7d3d
commit f635354042
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/utils/mkx86reg.pp
View File

@ -1,7 +1,7 @@
{
Copyright (c) 1998-2002 by Peter Vreman and Florian Klaempfl
Convert i386reg.dat to several .inc files for usage with
Convert x86reg.dat to several .inc files for usage with
the Free pascal compiler
See the file COPYING.FPC, included in this distribution,
@ -16,14 +16,14 @@
{$i+}
program mkx86reg;
const Version = '1.00';
max_regcount = 255;
const Version = '1.01';
max_regcount = 511;
var s : string;
i : longint;
line : longint;
regcount:longint;
regcount_bsstart:byte;
regcount_bsstart:longint;
names,numbers,stdnames,intnames,nasmnames,attnames,stabs,dwarf16,dwarf32,dwarf64,ots,ops:
array[0..max_regcount-1] of string[63];
regnumber_index,std_regname_index,int_regname_index,att_regname_index,