summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorDGA45 <59612603+DGA45@users.noreply.github.com>2020-02-03 13:58:10 (GMT)
committerGitHub <noreply@github.com>2020-02-03 13:58:10 (GMT)
commit08540e3909884e4ba560403bf0c8c1398c8d5b12 (patch)
tree545c9a0065c7680f8b87cdfd727e032de0dcae0a /src
parentb5fa3cd1c6e6240e20d3b80a70e3f04040b32021 (diff)
downloadDoxygen-08540e3909884e4ba560403bf0c8c1398c8d5b12.zip
Doxygen-08540e3909884e4ba560403bf0c8c1398c8d5b12.tar.gz
Doxygen-08540e3909884e4ba560403bf0c8c1398c8d5b12.tar.bz2
Fix #7495 generate "bitfield"
Fix missing "bitfield" property generation in Perlmod
Diffstat (limited to 'src')
-rw-r--r--src/perlmodgen.cpp9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/perlmodgen.cpp b/src/perlmodgen.cpp
index 4ecee5e..f6cd67f 100644
--- a/src/perlmodgen.cpp
+++ b/src/perlmodgen.cpp
@@ -1700,6 +1700,15 @@ void PerlModGenerator::generatePerlModForMember(const MemberDef *md,const Defini
}
}
+ /* DGA: fix #7495 Perlmod does not generate bitfield */
+ if (md->memberType() == MemberType_Variable && md->bitfieldString())
+ {
+ QCString bitfield = md->bitfieldString();
+ if (bitfield.at(0) == ':') bitfield = bitfield.mid(1);
+ m_output.addFieldQuotedString("bitfield", bitfield);
+ }
+ /* DGA: end of fix #7495 */
+
const MemberDef *rmd = md->reimplements();
if (rmd)
m_output.openHash("reimplements")