procyberian/nasm
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

x86/insns-iflags.ph: add comments in iflag.c

Browse source 
Add comments to iflag.c so a human user can have any hope of
figuring out what a particular bitmask actually means.

Signed-off-by: H. Peter Anvin <hpa@zytor.com>
This commit is contained in:
H. Peter Anvin 2019-08-07 01:11:21 -07:00
parent 0d4d431a01
commit 21b0aa4c29
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
x86/insns-iflags.ph
View file

@ -115,12 +115,13 @@ if_end();
my %insns_flag_hash = ();
my @insns_flag_values = ();
my @insns_flag_lists = ();
sub insns_flag_index(@) {
return undef if $_[0] eq "ignore";
my @prekey = sort(@_);
my $key = join("", @prekey);
my $key = join(',', @prekey);
if (not defined($insns_flag_hash{$key})) {
my @newkey = (0) x $iflag_words;
@ -134,6 +135,7 @@ sub insns_flag_index(@) {
my $str = join(',', map { sprintf("UINT32_C(0x%08x)",$_) } @newkey);
push @insns_flag_values, $str;
push @insns_flag_lists, $key;
$insns_flag_hash{$key} = $#insns_flag_values;
}
@ -227,9 +229,10 @@ sub write_iflag_c() {
printf N "const iflag_t insns_flags[%d] = {\n",
$#insns_flag_values + 1;
foreach my $i (0 .. $#insns_flag_values) {
print N sprintf(" /* %4d */ {{ %s }},\n", $i, $insns_flag_values[$i]);
printf N " {{%s}}, /* %3d : %s */\n",
$insns_flag_values[$i], $i, $insns_flag_lists[$i];
}
print N "};\n\n";
print N "};\n";
close N;
}