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.16.0.tar.gz
sha256=20844546139ee69e8d328b75a54369b2c1db91d88e43f7ca9ccfc0cd855be828
doc/hardcaml_waveterm.interactive/Hardcaml_waveterm_interactive/Draw_notty/index.html
Module Hardcaml_waveterm_interactive.Draw_nottySource
Notty based gfx API. We need to use an intermediate in memory representation for notty.
include module type of Hardcaml_waveterm.Expert.Draw.In_memory
with type style = Hardcaml_waveterm.Expert.Draw.In_memory.style
type point = Base.int * Hardcaml_waveterm_kernel__.Draw.Style.ttype ctx = point Base.array Base.arraydrawing context
type style = Hardcaml_waveterm.Expert.Draw.In_memory.styleunderlying style type
val get_bounds : ctx -> Hardcaml_waveterm_kernel__.Draw.rectget context size
val get_style : Hardcaml_waveterm_kernel__.Draw.Style.t -> styleconvert our style info to underlying style
val fill :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
Base.char ->
Base.unitfill bounds with char given style
val draw_int :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Base.int ->
Base.unitdraw int (representing unicode value)
val draw_piece :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Hardcaml_waveterm_kernel__.Draw.piece ->
Base.unitdraw piece
val draw_char :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Base.char ->
Base.unitdraw char
val draw_string :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Base.string ->
Base.unitdraw string (nothing fancy - horizontal, no breaks)
val draw_box :
ctx:ctx ->
style:style ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
Base.string ->
Base.unitdraw box outline with label
val get :
ctx:ctx ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Base.int * Hardcaml_waveterm_kernel__.Draw.Style.tget value and style at point
val inv :
ctx:ctx ->
bounds:Hardcaml_waveterm_kernel__.Draw.rect ->
r:Base.int ->
c:Base.int ->
Base.unitinvert fg and bg at point
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>