- pi_vers = fromInteger $4, -- Module version
- pi_orphan = $5,
- pi_exports = $8, -- Exports
- pi_usages = $9, -- Usages
- pi_insts = $10, -- Local instances
- pi_decls = $11, -- Decls
- pi_rules = fst $12, -- Rules
- pi_deprecs = snd $12 -- Deprecations
- } }
+ pi_vers = $4, -- Module version
+ pi_orphan = $6,
+ pi_exports = $9, -- Exports
+ pi_usages = $10, -- Usages
+ pi_fixity = (fst $5,$11), -- Fixies
+ pi_insts = $12, -- Local instances
+ pi_decls = $13, -- Decls
+ pi_rules = (snd $5,fst $14), -- Rules
+ pi_deprecs = snd $14 -- Deprecations
+ } }
+
+-- Versions for fixities and rules (optional)
+sub_versions :: { (Version,Version) }
+ : '[' version version ']' { ($2,$3) }
+ | {- empty -} { (initialVersion, initialVersion) }