package hardcaml_waveterm
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
A terminal based digital waveform viewer for Hardcaml
Install
dune-project
Dependency
Authors
Maintainers
Sources
hardcaml_waveterm-v0.13.0.tar.gz
sha256=b0eb68ea3d7fe58794bc72e5f304981a4607ff6580becf03cdef948993698c12
md5=1ab0d447fc79c059f3fcbde6ff2dcd7d
doc/hardcaml_waveterm/Hardcaml_waveterm/Draw/In_memory/index.html
Module Draw.In_memory
In memory based API with no external requirements
type point = Base.Int.t * Style.tinclude S
with type ctx = point Base.Array.t Base.Array.t
and type style = Style.t
type ctx = point Base.Array.t Base.Array.tdrawing context
type style = Style.tunderlying style type
val rows : ctx -> Base.Int.tval cols : ctx -> Base.Int.tval clear : ctx -> Base.Unit.tclear display
val fill : ctx:ctx -> style:style -> bounds:rect -> Base.Char.t -> Base.Unit.tfill bounds with char given style
val draw_int :
ctx:ctx ->
style:style ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
Base.Int.t ->
Base.Unit.tdraw int (representing unicode value)
val draw_piece :
ctx:ctx ->
style:style ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
piece ->
Base.Unit.tdraw piece
val draw_char :
ctx:ctx ->
style:style ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
Base.Char.t ->
Base.Unit.tdraw char
val draw_string :
ctx:ctx ->
style:style ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
Base.String.t ->
Base.Unit.tdraw string (nothing fancy - horizontal, no breaks)
val draw_box :
ctx:ctx ->
style:style ->
bounds:rect ->
Base.String.t ->
Base.Unit.tdraw box outline with label
val get :
ctx:ctx ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
Base.Int.t * Style.tget value and style at point
val inv : ctx:ctx -> bounds:rect -> r:Base.Int.t -> c:Base.Int.t -> Base.Unit.tinvert fg and bg at point
val bold :
ctx:ctx ->
bounds:rect ->
r:Base.Int.t ->
c:Base.Int.t ->
Base.Unit.tset bold on point
val init : rows:Base.Int.t -> cols:Base.Int.t -> ctx sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>