defmodule
#:bitmap:bvtty
files
(bvtty)
import
(virbitmap defstruct)
export
(#:bitmap:bvtty:bitprologue #:bitmap:bvtty:bitepilogue #:bitmap:bvtty:
bitmap-refresh #:bitmap:bvtty:bitmap-flush #:bitmap:bvtty:create-window #:
bitmap:bvtty:create-subwindow #:image:rectangle:window:current-window #:image:
rectangle:window:uncurrent-window #:image:rectangle:window:modify-window #:
image:rectangle:window:kill-window #:image:rectangle:window:pop-window #:
image:rectangle:window:move-behind-window #:bitmap:bvtty:find-window #:image:
rectangle:window:map-window #:image:rectangle:window:
current-keyboard-focus-window #:image:rectangle:window:
uncurrent-keyboard-focus-window #:bitmap:bvtty:event-mode #:bitmap:bvtty:
eventp #:bitmap:bvtty:read-event #:bitmap:bvtty:peek-event #:bitmap:bvtty:
flush-event #:bitmap:bvtty:add-event #:bitmap:bvtty:grab-event #:bitmap:bvtty:
ungrab-event #:bitmap:bvtty:itsoft-event #:bitmap:bvtty:read-mouse #:
graph-env:font-max #:tty:window:redisplayscreen #:tty:window:tybeep #:
graph-env:current-font #:graph-env:load-font #:graph-env:draw-substring #:
graph-env:clear-graph-env #:graph-env:width-substring #:graph-env:
height-substring #:graph-env:x-base-substring #:graph-env:y-base-substring #:
graph-env:x-inc-substring #:graph-env:y-inc-substring #:graph-env:draw-cursor 
#:graph-env:current-clip #:graph-env:current-line-style #:graph-env:
line-style-max #:graph-env:current-pattern #:graph-env:pattern-max #:
graph-env:current-mode #:graph-env:draw-polyline #:graph-env:draw-polymarker 
#:graph-env:fill-area #:graph-env:draw-ellipse #:graph-env:fill-ellipse #:
bitmap:bvtty:create-bitmap #:bitmap:bvtty:create-window-bitmap #:bitmap:bvtty:
get-bit-line #:bitmap:bvtty:set-bit-line #:bitmap:bvtty:kill-bitmap #:bitmap:
bvtty:bmref #:bitmap:bvtty:bmset #:bitmap:bvtty:bitblit #:bitmap:bvtty:
do-redisplay)

;;; Added automatically, don't type beyond this line.
cpexport
((#:bitmap:bvtty:bitprologue subr0 ()) (#:bitmap:bvtty:bitepilogue subr0 ()) (#:bitmap:bvtty:bitmap-refresh subr0 ()) (#:bitmap:bvtty:do-redisplay nsubr ()) (#:bitmap:bvtty:bitmap-flush subr0 ()) (#:bitmap:bvtty:create-window subr1 ()) (#:bitmap:bvtty:create-subwindow subr1 ()) (#:image:rectangle:window:current-window subr1 ()) (#:image:rectangle:window:uncurrent-window subr1 ()) (#:image:rectangle:window:modify-window nsubr ()) (#:image:rectangle:window:kill-window subr1 ()) (#:image:rectangle:window:pop-window subr1 ()) (#:image:rectangle:window:move-behind-window subr2 ()) (#:bitmap:bvtty:find-window subr2 ()) (#:image:rectangle:window:map-window nsubr ()) (#:image:rectangle:window:current-keyboard-focus-window subr1 ()) (#:image:rectangle:window:uncurrent-keyboard-focus-window subr1 ()) (#:bitmap:bvtty:event-mode subr1 ()) (#:bitmap:bvtty:eventp subr0 ()) (#:bitmap:bvtty:read-event subr1 ()) (#:bitmap:bvtty:peek-event subr1 ()) (#:bitmap:bvtty:flush-event subr0 ()) (#:bitmap:bvtty:add-event subr1 ()) (#:bitmap:bvtty:grab-event subr1 ()) (#:bitmap:bvtty:ungrab-event subr0 ()) (#:bitmap:bvtty:itsoft-event subr1 ()) (#:bitmap:bvtty:read-mouse subr1 ()) (#:graph-env:font-max subr1 ()) (#:tty:window:redisplayscreen nsubr ()) (#:tty:window:tybeep subr0 ()) (#:graph-env:current-font subr2 ()) (#:graph-env:load-font subr2 ()) (#:graph-env:draw-substring nsubr ()) (#:graph-env:clear-graph-env subr1 ()) (#:graph-env:width-substring nsubr ()) (#:graph-env:height-substring nsubr ()) (#:graph-env:x-base-substring nsubr ()) (#:graph-env:y-base-substring nsubr ()) (#:graph-env:x-inc-substring nsubr ()) (#:graph-env:y-inc-substring nsubr ()) (#:graph-env:draw-cursor nsubr ()) (#:graph-env:current-clip nsubr ()) (#:graph-env:current-line-style subr2 ()) (#:graph-env:line-style-max subr1 ()) (#:graph-env:current-pattern subr2 ()) (#:graph-env:pattern-max subr1 ()) (#:graph-env:current-mode subr2 ()) (#:graph-env:draw-polyline nsubr ()) (#:graph-env:draw-polymarker nsubr ()) (#:graph-env:fill-area nsubr ()) (#:graph-env:draw-ellipse nsubr ()) (#:graph-env:fill-ellipse nsubr ()) (#:bitmap:bvtty:create-bitmap subr1 ()) (#:bitmap:bvtty:create-window-bitmap subr2 ()) (#:bitmap:bvtty:get-bit-line subr3 ()) (#:bitmap:bvtty:set-bit-line subr3 ()) (#:bitmap:bvtty:kill-bitmap subr1 ()) (#:bitmap:bvtty:bmref subr3 ()) (#:bitmap:bvtty:bmset nsubr ()) (#:bitmap:bvtty:bitblit nsubr ()))
cpfunctions
((#:bitmap:bvtty:full-redisplay subr0) (#:bitmap:bvtty:redisplay nsubr) (#:bitmap:bvtty:delayed-redisplay nsubr) (#:bitmap:bvtty:flush-delayed-redisplay nsubr) (#:bitmap:bvtty:redisplay1 subr1) (#:bitmap:bvtty:redisplay1-mini nsubr) (#:bitmap:bvtty:make-framed-screen nsubr) (make-ascii-event subr2))
cpimport
((virbitmap (#:bitmap:bitprologue . subr0) (#:graph-env:make . subr0) (#:bitmap:bitepilogue . subr0) (bitxmax . nsubr) (bitymax . nsubr) (current-keyboard-focus-window . nsubr) (current-window . nsubr)))