mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 12:29:25 +02:00
* simplified flag_2_cond array range
git-svn-id: trunk@29852 -
This commit is contained in:
parent
51a094a917
commit
01a6777530
@ -429,7 +429,7 @@ unit cpubase;
|
||||
|
||||
function flags_to_cond(const f: TResFlags) : TAsmCond;
|
||||
const
|
||||
flag_2_cond: array[F_EQ..F_LE] of TAsmCond =
|
||||
flag_2_cond: array[TResFlags] of TAsmCond =
|
||||
(C_EQ,C_NE,C_HI,C_LO,C_MI,C_PL,C_VS,C_VC,C_HI,C_LS,
|
||||
C_GE,C_LT,C_GT,C_LE);
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user