2019-07-18 02:45:36 +00:00
|
|
|
--- ghc-8.6.3/docs/users_guide/flags.py~ 2018-09-21 06:18:23.000000000 +0800
|
|
|
|
+++ ghc-8.6.3/docs/users_guide/flags.py 2019-03-05 10:20:38.639782096 +0800
|
|
|
|
@@ -49,6 +49,8 @@
|
|
|
|
import sphinx
|
2019-02-15 17:30:47 +00:00
|
|
|
from sphinx import addnodes
|
|
|
|
from sphinx.domains.std import GenericObject
|
|
|
|
+from sphinx.domains import ObjType
|
|
|
|
+from sphinx.roles import XRefRole
|
|
|
|
from sphinx.errors import SphinxError
|
2019-07-18 02:45:36 +00:00
|
|
|
from distutils.version import LooseVersion
|
2019-02-15 17:30:47 +00:00
|
|
|
from utils import build_table_from_list
|
2019-07-18 02:45:36 +00:00
|
|
|
@@ -603,14 +605,21 @@
|
|
|
|
sphinx_version = LooseVersion(sphinx.__version__)
|
|
|
|
override_arg = {'override': True} if sphinx_version >= LooseVersion('1.8') else {}
|
2019-02-15 17:30:47 +00:00
|
|
|
|
|
|
|
+ # Yuck: We can't use app.add_object_type since we need to provide the
|
|
|
|
+ # Directive instance ourselves.
|
|
|
|
+ std_object_types = app.registry.domain_object_types.setdefault('std', {})
|
2019-07-18 02:45:36 +00:00
|
|
|
+
|
2019-02-15 17:30:47 +00:00
|
|
|
# Add ghc-flag directive, and override the class with our own
|
|
|
|
- app.add_object_type('ghc-flag', 'ghc-flag')
|
2019-07-18 02:45:36 +00:00
|
|
|
app.add_directive_to_domain('std', 'ghc-flag', Flag, **override_arg)
|
2019-02-15 17:30:47 +00:00
|
|
|
+ app.add_role_to_domain('std', 'ghc-flag', XRefRole())
|
|
|
|
+ std_object_types['ghc-flag'] = ObjType('ghc-flag', 'ghc-flag')
|
|
|
|
|
|
|
|
# Add extension directive, and override the class with our own
|
|
|
|
- app.add_object_type('extension', 'extension')
|
2019-07-18 02:45:36 +00:00
|
|
|
app.add_directive_to_domain('std', 'extension', LanguageExtension,
|
|
|
|
**override_arg)
|
2019-02-15 17:30:47 +00:00
|
|
|
+ app.add_role_to_domain('std', 'extension', XRefRole())
|
|
|
|
+ std_object_types['extension'] = ObjType('ghc-flag', 'ghc-flag')
|
|
|
|
+
|
|
|
|
# NB: language-extension would be misinterpreted by sphinx, and produce
|
|
|
|
# lang="extensions" XML attributes
|
|
|
|
|