package catala
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page
Compiler and library for the literate programming language for tax code specification
Install
dune-project
Dependency
Authors
Maintainers
Sources
1.0.0-beta.tar.gz
md5=c41cbc1fa003e167bbc0bb1cd7723ab3
sha512=1e07951e2d73040bc0bea89f04bcb50c3a533323a7c7d8bac9ee9aa6be5233f795a32857421d04f17e52a841057cdc78b33f79fa239a17dd12de97a738c81999
doc/catala.shared_ast/Shared_ast/Print/index.html
Module Shared_ast.PrintSource
Printing functions for the default calculus AST
Common syntax highlighting helpers
The argument is assumed to be 1-column wide (but can be a multi-char utf8 character)
Some basic stringifiers
Prints the operator symbols with kind suffixes, as expected by the OCaml backend (e.g. "+^", "+$", etc.)
Formatters
Source
val external_ref :
Format.formatter ->
Shared_ast__.Definitions.external_ref Catala_utils.Mark.pos ->
unitSource
val typ :
Format.formatter ->
Shared_ast__.Definitions.naked_typ Catala_utils.Mark.pos ->
unitSource
val expr :
?debug:bool ->
unit ->
Format.formatter ->
(('a, 'a, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed ->
unitExpression printer.
Source
val s_expr :
Format.formatter ->
((_, _, _) Shared_ast__.Definitions.base_gexpr,
_ Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed ->
unitS-expression printer for all AST nodes.
Generic expression printer interface
Source
val scope :
?debug:bool ->
Format.formatter ->
(string
* (('a, 'a, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed
Shared_ast__.Definitions.scope_body) ->
unitSource
val program :
?debug:bool ->
Format.formatter ->
(('a, 'a, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed
Shared_ast__.Definitions.program ->
unitUser-facing, localised printer
/
Source
val skip_wrappers :
(('a, 'a, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed ->
(('a, 'a, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.edThis is exported from Expr, but first defined here for dependency reasons
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page