diff options
| author | DGA45 <59612603+DGA45@users.noreply.github.com> | 2020-02-03 13:58:10 (GMT) |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-02-03 13:58:10 (GMT) |
| commit | 08540e3909884e4ba560403bf0c8c1398c8d5b12 (patch) | |
| tree | 545c9a0065c7680f8b87cdfd727e032de0dcae0a /src/perlmodgen.cpp | |
| parent | b5fa3cd1c6e6240e20d3b80a70e3f04040b32021 (diff) | |
| download | Doxygen-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/perlmodgen.cpp')
| -rw-r--r-- | src/perlmodgen.cpp | 9 |
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") |