Hardcaml_waveterm_interactive.Draw_nottySourceNotty based gfx API. We need to use an intermediate in memory representation for notty.
include module type of Hardcaml_waveterm_kernel.Expert.Draw.In_memory
with type style = Hardcaml_waveterm_kernel.Expert.Draw.In_memory.styledrawing context
underlying style type
convert 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