Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Module type Html_sigs.T

module type T = sig..end

Signature of typesafe constructors for HTML documents.


type +'a elt

HTML elements.

Element constructors are in section elements. Most elements constructors are either nullary, unary or star, depending on the number of children they accept. Children are usually given as a list of elements. txt is used for text.

div [a [txt "Foo"]] is equivalent to <div><a>foo</a></div>

The type variable 'a is used to track the element's type. This allows the OCaml typechecker to check HTML validity.

For example, div [] is of type [> `Div] elt. The span function only accepts children of type Html_types.span_content. Since `Div is not part of it. span [div []] will not typecheck.

Note that the concrete implementation of this type can vary. See Html_sigs.T.Xml for details.

type doc = Html_types.html elt

A complete HTML document.

type +'a attrib

HTML attributes

Attribute constructors are in section attributes and their name starts with a_. Attributes are given to elements with the ~a optional argument.

a ~a:[a_href "ocsigen.org"] [txt "link!"] is equivalent to <a href="ocsigen.org">link!</a>

Similarly to elt, attributes use the OCaml type system to enforce HTML validity.

For example Html_sigs.T.a_href returns a value of type [> `Href] attrib. The div function only accepts attributes of type Html_types.div_attrib. Since `Href is not part of it, div ~a:[a_href "ocsigen.org"] [] will not typecheck.

In some cases, attributes have to be disambiguated. The max attribute has two version, Html_sigs.T.a_max and Html_sigs.T.a_input_max, depending on the element. Such disambiguated attribute will contain the name of the associated element.

module Xml : Xml_sigs.T

Underlying XML data-structure

type 'a wrap = 'a Xml.W.t

wrap is a container for elements and values.

In most cases, 'a wrap = 'a. For R modules (in eliom or js_of_ocaml), It will be React.S.t.

type 'a list_wrap = 'a Xml.W.tlist

list_wrap is a container for list of elements.

In most cases, 'a list_wrap = 'a list. For R modules (in eliom or js_of_ocaml), It will be ReactiveData.RList.t.

type ('a, 'b) nullary = ?a:'a attrib list -> unit -> 'b elt

A nullary element is an element that doesn't have any children.

type ('a, 'b, 'c) unary = 
  ?a:'a attrib list ->
  'b elt wrap -> 'c elt

A unary element is an element that have exactly one children.

type ('a, 'b, 'c) star = 
  ?a:'a attrib list ->
  'b elt list_wrap -> 'c elt

A star element is an element that has any number of children, including zero.

module Svg : Svg_sigs.Twith module Xml := Xml

Associated SVG module, for the Html_sigs.T.svg combinator.

module Info : Xml_sigs.Info

Various information about HTML, such as the doctype, ...

Uri

type uri = Xml.uri
val string_of_uri : (uri, string) Xml.W.ft
val uri_of_string : (string, uri) Xml.W.ft

Attributes

val a_class : Html_types.nmtokens wrap -> [> `Class ] attrib

This attribute assigns a class name or set of class names to an element. Any number of elements may be assigned the same class name or names.

val a_user_data : 
  Html_types.nmtoken ->
  Html_types.text wrap -> [> `User_data ] attrib

May be used to specify custom attributes. The example given by the W3C is as follows : {{{<ol> <li data-length="2m11s">Beyond The Sea</li> </ol>}}} It should be used for preprocessing ends only.

val a_id : Html_types.text wrap -> [> `Id ] attrib

This attribute assigns a name to an element. This name must be unique in a document. The text should be without any space.

val a_title : Html_types.text wrap -> [> `Title ] attrib

This attribute offers advisory information about the element for which it is set.

Values of the title attribute may be rendered by user agents in a variety of ways. For instance, visual browsers frequently display the title as a tool tip (a short message that appears when the pointing device pauses over an object). Audio user agents may speak the title information in a similar context.

The title attribute has an additional role when used with the link element to designate an external style sheet. Please consult the section on links and style sheets for details.

I18N

val a_xml_lang : 
  Html_types.languagecode wrap ->
  [> `XML_lang ] attrib
val a_lang : 
  Html_types.languagecode wrap ->
  [> `Lang ] attrib

Events

Javascript events

val a_onabort : Xml.event_handler -> [> `OnAbort ] attrib
val a_onafterprint : Xml.event_handler -> [> `OnAfterPrint ] attrib
val a_onbeforeprint : Xml.event_handler -> [> `OnBeforePrint ] attrib
val a_onbeforeunload : Xml.event_handler -> [> `OnBeforeUnload ] attrib
val a_onblur : Xml.event_handler -> [> `OnBlur ] attrib
val a_oncanplay : Xml.event_handler -> [> `OnCanPlay ] attrib
val a_oncanplaythrough : Xml.event_handler -> [> `OnCanPlayThrough ] attrib
val a_onchange : Xml.event_handler -> [> `OnChange ] attrib
val a_onclose : Xml.event_handler -> [> `OnClose ] attrib
val a_ondurationchange : Xml.event_handler -> [> `OnDurationChange ] attrib
val a_onemptied : Xml.event_handler -> [> `OnEmptied ] attrib
val a_onended : Xml.event_handler -> [> `OnEnded ] attrib
val a_onerror : Xml.event_handler -> [> `OnError ] attrib
val a_onfocus : Xml.event_handler -> [> `OnFocus ] attrib
val a_onformchange : Xml.event_handler -> [> `OnFormChange ] attrib
val a_onforminput : Xml.event_handler -> [> `OnFormInput ] attrib
val a_onhashchange : Xml.event_handler -> [> `OnHashChange ] attrib
val a_oninput : Xml.event_handler -> [> `OnInput ] attrib
val a_oninvalid : Xml.event_handler -> [> `OnInvalid ] attrib
val a_onmousewheel : Xml.event_handler -> [> `OnMouseWheel ] attrib
val a_onoffline : Xml.event_handler -> [> `OnOffLine ] attrib
val a_ononline : Xml.event_handler -> [> `OnOnLine ] attrib
val a_onpause : Xml.event_handler -> [> `OnPause ] attrib
val a_onplay : Xml.event_handler -> [> `OnPlay ] attrib
val a_onplaying : Xml.event_handler -> [> `OnPlaying ] attrib
val a_onpagehide : Xml.event_handler -> [> `OnPageHide ] attrib
val a_onpageshow : Xml.event_handler -> [> `OnPageShow ] attrib
val a_onpopstate : Xml.event_handler -> [> `OnPopState ] attrib
val a_onprogress : Xml.event_handler -> [> `OnProgress ] attrib
val a_onratechange : Xml.event_handler -> [> `OnRateChange ] attrib
val a_onreadystatechange : 
  Xml.event_handler -> [> `OnReadyStateChange ] attrib
val a_onredo : Xml.event_handler -> [> `OnRedo ] attrib
val a_onresize : Xml.event_handler -> [> `OnResize ] attrib
val a_onscroll : Xml.event_handler -> [> `OnScroll ] attrib
val a_onseeked : Xml.event_handler -> [> `OnSeeked ] attrib
val a_onseeking : Xml.event_handler -> [> `OnSeeking ] attrib
val a_onselect : Xml.event_handler -> [> `OnSelect ] attrib
val a_onshow : Xml.event_handler -> [> `OnShow ] attrib
val a_onstalled : Xml.event_handler -> [> `OnStalled ] attrib
val a_onstorage : Xml.event_handler -> [> `OnStorage ] attrib
val a_onsubmit : Xml.event_handler -> [> `OnSubmit ] attrib
val a_onsuspend : Xml.event_handler -> [> `OnSuspend ] attrib
val a_ontimeupdate : Xml.event_handler -> [> `OnTimeUpdate ] attrib
val a_onundo : Xml.event_handler -> [> `OnUndo ] attrib
val a_onunload : Xml.event_handler -> [> `OnUnload ] attrib
val a_onvolumechange : Xml.event_handler -> [> `OnVolumeChange ] attrib
val a_onwaiting : Xml.event_handler -> [> `OnWaiting ] attrib
val a_onload : Xml.event_handler -> [> `OnLoad ] attrib
val a_onloadeddata : Xml.event_handler -> [> `OnLoadedData ] attrib
val a_onloadedmetadata : Xml.event_handler -> [> `OnLoadedMetaData ] attrib
val a_onloadstart : Xml.event_handler -> [> `OnLoadStart ] attrib
val a_onmessage : Xml.event_handler -> [> `OnMessage ] attrib

Mouse events

val a_onclick : Xml.mouse_event_handler -> [> `OnClick ] attrib
val a_oncontextmenu : Xml.mouse_event_handler -> [> `OnContextMenu ] attrib
val a_ondblclick : Xml.mouse_event_handler -> [> `OnDblClick ] attrib
val a_ondrag : Xml.mouse_event_handler -> [> `OnDrag ] attrib
val a_ondragend : Xml.mouse_event_handler -> [> `OnDragEnd ] attrib
val a_ondragenter : Xml.mouse_event_handler -> [> `OnDragEnter ] attrib
val a_ondragleave : Xml.mouse_event_handler -> [> `OnDragLeave ] attrib
val a_ondragover : Xml.mouse_event_handler -> [> `OnDragOver ] attrib
val a_ondragstart : Xml.mouse_event_handler -> [> `OnDragStart ] attrib
val a_ondrop : Xml.mouse_event_handler -> [> `OnDrop ] attrib
val a_onmousedown : Xml.mouse_event_handler -> [> `OnMouseDown ] attrib
val a_onmouseup : Xml.mouse_event_handler -> [> `OnMouseUp ] attrib
val a_onmouseover : Xml.mouse_event_handler -> [> `OnMouseOver ] attrib
val a_onmousemove : Xml.mouse_event_handler -> [> `OnMouseMove ] attrib
val a_onmouseout : Xml.mouse_event_handler -> [> `OnMouseOut ] attrib
val a_ontouchstart : Xml.touch_event_handler -> [> `OnTouchStart ] attrib

Touch events

val a_ontouchend : Xml.touch_event_handler -> [> `OnTouchEnd ] attrib
val a_ontouchmove : Xml.touch_event_handler -> [> `OnTouchMove ] attrib
val a_ontouchcancel : Xml.touch_event_handler -> [> `OnTouchCancel ] attrib

Keyboard events

val a_onkeypress : Xml.keyboard_event_handler -> [> `OnKeyPress ] attrib
val a_onkeydown : Xml.keyboard_event_handler -> [> `OnKeyDown ] attrib
val a_onkeyup : Xml.keyboard_event_handler -> [> `OnKeyUp ] attrib

Other attributes

val a_allowfullscreen : unit -> [> `Allowfullscreen ] attrib
val a_allowpaymentrequest : unit -> [> `Allowpaymentrequest ] attrib
val a_autocomplete : 
  Html_types.autocomplete_option wrap ->
  [> `Autocomplete ] attrib
val a_async : unit -> [> `Async ] attrib
val a_autofocus : unit -> [> `Autofocus ] attrib
val a_autoplay : unit -> [> `Autoplay ] attrib
val a_muted : unit -> [> `Muted ] attrib
val a_crossorigin : 
  [< `Anonymous | `Use_credentials ] wrap ->
  [> `Crossorigin ] attrib
val a_integrity : string wrap -> [> `Integrity ] attrib
val a_mediagroup : string wrap -> [> `Mediagroup ] attrib
val a_challenge : Html_types.text wrap -> [> `Challenge ] attrib
val a_contenteditable : bool wrap -> [> `Contenteditable ] attrib
val a_contextmenu : 
  Html_types.idref wrap ->
  [> `Contextmenu ] attrib
val a_controls : unit -> [> `Controls ] attrib
val a_dir : [< `Ltr | `Rtl ] wrap -> [> `Dir ] attrib
val a_draggable : bool wrap -> [> `Draggable ] attrib
val a_form : Html_types.idref wrap -> [> `Form ] attrib
val a_formaction : Xml.uri wrap -> [> `Formaction ] attrib
val a_formenctype : 
  Html_types.contenttype wrap ->
  [> `Formenctype ] attrib
val a_formnovalidate : unit -> [> `Formnovalidate ] attrib
val a_formtarget : 
  Html_types.text wrap ->
  [> `Formtarget ] attrib
val a_hidden : unit -> [> `Hidden ] attrib
val a_high : 
  Html_types.float_number wrap ->
  [> `High ] attrib
val a_icon : Xml.uri wrap -> [> `Icon ] attrib
val a_ismap : unit -> [> `Ismap ] attrib
val a_keytype : Html_types.text wrap -> [> `Keytype ] attrib
val a_list : Html_types.idref wrap -> [> `List ] attrib
val a_loop : unit -> [> `Loop ] attrib
val a_low : 
  Html_types.float_number wrap ->
  [> `High ] attrib
val a_max : 
  Html_types.float_number wrap ->
  [> `Max ] attrib
val a_input_max : 
  Html_types.number_or_datetime wrap ->
  [> `Input_Max ] attrib
val a_min : 
  Html_types.float_number wrap ->
  [> `Min ] attrib
val a_input_min : 
  Html_types.number_or_datetime wrap ->
  [> `Input_Min ] attrib
val a_inputmode : 
  [< `Decimal
   | `Email
   | `None
   | `Numeric
   | `Search
   | `Tel
   | `Text
   | `Url ]
  wrap -> [> `Inputmode ] attrib
val a_novalidate : unit -> [> `Novalidate ] attrib
val a_open : unit -> [> `Open ] attrib
val a_optimum : 
  Html_types.float_number wrap ->
  [> `Optimum ] attrib
val a_pattern : Html_types.text wrap -> [> `Pattern ] attrib
val a_placeholder : 
  Html_types.text wrap ->
  [> `Placeholder ] attrib
val a_poster : Xml.uri wrap -> [> `Poster ] attrib
val a_preload : 
  [< `Audio | `Metadata | `None ] wrap ->
  [> `Preload ] attrib
val a_pubdate : unit -> [> `Pubdate ] attrib
val a_radiogroup : 
  Html_types.text wrap ->
  [> `Radiogroup ] attrib
val a_referrerpolicy : 
  Html_types.referrerpolicy wrap ->
  [> `Referrerpolicy ] attrib
val a_required : unit -> [> `Required ] attrib
val a_reversed : unit -> [> `Reversed ] attrib
val a_sandbox : 
  [< Html_types.sandbox_token ] list wrap ->
  [> `Sandbox ] attrib
val a_spellcheck : bool wrap -> [> `Spellcheck ] attrib
val a_scoped : unit -> [> `Scoped ] attrib
val a_seamless : unit -> [> `Seamless ] attrib
val a_sizes : 
  (Html_types.number * Html_types.number) list option wrap ->
  [> `Sizes ] attrib
val a_span : Html_types.number wrap -> [> `Span ] attrib
val a_srclang : 
  Html_types.nmtoken wrap ->
  [> `XML_lang ] attrib

DeprecatedUse Html_sigs.T.a_xml_lang instead.

type image_candidate = 
  [ `Url of uri
  | `Url_pixel of uri * Html_types.float_number
  | `Url_width of uri * Html_types.number ]
val a_srcset : 
  image_candidate list wrap ->
  [> `Srcset ] attrib
val a_img_sizes : 
  Html_types.text list wrap ->
  [> `Img_sizes ] attrib
val a_start : Html_types.number wrap -> [> `Start ] attrib
val a_step : 
  Html_types.float_number option wrap ->
  [> `Step ] attrib
val a_translate : [< `No | `Yes ] wrap -> [> `Translate ] attrib
val a_wrap : [< `Hard | `Soft ] wrap -> [> `Wrap ] attrib
val a_version : Html_types.cdata wrap -> [> `Version ] attrib
val a_xmlns : 
  [< `W3_org_1999_xhtml ] wrap ->
  [> `XMLns ] attrib
val a_manifest : Xml.uri wrap -> [> `Manifest ] attrib
val a_cite : Xml.uri wrap -> [> `Cite ] attrib
val a_xml_space : 
  [< `Default | `Preserve ] wrap ->
  [> `XML_space ] attrib
val a_accesskey : 
  Html_types.character wrap ->
  [> `Accesskey ] attrib

This attribute assigns an access key to an element. An access key is a single character from the document character set. NB: authors should consider the input method of the expected reader when specifying an accesskey.

val a_charset : 
  Html_types.charset wrap ->
  [> `Charset ] attrib

This attribute specifies the character encoding of the resource designated by the link. Please consult the section on character encodings for more details.

val a_accept_charset : 
  Html_types.charsets wrap ->
  [> `Accept_charset ] attrib
val a_accept : 
  Html_types.contenttypes wrap ->
  [> `Accept ] attrib
val a_href : Xml.uri wrap -> [> `Href ] attrib

This attribute specifies the location of a Web resource, thus defining a link between the current element (the source anchor) and the destination anchor defined by this attribute.

val a_hreflang : 
  Html_types.languagecode wrap ->
  [> `Hreflang ] attrib

This attribute specifies the base language of the resource designated by href and may only be used when href is specified.

val a_download : string option wrap -> [> `Download ] attrib
val a_rel : Html_types.linktypes wrap -> [> `Rel ] attrib

This attribute describes the relationship from the current document to the anchor specified by the href attribute. The value of this attribute is a space-separated list of link types.

This attribute is used to describe a reverse link from the anchor specified by the href attribute to the current document. The value of this attribute is a space-separated list of link types.

val a_tabindex : 
  Html_types.number wrap ->
  [> `Tabindex ] attrib

This attribute specifies the position of the current element in the tabbing order for the current document. This value must be a number between 0 and 32767. User agents should ignore leading zeros.

val a_mime_type : 
  Html_types.contenttype wrap ->
  [> `Mime_type ] attrib

This attribute gives an advisory hint as to the content type of the content available at the link target address. It allows user agents to opt to use a fallback mechanism rather than fetch the content if they are advised that they will get content in a content type they do not support.Authors who use this attribute take responsibility to manage the risk that it may become inconsistent with the content available at the link target address.

val a_datetime : Html_types.cdata wrap -> [> `Datetime ] attrib
val a_action : Xml.uri wrap -> [> `Action ] attrib

This attribute specifies a form processing agent. User agent behavior for a value other than an HTTP URI is undefined.

val a_checked : unit -> [> `Checked ] attrib

When the type attribute has the value "radio" or "checkbox", this boolean attribute specifies that the button is on. User agents must ignore this attribute for other control types.

val a_cols : Html_types.number wrap -> [> `Cols ] attrib

This attribute specifies the visible width in average character widths. Users should be able to enter longer lines than this, so user agents should provide some means to scroll through the contents of the control when the contents extend beyond the visible area. User agents may wrap visible text lines to keep long lines visible without the need for scrolling.

val a_enctype : 
  Html_types.contenttype wrap ->
  [> `Enctype ] attrib
val a_label_for : 
  Html_types.idref wrap ->
  [> `Label_for ] attrib
val a_for : 
  Html_types.idref wrap ->
  [> `Label_for ] attrib

DeprecatedUse a_label_for

val a_output_for : 
  Html_types.idrefs wrap ->
  [> `Output_for ] attrib
val a_for_list : 
  Html_types.idrefs wrap ->
  [> `Output_for ] attrib

DeprecatedUse a_output_for

val a_maxlength : 
  Html_types.number wrap ->
  [> `Maxlength ] attrib
val a_minlength : 
  Html_types.number wrap ->
  [> `Minlength ] attrib
val a_method : [< `Get | `Post ] wrap -> [> `Method ] attrib
val a_formmethod : 
  [< `Get | `Post ] wrap ->
  [> `Formmethod ] attrib
val a_multiple : unit -> [> `Multiple ] attrib
val a_name : Html_types.text wrap -> [> `Name ] attrib

This attribute assigns the control name.

val a_rows : Html_types.number wrap -> [> `Rows ] attrib

This attribute specifies the number of visible text lines. Users should be able to enter more lines than this, so user agents should provide some means to scroll through the contents of the control when the contents extend beyond the visible area.

val a_selected : unit -> [> `Selected ] attrib

When set, this boolean attribute specifies that this option is pre-selected.

val a_size : Html_types.number wrap -> [> `Size ] attrib
val a_src : Xml.uri wrap -> [> `Src ] attrib
val a_input_type : 
  [< `Button
   | `Checkbox
   | `Color
   | `Date
   | `Datetime
   | `Datetime_local
   | `Email
   | `File
   | `Hidden
   | `Image
   | `Month
   | `Number
   | `Password
   | `Radio
   | `Range
   | `Reset
   | `Search
   | `Submit
   | `Tel
   | `Text
   | `Time
   | `Url
   | `Week ]
  wrap -> [> `Input_Type ] attrib
val a_text_value : 
  Html_types.text wrap ->
  [> `Text_Value ] attrib

This attribute specifies the initial value of the control. If this attribute is not set, the initial value is set to the contents of the option element.

val a_int_value : 
  Html_types.number wrap ->
  [> `Int_Value ] attrib
val a_value : Html_types.cdata wrap -> [> `Value ] attrib
val a_float_value : 
  Html_types.float_number wrap ->
  [> `Float_Value ] attrib
val a_disabled : unit -> [> `Disabled ] attrib
val a_readonly : unit -> [> `ReadOnly ] attrib
val a_button_type : 
  [< `Button | `Reset | `Submit ] wrap ->
  [> `Button_Type ] attrib
val a_script_type : 
  Html_types.script_type wrap ->
  [> `Script_type ] attrib
val a_command_type : 
  [< `Checkbox | `Command | `Radio ] wrap ->
  [> `Command_Type ] attrib
val a_menu_type : 
  [< `Context | `Toolbar ] wrap ->
  [> `Menu_Type ] attrib
val a_label : Html_types.text wrap -> [> `Label ] attrib
val a_align : 
  [< `Char | `Justify | `Left | `Right ] wrap ->
  [> `Align ] attrib

DeprecatedUse CSS text-align

val a_axis : Html_types.cdata wrap -> [> `Axis ] attrib

DeprecatedNot supported in HTML5

val a_colspan : Html_types.number wrap -> [> `Colspan ] attrib
val a_headers : Html_types.idrefs wrap -> [> `Headers ] attrib
val a_rowspan : Html_types.number wrap -> [> `Rowspan ] attrib
val a_scope : 
  [< `Col | `Colgroup | `Row | `Rowgroup ] wrap ->
  [> `Scope ] attrib

DeprecatedNot supported in HTML5

val a_summary : Html_types.text wrap -> [> `Summary ] attrib

DeprecatedMove content elsewhere or to a <caption> child

val a_border : Html_types.pixels wrap -> [> `Border ] attrib

DeprecatedUse CSS border and/or border-width

val a_rules : 
  [< `All | `Cols | `Groups | `None | `Rows ] wrap ->
  [> `Rules ] attrib

DeprecatedUse CSS border

val a_char : Html_types.character wrap -> [> `Char ] attrib

DeprecatedThe char attribute is not supported in HTML5

val a_alt : Html_types.text wrap -> [> `Alt ] attrib
val a_height : Html_types.number wrap -> [> `Height ] attrib
val a_width : Html_types.number wrap -> [> `Width ] attrib
type shape = [ `Circle | `Default | `Poly | `Rect ]
val a_shape : shape wrap -> [> `Shape ] attrib
val a_coords : Html_types.numbers wrap -> [> `Coords ] attrib
val a_usemap : Html_types.idref wrap -> [> `Usemap ] attrib
val a_data : Xml.uri wrap -> [> `Data ] attrib
val a_codetype : 
  Html_types.contenttype wrap ->
  [> `Codetype ] attrib

DeprecatedNot supported in HTML5

val a_frameborder : 
  [< `One | `Zero ] wrap ->
  [> `Frameborder ] attrib

DeprecatedUse CSS border

val a_marginheight : 
  Html_types.pixels wrap ->
  [> `Marginheight ] attrib

DeprecatedUse CSS

val a_marginwidth : 
  Html_types.pixels wrap ->
  [> `Marginwidth ] attrib

DeprecatedUse CSS

val a_scrolling : 
  [< `Auto | `No | `Yes ] wrap ->
  [> `Scrolling ] attrib
val a_target : 
  Html_types.frametarget wrap ->
  [> `Target ] attrib
val a_content : Html_types.text wrap -> [> `Content ] attrib
val a_http_equiv : 
  Html_types.text wrap ->
  [> `Http_equiv ] attrib
val a_defer : unit -> [> `Defer ] attrib
val a_media : 
  Html_types.mediadesc wrap ->
  [> `Media ] attrib
val a_style : string wrap -> [> `Style_Attr ] attrib
val a_property : string wrap -> [> `Property ] attrib

ARIA support

WAI-ARIA is a specification written by the W3C, defining a set of additional HTML attributes that can be applied to elements to provide additional semantics and improve accessibility wherever it is lacking.

See for example a [[ https://developer.mozilla.org/en-US/docs/Learn/Accessibility/WAI-ARIA_basics| WAI-ARIA tutorial]].

val a_role : string list wrap -> [> `Role ] attrib
val a_aria : 
  string ->
  string list wrap -> [> `Aria ] attrib

Basic support for WAI-ARIA attributes: a_aria "foo" corresponds to an "aria-foo" attribute. See also List of WAI-ARIA attributes

Elements

val txt : string wrap -> [> Html_types.txt ] elt
val html : 
  ?a:Html_types.html_attrib attrib list ->
  [< Html_types.head ] elt wrap ->
  [< Html_types.body ] elt wrap ->
  [> Html_types.html ] elt
val head : 
  ?a:Html_types.head_attrib attrib list ->
  [< Html_types.title ] elt wrap ->
  Html_types.head_content_fun elt list_wrap ->
  [> Html_types.head ] elt
val base : 
  ([< Html_types.base_attrib ], [> Html_types.base ])
  nullary
val title : 
  (Html_types.title_attrib, [< Html_types.title_content_fun ],
   [> Html_types.title ])
  unary
val body : 
  ([< Html_types.body_attrib ], [< Html_types.body_content_fun ],
   [> Html_types.body ])
  star
val svg : 
  ?a:[< Html_types.svg_attrib ] Svg.attrib list ->
  [< Html_types.svg_content ] Svg.elt list_wrap ->
  [> Html_types.svg ] elt

Section

val footer : 
  ([< Html_types.footer_attrib ], [< Html_types.footer_content_fun ],
   [> Html_types.footer ])
  star
val header : 
  ([< Html_types.header_attrib ], [< Html_types.header_content_fun ],
   [> Html_types.header ])
  star
val section : 
  ([< Html_types.section_attrib ], [< Html_types.section_content_fun ],
   [> Html_types.section ])
  star
val nav : 
  ([< Html_types.nav_attrib ], [< Html_types.nav_content_fun ],
   [> Html_types.nav ])
  star
val h1 : 
  ([< Html_types.h1_attrib ], [< Html_types.h1_content_fun ],
   [> Html_types.h1 ])
  star
val h2 : 
  ([< Html_types.h2_attrib ], [< Html_types.h2_content_fun ],
   [> Html_types.h2 ])
  star
val h3 : 
  ([< Html_types.h3_attrib ], [< Html_types.h3_content_fun ],
   [> Html_types.h3 ])
  star
val h4 : 
  ([< Html_types.h4_attrib ], [< Html_types.h4_content_fun ],
   [> Html_types.h4 ])
  star
val h5 : 
  ([< Html_types.h5_attrib ], [< Html_types.h5_content_fun ],
   [> Html_types.h5 ])
  star
val h6 : 
  ([< Html_types.h6_attrib ], [< Html_types.h6_content_fun ],
   [> Html_types.h6 ])
  star
val hgroup : 
  ([< Html_types.hgroup_attrib ], [< Html_types.hgroup_content_fun ],
   [> Html_types.hgroup ])
  star
val address : 
  ([< Html_types.address_attrib ], [< Html_types.address_content_fun ],
   [> Html_types.address ])
  star
val article : 
  ([< Html_types.article_attrib ], [< Html_types.article_content_fun ],
   [> Html_types.article ])
  star
val aside : 
  ([< Html_types.aside_attrib ], [< Html_types.aside_content_fun ],
   [> Html_types.aside ])
  star
val main : 
  ([< Html_types.main_attrib ], [< Html_types.main_content_fun ],
   [> Html_types.main ])
  star

Grouping content

val p : 
  ([< Html_types.p_attrib ], [< Html_types.p_content_fun ],
   [> Html_types.p ])
  star
val pre : 
  ([< Html_types.pre_attrib ], [< Html_types.pre_content_fun ],
   [> Html_types.pre ])
  star
val blockquote : 
  ([< Html_types.blockquote_attrib ],
   [< Html_types.blockquote_content_fun ], [> Html_types.blockquote ])
  star
val dialog : 
  ([< Html_types.dialog_attrib ], [< Html_types.dialog_content_fun ],
   [> Html_types.dialog ])
  star
val div : 
  ([< Html_types.div_attrib ], [< Html_types.div_content_fun ],
   [> Html_types.div ])
  star
val dl : 
  ([< Html_types.dl_attrib ], [< Html_types.dl_content_fun ],
   [> Html_types.dl ])
  star
val ol : 
  ([< Html_types.ol_attrib ], [< Html_types.ol_content_fun ],
   [> Html_types.ol ])
  star
val ul : 
  ([< Html_types.ul_attrib ], [< Html_types.ul_content_fun ],
   [> Html_types.ul ])
  star
val dd : 
  ([< Html_types.dd_attrib ], [< Html_types.dd_content_fun ],
   [> Html_types.dd ])
  star
val dt : 
  ([< Html_types.dt_attrib ], [< Html_types.dt_content_fun ],
   [> Html_types.dt ])
  star
val li : 
  ([< Html_types.li_attrib ], [< Html_types.li_content_fun ],
   [> Html_types.li ])
  star
val figcaption : 
  ([< Html_types.figcaption_attrib ],
   [< Html_types.figcaption_content_fun ], [> Html_types.figcaption ])
  star
val figure : 
  ?figcaption:[ `Bottom of
   [< Html_types.figcaption ] elt
   wrap
   | `Top of
   [< Html_types.figcaption ] elt
   wrap ] ->
  ([< Html_types.figure_attrib ], [< Html_types.figure_content_fun ],
   [> Html_types.figure ])
  star
val hr : ([< Html_types.hr_attrib ], [> Html_types.hr ]) nullary

Semantic

val b : 
  ([< Html_types.b_attrib ], [< Html_types.b_content_fun ],
   [> Html_types.b ])
  star
val i : 
  ([< Html_types.i_attrib ], [< Html_types.i_content_fun ],
   [> Html_types.i ])
  star
val u : 
  ([< Html_types.u_attrib ], [< Html_types.u_content_fun ],
   [> Html_types.u ])
  star
val small : 
  ([< Html_types.small_attrib ], [< Html_types.small_content_fun ],
   [> Html_types.small ])
  star
val sub : 
  ([< Html_types.sub_attrib ], [< Html_types.sub_content_fun ],
   [> Html_types.sub ])
  star
val sup : 
  ([< Html_types.sup_attrib ], [< Html_types.sup_content_fun ],
   [> Html_types.sup ])
  star
val mark : 
  ([< Html_types.mark_attrib ], [< Html_types.mark_content_fun ],
   [> Html_types.mark ])
  star
val wbr : ([< Html_types.wbr_attrib ], [> Html_types.wbr ]) nullary
val bdo : 
  dir:[< `Ltr | `Rtl ] wrap ->
  ([< Html_types.bdo_attrib ], [< Html_types.bdo_content_fun ],
   [> Html_types.bdo ])
  star
val abbr : 
  ([< Html_types.abbr_attrib ], [< Html_types.abbr_content_fun ],
   [> Html_types.abbr ])
  star
val br : ([< Html_types.br_attrib ], [> Html_types.br ]) nullary
val cite : 
  ([< Html_types.cite_attrib ], [< Html_types.cite_content_fun ],
   [> Html_types.cite ])
  star
val code : 
  ([< Html_types.code_attrib ], [< Html_types.code_content_fun ],
   [> Html_types.code ])
  star
val dfn : 
  ([< Html_types.dfn_attrib ], [< Html_types.dfn_content_fun ],
   [> Html_types.dfn ])
  star
val em : 
  ([< Html_types.em_attrib ], [< Html_types.em_content_fun ],
   [> Html_types.em ])
  star
val kbd : 
  ([< Html_types.kbd_attrib ], [< Html_types.kbd_content_fun ],
   [> Html_types.kbd ])
  star
val q : 
  ([< Html_types.q_attrib ], [< Html_types.q_content_fun ],
   [> Html_types.q ])
  star
val samp : 
  ([< Html_types.samp_attrib ], [< Html_types.samp_content_fun ],
   [> Html_types.samp ])
  star
val span : 
  ([< Html_types.span_attrib ], [< Html_types.span_content_fun ],
   [> Html_types.span ])
  star
val strong : 
  ([< Html_types.strong_attrib ], [< Html_types.strong_content_fun ],
   [> Html_types.strong ])
  star
val time : 
  ([< Html_types.time_attrib ], [< Html_types.time_content_fun ],
   [> Html_types.time ])
  star
val var : 
  ([< Html_types.var_attrib ], [< Html_types.var_content_fun ],
   [> Html_types.var ])
  star

Hypertext

val a : ([< Html_types.a_attrib ], 'a, [> 'a Html_types.a ]) star

Edit

val del : 
  ([< Html_types.del_attrib ], 'a, [> 'a Html_types.del ])
  star
val ins : 
  ([< Html_types.ins_attrib ], 'a, [> 'a Html_types.ins ])
  star

Embedded

val img : 
  src:Xml.uri wrap ->
  alt:Html_types.text wrap ->
  ([< Html_types.img_attrib ], [> Html_types.img ]) nullary
val picture : 
  img:[< Html_types.img ] elt wrap ->
  ([< Html_types.picture_attrib ], [< Html_types.picture_content_fun ],
   [> Html_types.picture ])
  star
val iframe : 
  ([< Html_types.iframe_attrib ], [< Html_types.iframe_content_fun ],
   [> Html_types.iframe ])
  star
val object_ : 
  ?params:[< Html_types.param ] elt list_wrap ->
  ([< Html_types.object__attrib ], 'a, [> `Object of 'a ])
  star
val param : 
  ([< Html_types.param_attrib ], [> Html_types.param ])
  nullary
val embed : 
  ([< Html_types.embed_attrib ], [> Html_types.embed ])
  nullary
val audio : 
  ?src:Xml.uri wrap ->
  ?srcs:[< Html_types.source ] elt list_wrap ->
  ([< Html_types.audio_attrib ], 'a, [> 'a Html_types.audio ])
  star
val video : 
  ?src:Xml.uri wrap ->
  ?srcs:[< Html_types.source ] elt list_wrap ->
  ([< Html_types.video_attrib ], 'a, [> 'a Html_types.video ])
  star
val canvas : 
  ([< Html_types.canvas_attrib ], 'a, [> 'a Html_types.canvas ])
  star
val source : 
  ([< Html_types.source_attrib ], [> Html_types.source ])
  nullary
val area : 
  alt:Html_types.text wrap ->
  ([< `Accesskey
   | `Alt
   | `Aria
   | `Class
   | `Contenteditable
   | `Contextmenu
   | `Coords
   | `Dir
   | `Draggable
   | `Hidden
   | `Hreflang
   | `Id
   | `Lang
   | `Media
   | `Mime_type
   | `OnAbort
   | `OnBlur
   | `OnCanPlay
   | `OnCanPlayThrough
   | `OnChange
   | `OnClick
   | `OnClose
   | `OnContextMenu
   | `OnDblClick
   | `OnDrag
   | `OnDragEnd
   | `OnDragEnter
   | `OnDragLeave
   | `OnDragOver
   | `OnDragStart
   | `OnDrop
   | `OnDurationChange
   | `OnEmptied
   | `OnEnded
   | `OnError
   | `OnFocus
   | `OnFormChange
   | `OnFormInput
   | `OnInput
   | `OnInvalid
   | `OnKeyDown
   | `OnKeyPress
   | `OnKeyUp
   | `OnLoad
   | `OnLoadStart
   | `OnLoadedData
   | `OnLoadedMetaData
   | `OnMouseDown
   | `OnMouseMove
   | `OnMouseOut
   | `OnMouseOver
   | `OnMouseUp
   | `OnMouseWheel
   | `OnPause
   | `OnPlay
   | `OnPlaying
   | `OnProgress
   | `OnRateChange
   | `OnReadyStateChange
   | `OnScroll
   | `OnSeeked
   | `OnSeeking
   | `OnSelect
   | `OnShow
   | `OnStalled
   | `OnSubmit
   | `OnSuspend
   | `OnTimeUpdate
   | `OnTouchCancel
   | `OnTouchEnd
   | `OnTouchMove
   | `OnTouchStart
   | `OnVolumeChange
   | `OnWaiting
   | `Rel
   | `Role
   | `Shape
   | `Spellcheck
   | `Style_Attr
   | `Tabindex
   | `Target
   | `Title
   | `Translate
   | `User_data
   | `XML_lang
   | `XMLns ],
   [> Html_types.area ])
  nullary
val map : 
  ([< Html_types.map_attrib ], 'a, [> 'a Html_types.map ])
  star

Tables Data

val caption : 
  ([< Html_types.caption_attrib ], [< Html_types.caption_content_fun ],
   [> Html_types.caption ])
  star
val table : 
  ?caption:[< Html_types.caption ] elt wrap ->
  ?columns:[< Html_types.colgroup ] elt
   list_wrap ->
  ?thead:[< Html_types.thead ] elt wrap ->
  ?tfoot:[< Html_types.tfoot ] elt wrap ->
  ([< Html_types.table_attrib ], [< Html_types.table_content_fun ],
   [> Html_types.table ])
  star
val tablex : 
  ?caption:[< Html_types.caption ] elt wrap ->
  ?columns:[< Html_types.colgroup ] elt
   list_wrap ->
  ?thead:[< Html_types.thead ] elt wrap ->
  ?tfoot:[< Html_types.tfoot ] elt wrap ->
  ([< Html_types.tablex_attrib ], [< Html_types.tablex_content_fun ],
   [> Html_types.tablex ])
  star
val colgroup : 
  ([< Html_types.colgroup_attrib ],
   [< Html_types.colgroup_content_fun ], [> Html_types.colgroup ])
  star
val col : ([< Html_types.col_attrib ], [> Html_types.col ]) nullary
val thead : 
  ([< Html_types.thead_attrib ], [< Html_types.thead_content_fun ],
   [> Html_types.thead ])
  star
val tbody : 
  ([< Html_types.tbody_attrib ], [< Html_types.tbody_content_fun ],
   [> Html_types.tbody ])
  star
val tfoot : 
  ([< Html_types.tfoot_attrib ], [< Html_types.tfoot_content_fun ],
   [> Html_types.tfoot ])
  star
val td : 
  ([< Html_types.td_attrib ], [< Html_types.td_content_fun ],
   [> Html_types.td ])
  star
val th : 
  ([< Html_types.th_attrib ], [< Html_types.th_content_fun ],
   [> Html_types.th ])
  star
val tr : 
  ([< Html_types.tr_attrib ], [< Html_types.tr_content_fun ],
   [> Html_types.tr ])
  star

Forms

val form : 
  ([< Html_types.form_attrib ], [< Html_types.form_content_fun ],
   [> Html_types.form ])
  star
val fieldset : 
  ?legend:[< Html_types.legend ] elt wrap ->
  ([< Html_types.fieldset_attrib ],
   [< Html_types.fieldset_content_fun ], [> Html_types.fieldset ])
  star
val legend : 
  ([< Html_types.legend_attrib ], [< Html_types.legend_content_fun ],
   [> Html_types.legend ])
  star
val label : 
  ([< Html_types.label_attrib ], [< Html_types.label_content_fun ],
   [> Html_types.label ])
  star

Label authorizes only one control inside them that should be labelled with a for attribute (although it is not necessary). Such constraints are not currently enforced by the type-system

val input : 
  ([< Html_types.input_attrib ], [> Html_types.input ])
  nullary
val button : 
  ([< Html_types.button_attrib ], [< Html_types.button_content_fun ],
   [> Html_types.button ])
  star
val select : 
  ([< Html_types.select_attrib ], [< Html_types.select_content_fun ],
   [> Html_types.select ])
  star
val datalist : 
  ?children:[< `Options of
   [< Html_types.selectoption ] elt
   list_wrap
   | `Phras of
   [< Html_types.phrasing ] elt
   list_wrap ] ->
  ([< Html_types.datalist_attrib ], [> Html_types.datalist ])
  nullary
val optgroup : 
  label:Html_types.text wrap ->
  ([< Html_types.optgroup_attrib ],
   [< Html_types.optgroup_content_fun ], [> Html_types.optgroup ])
  star
val option : 
  ([< Html_types.option_attrib ], [< Html_types.option_content_fun ],
   [> Html_types.selectoption ])
  unary
val textarea : 
  ([< Html_types.textarea_attrib ],
   [< Html_types.textarea_content_fun ], [> Html_types.textarea ])
  unary
val keygen : 
  ([< Html_types.keygen_attrib ], [> Html_types.keygen ])
  nullary
val progress : 
  ([< Html_types.progress_attrib ],
   [< Html_types.progress_content_fun ], [> Html_types.progress ])
  star
val meter : 
  ([< Html_types.meter_attrib ], [< Html_types.meter_content_fun ],
   [> Html_types.meter ])
  star
val output_elt : 
  ([< Html_types.output_elt_attrib ],
   [< Html_types.output_elt_content_fun ], [> Html_types.output_elt ])
  star

Data

val entity : string -> [> Html_types.txt ] elt

entity "foo" is the HTML entity &foo;. Both numerical and named form are allowed. See also

val space : unit -> [> Html_types.txt ] elt
val cdata : string -> [> Html_types.txt ] elt
val cdata_script : string -> [> Html_types.txt ] elt
val cdata_style : string -> [> Html_types.txt ] elt

Interactive

val details : 
  [< Html_types.summary ] elt wrap ->
  ([< Html_types.details_attrib ], [< Html_types.details_content_fun ],
   [> Html_types.details ])
  star
val summary : 
  ([< Html_types.summary_attrib ], [< Html_types.summary_content_fun ],
   [> Html_types.summary ])
  star
val command : 
  label:Html_types.text wrap ->
  ([< Html_types.command_attrib ], [> Html_types.command ])
  nullary
val menu : 
  ?children:[< `Flows of
   [< Html_types.flow5 ] elt
   list_wrap
   | `Lis of
   [< `Li of [< Html_types.common ] ] elt
   list_wrap ] ->
  ([< Html_types.menu_attrib ], [> Html_types.menu ])
  nullary

Scripting

val script : 
  ([< Html_types.script_attrib ], [< Html_types.script_content_fun ],
   [> Html_types.script ])
  unary
val noscript : 
  ([< Html_types.noscript_attrib ],
   [< Html_types.noscript_content_fun ], [> Html_types.noscript ])
  star
val template : 
  ([< Html_types.template_attrib ],
   [< Html_types.template_content_fun ], [> Html_types.template ])
  star
val meta : 
  ([< Html_types.meta_attrib ], [> Html_types.meta ])
  nullary

Style Sheets

val style : 
  ([< Html_types.style_attrib ], [< Html_types.style_content_fun ],
   [> Html_types.style ])
  star

Ruby

val rt : 
  ([< Html_types.rt_attrib ], [< Html_types.rt_content_fun ],
   [> Html_types.rt ])
  star
val rp : 
  ([< Html_types.rp_attrib ], [< Html_types.rp_content_fun ],
   [> Html_types.rp ])
  star
val ruby : 
  ([< Html_types.ruby_attrib ], [< Html_types.ruby_content_fun ],
   [> Html_types.ruby ])
  star

Deprecated

val pcdata : string wrap -> [> Html_types.pcdata ] elt

DeprecatedUse txt instead

Conversion with untyped representation

WARNING: These functions do not ensure HTML or SVG validity! You should always explicitly given an appropriate type to the output.

val of_seq : 
  Xml_stream.signal Stdlib.Seq.t ->
  'a elt list_wrap

import signal converts the given XML signal into Tyxml elements. It can be used with HTML and SVG parsing libraries, such as Markup. Raises Xml_stream.Malformed_stream if the stream is malformed.

val tot : Xml.elt -> 'a elt
val totl : 
  Xml.elt list_wrap ->
  'a elt list_wrap
val toelt : 'a elt -> Xml.elt
val toeltl : 
  'a elt list_wrap ->
  Xml.elt list_wrap
val doc_toelt : doc -> Xml.elt
val to_xmlattribs : 'a attrib list -> Xml.attrib list
val to_attrib : Xml.attrib -> 'a attrib
module Unsafe : sig..end

Unsafe features.