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.3.0.tar.gz
md5=59d0dd01df52c38a4d793b594f067d14
sha512=944b755f8b47cb14920994f03f022cc3ba6cdf5def1ae8ffda00a196fa97dcc5b57baf642a03068b79e949df2a98d5f0218e3358e549be1ff0f1cddda1e5f848
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 :
?pp_mark:(Format.formatter -> 'm Shared_ast__.Definitions.mark -> unit) ->
Format.formatter ->
((_, _, 'm) Shared_ast__.Definitions.base_gexpr,
'm Shared_ast__.Definitions.mark)
Catala_utils.Mark.ed ->
unitS-expression printer for all AST nodes.
Prints crossed out comparison operators, for nicer display of not (op (a, b)).
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